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;