Zitat von
DonnieDarko_02:
aber wie kann ich, nachdem die message angezeigt wird, wieder an den anfang der prozedur zurückkehren, dass ein neuer wert eingegeben werden kann?
du darfst das nicht mit der proceduralen Programmierung verwechseln.
deine Proc.
procedure TForm1.Edit4KeyPress(Sender: TObject; var Key: Char);
wird jedesmal beim keypress von neuem aufgerufen.
Gruss KH