klasör kopyalama

[delphikursu]

ben klasör kopyalama yapım ama 8 karektere gememesi lazım bende program files kopyalayaçağım kopyala dedğimde hata veriyor kullandığım kod

function CopyDir(const fromDir, toDir: string): Boolean;
var
fos: TSHFileOpStruct;
begin
ZeroMemory(@fos, SizeOf(fos));
with fos do
begin
wFunc := FO_COPY;
fFlags := FOF_FILESONLY;
pFrom := PChar(fromDir + #0);
pTo := PChar(toDir)
end;
Result := (0 = ShFileOperation(fos));
end;

[serkan]

sorunda bazı harfleri yanlış veya eksik yazdığın için tam olarak ne istediğini çıkartamadım edit leyim tekrar gönderirsen sorunu daha yardımcı olabilir arkadaşlar diye düşünüyorum.

[rsimsek]

Klasör isimlerinde boşluklar varsa sorun olabilir. O yüzden parametreleri gönderirken başında ve sonunda " (çift tırnak) ekleyip gönder. (İki adet tek değil )