Zitat:
if AktLine <> Nil then
Und du bist dir sicher, dass es wirklich assigned ( <>nil ) ist?
Vor allem da es keine Rückmeldung gibt, dass diese Funktion bei NIL still und heimlich garnichts macht. (ELSE + Fehlermeldung)
Und natürlich auch nicht, wenn eine ungültige Zahl eingegeben wurde.
Oder einfach mal andersrum, also garnicht erst ausführen lassen (Menüpunkt deaktivieren), wenn nichts gemacht werden kann/soll.
Delphi-Quellcode:
// ins OnPopup des PopupMenü
LineShift.Enabled := Assigned(AktLine);