Sorry, hab mich falsch ausgedrückt, ich zerstöre das ADODataset natürlich erst nach dem Zuordnen in die Objekte.
Delphi-Quellcode:
MyResult := TADODataSet.Create(nil);
MyResult.Connection := Self.FConnection;
MyResult.CommandText := 'SELECT * FROM ' + TableName +
' WHERE NOT ' + FieldIsDeleted + '=true;';
MyResult.CommandType := cmdText;
MyResult.Open;
MyResult.First;
while not MyResult.Eof do
begin
Self.AddToList(MyList, MyResult);
MyResult.Next;
end;
FreeAndNil(MyResult);
Self.CloseDatabase;
Result := true;