Autor Beitrag
Timelesk
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 82


Delphi 2006 Prof
BeitragVerfasst: Fr 24.03.06 23:01 
Hallo,

mich beschäftigt derzeit folgendes Problem:

Ich starte eine Klasse mit CREATE auf die Variable bild (var bild: TKlasse).
Nun habe ich einen Button, welcher die Klasse über bild.FREE wieder freigibt/zerstört.

Leider weiß ich nicht, wie die Variable bild nach dem FREE aussieht, denn ich möchte, sofern die Klasse nicht gestartet wurde, eine Fehlermeldung ausgeben.

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
if bild = nil then
begin
  showmessage('Nicht gestartet');
  exit;
end;


funktioniert leider nur, wenn die Klasse zuvor nicht zerstört wurde bzw. noch nicht gestartet wurde.
Muss ich per Hand immer nach dem FREE noch ein bild := nil setzen?
Oder wie kann ich das überprüfen?


Hoffe ihr blickt da durch ;)

Vielen Dank

gruß
Timelesk

Moderiert von user profile iconChristian S.: Delphi-Tags hinzugefügt
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Fr 24.03.06 23:51 
Gib das Objekt mit FreeAndNil frei und prüfe mit Assigned.
Timelesk Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 82


Delphi 2006 Prof
BeitragVerfasst: So 26.03.06 07:17 
Hi,

vielen Dank.
Funktioniert einwandfrei!