Forum: Win32/Win64 API (native code)
Delphi
by Orakel-von-Delphi,
12. Okt 2005
Schon klar, aber dann musste man erst einmal auf einen Blick erkennen, dass beide miteinander verbunden sind. Der Explorer klärt einen über diese Tatsache erst bei dem Versuch, die Datei od. den Ordner umzubenennen, auf.
Und der Explorer, xcopy etc. kopieren ja auch ohne zu meckern ...
Forum: Win32/Win64 API (native code)
Delphi
by Orakel-von-Delphi,
12. Okt 2005
@Olli: Since try, aber auch mit Deinem Coding tritt der Fehler noch auf.
Ich konnte mir auch nicht vorstellen, dass nur wg. dem Unterschied signed/unsigned der Fehler in Erscheinung tritt, da die Länge der Variablen gleich ist :)
Ich bitte oben noch mal genau zu lesen: Das Problem tritt nicht immer auf ! Aber immer beim letzten Kopiervorgang mit über 100 Dateien und ca. 6.5 MB. Die...
Forum: Win32/Win64 API (native code)
Delphi
by Orakel-von-Delphi,
12. Okt 2005
@Olli:
FromBuf und ToBuf ist in der ursprünglichen Variante verwendet worden (array of char).
@mirage228:
Ich weiß, dass ich keine Mappings verwende. War auch nur ein Versuch, aber der Fehler tritt mit oder ohne SHFreeNameMappings auf :(
Forum: Win32/Win64 API (native code)
Delphi
by Orakel-von-Delphi,
12. Okt 2005
Danke für den Tipp, aber
der Buffer wurde bereits initialisiert
Fillchar(shellinfo, Sizeof(shellinfo), 0 );
und die statischen Variablen habe ich entfernt
with shellinfo do
begin
Forum: Win32/Win64 API (native code)
Delphi
by Orakel-von-Delphi,
2. Jun 2005
.
.
function CopyDir(DirFrom, DirTo: string; Flags : integer = 0; bErrorHandler : boolean = True) : integer;
var
shellinfo: TSHFileOpStruct;
FromBuf, ToBuf : Array of char;
begin
If Not DirectoryExists(DirTo) Then
begin