Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Вставка прогресс бара в функцию

Ответить
Настройки темы
Вставка прогресс бара в функцию

Аватара для Medic84

$AutoITer


Автор проектов


Сообщения: 446
Благодарности: 44

Профиль | Отправить PM | Цитировать


Имеется функция и в нее нужно вставить прогресс бар, и что бы действительно отображал процесс копирования
GUI построен так
Код: Выделить весь код
$progress = GUICtrlCreateProgress(10,300,260,50)
Код: Выделить весь код
Func Restore_Proc()
    DirCopy(GUICtrlRead($A1), GUICtrlRead($A2), 1)
    Run("Regedit.exe /s " & GUICtrlRead($A1) & "\key.reg")
EndFunc
Всю программу я не стал выкладывать, т.к. она объемная...

-------

AutoIT Русское сообщество| Моя лаборатория


Отправлено: 22:55, 03-06-2009

 

Аватара для Creat0R

Must AutoIt


Сообщения: 3054
Благодарности: 1009

Профиль | Сайт | Отправить PM | Цитировать


Цитата Medic84:
хочется что бы можно было Эту папку архивировать и вынимать из архива »
А при чём тут прогресс копирования?

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

http://creator-lab.ucoz.ru/Images/Icons/autoit_icon.png Русское сообщество AutoIt | http://creator-lab.ucoz.ru/Images/Ic...eator_icon.png CreatoR's Lab | http://creator-lab.ucoz.ru/Images/Icons/oac_icon.png Opera AC Community


Отправлено: 14:58, 04-06-2009 | #11



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Аватара для Medic84

$AutoITer


Автор проектов


Сообщения: 446
Благодарности: 44

Профиль | Отправить PM | Цитировать


Просто я когда создавал осознавал что архивирование мне не осилить... Поэтому начал спрашивать про копирование.

P.S. А как правильно написать. Мне нужно что бы программа проверила Путь в GUICtrlRead($A2) и если в нем нет папки \players, то выводит ошибку
Так не работает
Код: Выделить весь код
If Not FileExists(GUICtrlRead($A2)&"\players") Then Return SetError(1, 0, -1)

-------

AutoIT Русское сообщество| Моя лаборатория


Последний раз редактировалось Medic84, 04-06-2009 в 17:07.


Отправлено: 15:17, 04-06-2009 | #12


Аватара для Creat0R

Must AutoIt


Сообщения: 3054
Благодарности: 1009

Профиль | Сайт | Отправить PM | Цитировать


Цитата Medic84:
Поэтому начал спрашивать про копирование. »
И это является офтопиком.
Архивирование можно осуществить через консольную программу 7zip. Ну или через COM-объект - Zip UDF.

Цитата Medic84:
Так не работает »
Что именно тут не работает?
Можно ещё так проверить:

Код: Выделить весь код
If Not StringInStr(FileGetAttrib(GUICtrlRead($A2) & "\players"), "D") Then Return SetError(1, 0, -1)
Это для надёжности, иначе при наличии файла (не папки) с именем player (без расширения) тоже будет определена ошибка.

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

http://creator-lab.ucoz.ru/Images/Icons/autoit_icon.png Русское сообщество AutoIt | http://creator-lab.ucoz.ru/Images/Ic...eator_icon.png CreatoR's Lab | http://creator-lab.ucoz.ru/Images/Icons/oac_icon.png Opera AC Community


Отправлено: 16:51, 04-06-2009 | #13


Аватара для Medic84

$AutoITer


Автор проектов


Сообщения: 446
Благодарности: 44

Профиль | Отправить PM | Цитировать


Разобрался сам. И наверное последний вопрос. Уже 2 час бьюсь об это. Расскажу на русском языке.
При отсутствии папки \player msgbox выдает сообщение

Код: Выделить весь код
If Not FileExists($Folder) Then MsgBox(4112,"Error", "Указана неверная папка!")
Но процесс продолжается. Не знаю еще как сделать. Думал поставить после

Код: Выделить весь код
MsgBox(4112,"Error", "Указана неверная папка!")And EndFunc
Не проходит...

-------

AutoIT Русское сообщество| Моя лаборатория


Отправлено: 17:06, 04-06-2009 | #14


Аватара для Medic84

$AutoITer


Автор проектов


Сообщения: 446
Благодарности: 44

Профиль | Отправить PM | Цитировать


