Delphi-Quellcode:
// der Fehler liegt hier
pFrom := PChar(fromDir + #0);
Was passiert da?
Delphi erzeugt einen neuen temporären String mit dem Inhalt fromDir+#0.
Dieser temporäre String wird ungültig ab der nächsten Zeile.
Der Zeiger pFrom zeigt also auf ungültige Daten.
Zu guter Letzt kommt der Aufruf von ShFileOperation.
Jetzt hängt es vom Zufall ab, bzw. von Dingen, die man als Programmierer nicht beeinflussen kann,
ob der Speicherblock auf den der Zeiger verweist noch intakt ist oder nicht.
Die Lösung des Problems ist eine Zwischenvariable:
Delphi-Quellcode:
var
fromDir_mit_null : string;
....
fromDir_mit_null := fromDir + #0;
pFrom := PChar(fromDir_mit_null);
Falls du den defekten Code hier von der
DP kopiert hast, bitte melden,
damit nicht noch mehr Leute darauf reinfalllen.