Te recomiendo leer la ayuda de AMS
Folder.Create pues tu duda de la carpeta no es complicada de resolver
Y en cuanto a la barra de progreso, no te compliques tanto la vida, usa
StatusDlg.Show
-- Get the path to the user's My Documents folder.
DestFolder = Shell.GetFolder(SHF_MYDOCUMENTS);
-- Create a folder in the user's My Documents folder called "Copied Files".
Folder.Create(DestFolder.."\\Copied Files");
--Copy all files within the Docs folder on the CD-ROM to the destination.
StatusDlg.Show(MB_ICONNONE, false);
File.Copy("AutoPlay\\Docs\\*.*", DestFolder.."\\Copied Files\\", true, true, false, true, nil);
-- Check to see if the File.Copy action failed by getting it's error code.
error = Application.GetLastError();
StatusDlg.Hide();
-- If it failed (not equal to 0), display a dialog informing the user.
-- If it succeeded, open an explore window showing the "Copied Files" folder.
if error ~= 0 then
result = Dialog.Message("Error", "There was an error copying the files to your system. Please try again.", MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
else
Shell.Execute(DestFolder.."\\Copied Files", "explore", "", "", SW_SHOWNORMAL);
end
AMS Help escribió: _ProgramFilesFolder
The user's Program Files folder (typically, this is something like "C:\Program Files").
Global Variables