Funktioniert überall und in jedem Delphi und nutzt das, was man standardmäßig in der
VCL vorfindet:
Delphi-Quellcode:
procedure Kopieren(Src, Dest: String);
begin
CopyFile(PChar(Src), PChar(Dest));
end;
CopyFile(PChar(SrcEdit.Text), PChar(DestEdit.Text));
Das ist dagegen überall
ANSI und genauso geht es mit dem
Unicode,
egal ob Delphi 7 oder Delphi XE:
Delphi-Quellcode:
procedure Kopieren(Src, Dest: AnsiString);
begin
CopyFileA(PAnsiChar(Src), PAnsiChar(Dest));
end;