Все! Спасибо Creat0R, я все сделал. Если хочешь посмотреть на программу, напиши сдесь. Я выложу.

-------

AutoIT Русское сообщество| Моя лаборатория


Отправлено: 20:50, 04-06-2009 | #15


Аватара для Creat0R

Must AutoIt


Сообщения: 3054
Благодарности: 1009

Профиль | Сайт | Отправить PM | Цитировать


Цитата Medic84:
Не проходит »
Эм... вот для того чтобы не гадать (проходит не проходит), справка по AutoIt и была написана .

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

http://creator-lab.ucoz.ru/Images/Icons/autoit_icon.png Русское сообщество AutoIt | http://creator-lab.ucoz.ru/Images/Ic...eator_icon.png CreatoR's Lab | http://creator-lab.ucoz.ru/Images/Icons/oac_icon.png Opera AC Community


Отправлено: 21:22, 04-06-2009 | #16


Аватара для Medic84

$AutoITer


Автор проектов


Сообщения: 446
Благодарности: 44

Профиль | Отправить PM | Цитировать


Ан нет. Не последний. Как вызвать окно выбора папок? Как вызвать выбор файлов знаю, а папок нет.

Код: Выделить весь код
$file = FileOpenDialog("Выберите файл...",@ProgramFilesDir,"Zip (*.Zip)")
- Вызов диалога Open

-------

AutoIT Русское сообщество| Моя лаборатория


Отправлено: 10:38, 05-06-2009 | #17


Аватара для Medic84

$AutoITer


Автор проектов


Сообщения: 446
Благодарности: 44

Профиль | Отправить PM | Цитировать


Аааа.. Что здесь не так??? Уже все волосы на голове выдергал!

Код: Выделить весь код
$A1=GuiCtrlCreateInput("G:\Bakcup", 10, 180, 230, 20)
$A2=GuiCtrlCreateInput("G:\Call of Duty 4 - Modern Warfare\players", 10, 220, 230, 20)
Цитата:
Case $Button_A1
$Folder1 = FileSelectFolder("Выберите папку", "")
StringReplace($Folder1,"G:\Bakcup", $A1)
Case $Button_A2
$Folder2 = FileSelectFolder("Выберите папку", "")
StringReplace($Folder2,"G:\Call of Duty 4 - Modern Warfare\players", $A2)
Новый заданный путь не прописывается в Input!

-------

AutoIT Русское сообщество| Моя лаборатория


Отправлено: 12:45, 05-06-2009 | #18


Аватара для SyDr

Старожил


Сообщения: 215
Благодарности: 62

Профиль | Отправить PM | Цитировать


Естественно.

StringReplace($Folder1,"G:\Bakcup", $A1)
Означает, прочесать строку $Folder1 на наличие в ней "G:\Bakcup" и если оно там есть - заменить на $A1

GUICtrlSetData ( $A1, $Folder1) вместо этого следует использовать

И ещё. Советую проверять. Вдруг в окне выбора папки нажата отмена.

-------

"Что мы думаем, знаем или во что верим в конце концов не так уж и важно.
Важно лишь то, что мы делаем."
Джон Раскин

Это сообщение посчитали полезным следующие участники:

Отправлено: 15:08, 05-06-2009 | #19


Аватара для Creat0R

Must AutoIt


Сообщения: 3054
Благодарности: 1009

Профиль | Сайт | Отправить PM | Цитировать


Medic84,
Не надо всё кидать в кучу, есть вопросы разной тематики - создавайте соответственно новые темы (убедившись что подобной темы ещё нет).

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

http://creator-lab.ucoz.ru/Images/Icons/autoit_icon.png Русское сообщество AutoIt | http://creator-lab.ucoz.ru/Images/Ic...eator_icon.png CreatoR's Lab | http://creator-lab.ucoz.ru/Images/Icons/oac_icon.png Opera AC Community


Отправлено: 15:30, 05-06-2009 | #20



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Вставка прогресс бара в функцию

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
[решено] [PHP] Прогресс-бар (счетчик игроков) D_Master Вебмастеру 3 27-03-2009 18:41
[решено] Прогресс бар semiono AutoIt 17 24-03-2009 23:18
вставка jpg kozerogg Хочу все знать 2 04-10-2004 14:28
Подскажите функцию в C++ dimakus Программирование и базы данных 2 01-04-2004 14:57
Отключить функцию. Simich Непонятные проблемы с Железом 14 04-07-2003 16:14




 
Переход