Mausposition im DBGrid

[Bolt Thrower]

Hallo fly_singapore,

mit dem folgenden Code kannst Du die Position der aktuell ausgewählten Zelle in einem "DB-Grid" herausfinden (kann das leider nicht unter "Delphi 3" testen, ich hoffe aber, dass es auch da funktioniert):

Delphi-Quellcode:

procedure TForm1.DBGrid1CellClick(Column: TColumn);
var
  MousePos         : TPoint;
  Coord            : TGridCoord;
begin
  MousePos := DBGrid1.ScreenToClient(Mouse.CursorPos);
  Coord    := DBGrid1.MouseCoord(MousePos.X, MousePos.Y);
  ShowMessage(IntToStr(Coord.X) + ', ' + IntToStr(Coord.Y));
end;

Wie Du siehst, musst Du Dich hier auf das Ereignis "OnCellClick" "stürzen".

Viele Grüße,

Bolt Thrower