Автор | Сообщение |
|
| |
Пост N: 483
Зарегистрирован: 17.06.10
|
|
Отправлено: 16.12.16 16:51. Заголовок: Стандартное окно копирования
Добрый вечер ! Как вызвать стандартное окно копирования в Windows ?
|
|
|
Ответов - 7
[только новые]
|
|
|
| |
Пост N: 6207
Зарегистрирован: 17.05.05
|
|
Отправлено: 16.12.16 16:53. Заголовок: просто погуглил http..
|
|
|
|
| |
Пост N: 484
Зарегистрирован: 17.06.10
|
|
Отправлено: 16.12.16 17:02. Заголовок: Ну видел я это и чег..
Ну видел я это и чего ?
|
|
|
|
| |
Пост N: 6208
Зарегистрирован: 17.05.05
|
|
Отправлено: 16.12.16 17:16. Заголовок: Что то тут терли есл..
|
|
|
|
| |
Пост N: 6209
Зарегистрирован: 17.05.05
|
|
Отправлено: 16.12.16 17:24. Заголовок: + возможно это core-..
+ возможно это core-master\contrib\hbwin\tests\shfileop.prg
|
|
|
|
| постоянный участник
|
Пост N: 1375
Зарегистрирован: 09.10.06
|
|
Отправлено: 16.12.16 19:09. Заголовок: fil пишет: Ну виде..
fil пишет: Наверное, Дима имел в виду что using Microsoft.VisualBasic.FileIO; class FileProgress { static void Main() { // Specify the path to a folder that you want to copy. If the folder is small, // you won't have time to see the progress dialog box. string sourcePath = @"C:\Windows\symbols\"; // Choose a destination for the copied files. string destinationPath = @"C:\TestFolder"; FileSystem.CopyDirectory(sourcePath, destinationPath, UIOption.AllDialogs); } } эквивалентно PROCEDURE main LOCAL fso LOCAL sourcePath, destinationPath := "C:\TestFolder" LOCAL overwrite := .F. fso := win_oleCreateObject( "Scripting.FileSystemObject" ) IF fso != NIL sourcePath := fso:GetFolder( "C:\Windows\symbols\" ) sourcePath:Copy( destinationPath, overwrite ) или fso:CopyFolder( "C:\Windows\symbols\", destinationPath, overwrite ) или (ближе к теме вопроса) fso:CopyFile( "c:\mydocuments\letters\*.doc", "c:\tempfolder\", .T. ) ENDIF
|
|
|
|
| |
Пост N: 485
Зарегистрирован: 17.06.10
|
|
Отправлено: 17.12.16 13:48. Заголовок: Спасибо, Петр ! Все ..
Спасибо, Петр ! Все копирует, одако делает это втемную и красивого виндового диалога я не увидел
|
|
|
|
| постоянный участник
|
Пост N: 1381
Зарегистрирован: 09.10.06
|
|
Отправлено: 17.12.16 14:36. Заголовок: fil пишет: Все коп..
fil пишет: цитата: | Все копирует, одако делает это втемную и красивого виндового диалога я не увидел |
| Это да. Для показа диалога нужно воспользоваться второй третьей подсказкой от Димы и заюзать win_SHFileOperation (надстройка над SHFileOperation)
|
|
|
|