Einzelnen Beitrag anzeigen

Nils_13

Registriert seit: 15. Nov 2004
2.647 Beiträge
 
#7

Re: Newbie sucht Hilfe mit NotePadClon

  Alt 6. Jan 2007, 17:19
Hi,

1. Klick auf das RichEdit, dann unter Ereignisse doppelt auf OnChange.
2. Dort trägst du dann haschanged := False; ein
3. Oben in dem Formbereich (wenn du es nicht geändert hast, heißt es TForm1) steht private. Trage unter private haschanged : Boolean; ein.
4. Am besten in OnCreate haschanged := True; eintragen (Form anklicken --> Ereignisse --> OnCreate).
5. Dann in OnClose (genauso, wie OnCreate erstellen) oder OnCloseQuery noch z.B.
Delphi-Quellcode:
if haschanged then
  Gib die Meldung aus...;
Dann würde ich dir noch empfehlen, dir ein Tutorial oder Buch (nicht nur von außen ) anzuschauen.
  Mit Zitat antworten Zitat