FreeMem D2009 und FastMM

[EWeiss]

Zitat:

Das ist doch richtig so?

Vielleicht denke ich in einer anderen Perspektive..

Bei D2006 wäre es Richtig wenn man
function CopyFileA; external kernel32 name 'CopyFileA'; verwenden würde
function CopyFileW; external kernel32 name 'CopyFileW'; und dieses um Unicode zeichen darzustellen.


function CopyFile; external kernel32 name 'CopyFileW'; wäre dann total überflüssig.

Meine Meinung..
Die Funktionen sind so definiert Doppelt gemoppelt.
Ein cast von einem cast.

So kannst du auch nicht sagen!

Zitat:

CopyFile wäre eh falsch, denn dieses will einen PChar.

Denn es erwartet kein PChar sondern ein PWideChar.
Wäre also beides richtig, wohlgemerkt unter D2009 nicht unter D2006


gruss

[himitsu]

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;

[EWeiss]

Zitat von himitsu:

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;

Jo
Und Danke für deine Ausführungen.

gruss