Einzelnen Beitrag anzeigen

Jumpy

Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.699 Beiträge
 
Delphi 6 Enterprise
 
#4

AW: Programm beendet sich nicht sauber

  Alt 17. Apr 2013, 10:11
@CCRDude: Ist ja ähnliches vorgehen wie von DeddyH vorgeschlagen. Da ich aber im Autofall erst gar keine Forms anzeigen will fallen FormShow usw. als Stelle für das senden der Message flach. Ich probiers mal die Message am Ende vom FormCreate zu schicken.

@DeddyH
Gute Idee. Das wär auf jeden Fall eleganter als das mit dem Timer, hat aber den selben Effekt, dass das FormCreate erstmal abgeschlossen wird. Ginge das so?

Delphi-Quellcode:
const
  WM_AUTOEVENT = WM_USER + 2;

//...
  private
    procedure AutoEvent(var Msg: TMessage); message WM_AUTOEVENT;

//im FormCreate dann
  if Projekt.Auto then
    sendMessage(Self.Handle,WM_AUTOEVENT,0,0); //reicht 0,0 weil die Message ja schon die Message ist?
Ralph

Geändert von Jumpy (17. Apr 2013 um 10:15 Uhr)
  Mit Zitat antworten Zitat