(Gast)
n/a Beiträge
|
Re: Stringgrid Werte als Hint hervorbringen
14. Aug 2007, 14:30
Hallo,
Stichwort: MouseToCell
Edit: Beispiel
Delphi-Quellcode:
procedure TForm1.StringGrid1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
var
col, row: integer;
begin
StringGrid1.MouseToCell(x, y, col, row);
if (col >= 0) and (row >= 0) then
StringGrid1.Hint := StringGrid1.Cells[col, row]
else
StringGrid1.Hint := '';
end;
|
|
Zitat
|