hier mal ein kleiner Ausschnitt aus einem meiner Sourcen. Meintest du so etwas?
Delphi-Quellcode:
procedure TfrmEditDataMatrix.sgDataMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Var aCol : Integer;
aRow : Integer;
aCursorPos : tPoint;
aSelectionGrid : tGridRect;
PerformSelection : Boolean;
begin
PerformSelection := False;
// get the respective grid cell
sgData.MouseToCell(X, Y, aCol, aRow);
sgData ist das StringGrid...
Jan