ShellExecuteとxcopyでフォルダをコピーするには？

解決

酢 2007-08-20 22:43:18 No: 27448 IP: 192.*.*.*

環境は、Ｄｅｌｐｈｉ６、WindowsＸＰです。

コピー元 D:\test 1-----1 1.txt
                       1 2.txt

コピー先 G:\test 1-----空

があるとします。

下記を実行すると上手くいきません。
procedure TForm1.Button1Click(Sender: TObject);
VAR S:string;
begin
  s:= 'D:\test 1 G:\test 1';
  ShellExecute(handle,nil,PChar('C:\WINDOWS\system32\xcopy.exe'),
               PChar(S),nil,SW_NORMAL);
end;

s:= Chr(39)+'D:\test 1 G:\test 1'+Chr(39); でもだめでした。
s:= 'D:\test1 G:\test1'; のように空白がなければokですが、空白のあるホルダを
コピーしたいのです。
誰かお願いします。

編集削除

手に酢 2007-08-21 08:12:04 No: 27449 IP: 192.*.*.*

>誰かお願いします。
誰だろ
s := '"D:\てすと 1" "G:\てすと 1" /E /Y /F /I';

編集削除

酢 2007-08-21 22:10:36 No: 27450 IP: 192.*.*.*

手に酢さんありがとうございました。無事に解決出来ました。
まさかVB6のやり方とほぼ同じとは．とほほ．勉強になりました。

編集削除