Problem mit Copy(aclass)...

[Teekeks]

Hallo!
Ich habe ein Problem.
Folgende Situation ist gegeben:

Delphi-Quellcode:

function TDatabaseConnector.CreateDatabase(Name: TDatabaseName): boolean;
var tmp:TDatabase;
begin
  result:=true;
  try
    tmp:=TDatabase.Create(Name);
  except
    result:=false;
    exit;
  end;
  _Database:=Copy(tmp);//hier tritt der Fehler auf...
  result:=SaveDatabase;
end;

// TDatabase:
  TDatabase=class
  private
  public
    constructor Create(Name:TDatabaseName);
    destructor Destroy; override;
    _Tables:TTableArray;
    _Name:TDatabaseName;
    function AddTable(Name:TTableName; Rows:TRowArray):boolean;
  end;

Der Fehler den ich kriege lautet so:

Zitat:

Wrong number of parameters specifed for call to "$fpc_shortstr_copy"

Ich nehme man an er würde denken das ich das String-Copy nehmen will, dem ist aber nicht so.
Ich will das Copy für Classen!

Weis jemand was ich falsch gemacht habe?

gruß Teekeks