ich habe ein Program, das auf auf Tastendruck in einem TMemo reagieren soll. Das funktioniert an sich auch gut, erzeugt aber einen Hänger im Debuger. Ich kann das auch auch in einem Testprogramm nachvollziehen.
Code: Alles auswählen
00007FFFA9B70911 C3 ret
Code: Alles auswählen
procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: word; Shift: TShiftState);
begin
if Key = VK_F12 then
ShowMessage('OK');
end;
FPC: 3.2.2
Jemand eine Idee, warum das so ist, oder ist das ein Bug?