Edit1.Text Inhalt sperren ?

[Die Muhkuh]

Zitat von Hansa:

Knapper gehts nimmer. Ich habe eine Form da ist das so ähnlich. Diese Form hat eine private Variable AltFeldWert. Im Edit.OnEnter wird der gesetzt. Bei mir gehts drum zu sehen, ob überhaupt was geändert wurde. Falls ja : Aktion durchführen (im Edit.OnExit). Bei dir müsste man lediglich den im OnEnter gespeicherten Wert im OnExit zurücksetzen. Edit.Text := AltFeldWert; Es reicht ein gemeinsames OnEnter für die gewünschten Edits. Jedes einzelne müsste allerdings sein eigenes OnExit besitzen. Alternative (aber nicht nötig) : jedes Edit erhält eine eigene Variable um den alten Wert zu speichern.

Hi Hansa,

warum braucht jedes Edit sein eigenes OnExit?

Delphi-Quellcode:

procedure OnExit(Sender: TObject);
begin
  (Sender as TEdit).Text := AltFeldWert;
end;