Thema: Delphi Self welche Unit ?

Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
 
Delphi 11 Alexandria
 
#16

Re: Self welche Unit ?

  Alt 10. Nov 2003, 21:06
Moin Homer,

warum nicht so?

Delphi-Quellcode:
if ProgressBar_Form = nil then begin
  // Wird gleich wieder freigegeben, dann kann der Owner nil sein.
  ProgressBar_Form := TProgressBar_Form.Create(nil);
  try
    ProgressBar_Form.ShowModal;
  finally
    FreeAndNil(ProgressBar_Form);
  end;
end;
Wobei Du Dir eigentlich auch die Abfrage auf nil sparen kannst, da Du das Formular Modal anzeigen lässt, und es danach garantiert wieder freigibst, womit sichergestellt ist, dass es beim nächsten Aufruf der Routine nicht existiert.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat