Einzelnen Beitrag anzeigen

s-off
(Gast)

n/a Beiträge
 
#2

Re: Stringgrid Werte als Hint hervorbringen

  Alt 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;
  Mit Zitat antworten Zitat