Klar ihr habt Recht - ein bisschen Code sagt mehr als mein halber Roman
Delphi-Quellcode:
public destructor Destroy(); reintroduce; overload;
public procedure Free(); overload;
...
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;