In einer
VCL-Anwendung existiert eine Procedure für das Ereignis
OnKeyPress
für ein TEdit-Feld. Es ist ein Setup-Fenster und es wid geprüft, ob der Benutzer Änderungen gemacht hat. Diese Procedure wird - weil gleicher Code - von weiteren TEdits aufgerufen. Ich stehe jetzt vor dem Problem...
Der Code der sich bislang in der Procedure HandleKeyPress() befindet gehört in eine eigene Methode (Namensvorschlag DataChanged()) ausgelagert.
Delphi-Quellcode:
Procedure TForm1.UpDown1Changing(Sender: TObject);
Begin
DataChanged;
End;
Die bisherige Methode HandleKeyPress() wird "entkernt" und ruft natürlich auch DataChanged() auf.
Eigentlich ganz einfach.