DBGrid Right Click

[-187-]

Hm habe es mir nochmal angeguckt. Also es ist so das der Code zwischen dem 2ten begin und end nur funktioniert wenn ich im Grid auf eine Leere Stelle klicke. Wenn ich aber auf eine Row klicke dann klappts nicht.

Genauso verhält es sich mit dem PopupMenu wenn man es im OI dem Grid nicht zugewiesen hat. Die Lösung dafür wäre einfach -> Einfach die Zuweisungsetzen. Aber wie kann ich jetzt meine Function dem Grid zuweisen ?

Code:

procedure TForm1.DBGrid1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  if Button = mbRight then
  begin
    MyFunction;
  end;
end;