Forum: Programmieren allgemein
Delphi
by TERWI,
31. Mär 2013
Sir Rufo: Prost ! Ich hab mal ein Bierchen für dich mit aufgemacht und noch nen Eierlikör dazu eingeschenkt. :dancer: :hello:
Ich dachte, ich kenne seit vielen Jahren Delphi auch vieles, aber das war mir in der Art noch nicht bewusst.
Ausprobiert (auf NIL gesetzt) und Ruhe im Karton !
Jetzt wo ich es weiss, ist das in etwa so wie damals mit (ungültigen) Strings via PostMessage schicken....
Forum: Programmieren allgemein
Delphi
by TERWI,
31. Mär 2013
Gerne, Uwe. In Auszügen mal die Logger-Klasse. Sonst wird's zu lang, der Rest funzt ja.
type
......
TLOGWIN = class(TForm)
lb_LOG : TListBox;
cb_W2Log : TCheckBox;
cb_AOT : TCheckBox;
btn_Hide : TBitBtn;
Forum: Programmieren allgemein
Delphi
by TERWI,
31. Mär 2013
.... ist schon klar, Sir Rufo. 8-)
Das mache ich ja auch in der Routine SetLogWin(false), weil ich im Programm auf Assigned zum Neuerstellen mit SetLogWin(true) abfrage.
Nur wieso kommt im OnDestroy der Logger-Klasse ausgerechnet die Freigabe des Fenster VOR dem eigentlichen Aufruf zum Entfernen ????
Beim Freigeben der Stringliste und des TFileStrams klappt das ja auch ....
Forum: Programmieren allgemein
Delphi
by TERWI,
31. Mär 2013
Hmm, war ja ne Idee wert - hab ich den Logger mal sich selbst loggen lassen (wo es geht).
Hier der LOG von:
- 2x mal Fenster erzeugen/freigeben
- 1x Fenster erzeugen
- Logger beenden
destructor TLOG.Destroy;
begin
FOnDestroy := true; // das scheint absolut nicht zu interessieren im OnDesrtoy des Fensters
SetLogWin(false); // ..... hier schon
Forum: Programmieren allgemein
Delphi
by TERWI,
31. Mär 2013
Moin zusammen !
Ich bastle grade an meinem Universal-Logger herum. Wenn er fertig (und vor allem fehlerfrei) ist stelle ich den gerne hier ein.
Dieser besteht aus einer Klasse (keine Form !), beeinhaltet aber u.a. eine Form, die ich ggf. gleich beim Erzeugen des Loggers (im constructor) selbst mit erstelle oder bei Bedarf zur Laufzeit erzeuge und auch wieder freigebe - oder - bzw. prüfe ob...