نمایش هینت DBGrid

[Mask]

سلام
میخام موس رو که بر روی دیبیگرید حرکت میدم.مقدار یکی از فیلهای همون گرید بر روی هینت نمایش پیدا کنه.
آیا همچین کاری شدنیه؟

[یوسف زالی]

سلام. بله شدنیه. اما بگید دقیق چی می خواهید، مقدار نام فیلد یا value فیلد؟ منظورم اینه که روی تاتیل هینت بده یا روی داده؟

[Mask]

ممنون دادا.
کد زیر مشکل رو حل کرد.

Procedure ChangeHint(C: TControl; Const Hint: String; p: TPoint);var
OldHint: String;
begin
OldHint := C.Hint;
if Hint <> OldHint then
begin
C.Hint := Hint;
Application.ActivateHint(p);
end;
end;


procedure TForm1.DBGrid1MouseMove(Sender: TObject; Shift: TShiftState;
X, Y: Integer);
begin
ChangeHint(TDBGrid(Sender), TDBGrid(Sender).DataSource.DataSet.FieldByName

Application.ActivateHint(TDBGrid(Sender).ClientToS creen(Point(X, Y))); ('nam').Text, TDBGrid(Sender).ClientToScreen(Point(X, Y)));
end;