Hallo erstmal,
ich glaube folgender Code dürfte dir helfen:
Delphi-Quellcode:
procedure TForm1.GridMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
ACol,
ARow : Integer;
begin
if Button = mbRight then
begin
Grid.MouseToCell(X,Y,ACol,ARow);
Grid.Col := ACol;
Grid.Row := ARow;
end;
end;
Jetzt musst du nur noch das PopUpMenü an der Stelle X, Y aufrufen. Da gibts glaube ich OnPopUpMenu oder so ähnlich womit man die Position setzen kann...
MFG Alex