Ach!
Natürlich ziemlich dumm, wenn man den Tastendruck im OnKeyPress-Ereignis wieder abfängt:
Code:
procedure TForm1.EdGl1KeyPress(Sender: TObject; var Key: Char);
begin
if not (Key in ['0'..'9','x','y','*','/','+','-','=',Char(VK_BACK),Char(VK_RETURN)]) then Key:=#0
else if (Key=Char(VK_RETURN)) and (Length(EdGl2.Text)>0) then BtBerechnen.Click
end;
Und dies hatte ich in der anderen Form nicht, daher funktionierte der Paste-Befehl auch ohne mein manuelles Wiederhinzutun
Haach, ist das alles kompliziert
Ja, Auskommentieren hat geholfen, nur im falschen Ereignis
Vielen Dank!