Delphi Destruktor überladen

Thema durchsuchen

Ansicht

Themen-Optionen

Destruktor überladen

Ein Thema von Majortomster · begonnen am 15. Jun 2005 · letzter Beitrag vom 15. Jun 2005

Vorheriger Beitrag

Nächster Beitrag

Majortomster

Registriert seit: 11. Mai 2005
27 Beiträge

Re: Destruktor überladen

15. Jun 2005, 09:34

Klar ihr habt Recht - ein bisschen Code sagt mehr als mein halber Roman

markieren

Delphi-Quellcode:

			public destructor Destroy(); reintroduce; overload;

public procedure Free(); overload;

...

zusammenfalten · markieren

Delphi-Quellcode:

			destructor TsqlReplace.Destroy();

begin

   ds.Free;

   fieldStrs.Free;

   datenbank := '';

   tabelle := '';

   bedingung := '';

   queryExecuted := false;

   inherited;

end;

procedure TsqlReplace.Free();

begin

   if(self <> nil) then

      Destroy();

end;