Problem mit Copy(aclass)...

[himitsu]

in deinem Fall reicht vermutlich schon

Delphi-Quellcode:

function TDatabaseConnector.CreateDatabase(Name: TDatabaseName): boolean;
var tmp:TDatabase;
begin
  try
    tmp:=TDatabase.Create(Name);
  except
    result:=false;
    exit;
  end;
  _Database:=tmp;
  result:=SaveDatabase;
end;

oder einfach nur, denn tritt im Constructor eine Exception auf, wird der Variable nix zugewiesen

Delphi-Quellcode:

function TDatabaseConnector.CreateDatabase(Name: TDatabaseName): boolean;
begin
  try
    _Database := TDatabase.Create(Name);
    result:=SaveDatabase;
  except
    result:=false;
  end;
end;

ansonsten mehr so

Delphi-Quellcode:

tmp := ...;
_Database := TDatabase.Create;
_Databate.Assigned(tmp);
tmp.Free;