[Creat0R]

HORRIBLE,

а откуда берутся данные, что я нажал на кнопку деления

Простая запись имени контроля...

Код:

$aOperations_Arr[$iUbound] = GUICtrlRead($nMsg, 1)

Тут где GUICtrlRead($nMsg, 1), используется дополнительный параметр (1), позволяющий считывать текст с элемента.
Просто в массив записываем этот текст, и когда делается подсчёт (Execute()), то соответствующая операция будет выполнена... да, если создать кнопку с другим именем, то подсчёт будет не корректный.

Kenwood3D

подсажите решение первой проблемы здесь

Оказывается в моей функции есть ошибка, а точнее неточность проверки ошибочности

Нужно в фунцию _ControlTab() добавить это перед Swith $sCommand...

Код:

If Not IsHWnd($hWnd) Then $hWnd = WinGetHandle($hWnd)
If Not WinExists($hWnd) Then Return SetError(1, 0, "")

По поводу решения, вот это у меня работает:

Код:

#include <ControlTab.au3>

$ConnPropTitle = 'Подключение по локальной сети'

_OpenConnProperties($ConnPropTitle)

WinWaitActive($ConnPropTitle)
ControlClick($ConnPropTitle, "", "Button1")

$PropTitle = "[REGEXPTITLE:Свойства:.*]"
WinWaitActive($PropTitle)

$Index = _ControlTab($PropTitle, "", "FindTab", "Дополн", 0, True)
_ControlTab($PropTitle, "", "TabSelect", $Index)

ControlCommand($PropTitle, "", "ListBox1", "SelectString", "Network Address")

Sleep(5000)

Func _OpenConnProperties($sConnName)
    Local $oShellApp = ObjCreate('shell.application')
    Local $oCP = $oShellApp.Namespace (3), $Item
    For $Item In $oCP.Items
        If $Item.name = 'Сетевые подключения' Then
            For $Item In $Item.Getfolder.Items
                If $Item.name = $sConnName Then $Item.InvokeVerb ('Сво&йства')
            Next
        EndIf
    Next
EndFunc

Как проверить наличие или отсутсвие флага

Код:

If BitAND(GUICtrlRead($Ctrl), $GUI_CHECKED) Then
   ....
EndIf

[Kenwood3D]

Creat0R,

Оказывается в моей функции есть ошибка, а точнее неточность проверки ошибочности Нужно в фунцию _ControlTab() добавить это перед Swith $sCommand... Код: If Not IsHWnd($hWnd) Then $hWnd = WinGetHandle($hWnd) If Not WinExists($hWnd) Then Return SetError(1, 0, "") »

Добавил. Не помогло. Также не работает по названиям закладок. Проверял на другом компе, тоже не хочет. Может чушь, а не может быть дело в стиях ХР?

ControlCommand($PropTitle, "", "ListBox1", "SelectString", "Network Address") »

Работает! Спасибо! :D

If BitAND(GUICtrlRead($Ctrl), $GUI_CHECKED) Then .... EndIf »

А вот тут не понял куда что. У меня галочка называется Button2. И как связать?

[Kenwood3D]

Вобщем, проверку наличия галочки выполнил, оказалось, простым способом

Код:

ControlCommand("Заголовок окна", "", "Button2", "IsChecked")

[Creat0R]

Kenwood3D,

Не помогло

Обычный пример работет?

Код:

#include <GUIConstants.au3>
#include <ControlTab.au3>

$GUI = GUICreate("ControlTab Demo")

GUICtrlCreateTab(0, 20)
$Tab_1 = GUICtrlCreateTabItem("Tab 1")
GUICtrlCreateLabel("Some Text", 10, 60)

$Tab_2 = GUICtrlCreateTabItem("Tab 2")
$Tab_3 = GUICtrlCreateTabItem("More Tab")

GUISetState()

For $i = 0 To _ControlTab($GUI, "", "GetTabsCount")-1
    MsgBox(0, "", "Zero-Based tab number [" & $i & "]: " & @LF & _ControlTab($GUI, "", "GetItemText", $i), 2)
    _ControlTab($GUI, "", "TabRight", 1)
Next

У меня галочка называется Button2

Я думал нужно проверить у аутоитовского GUI
Задача была не ясна.

[Maza Faka]

Creat0R

Зеркало

Ссылка битая, залей на slil.ru

[amel27]

Creat0R

Прикрепляю первую версию самодельной функции для копирования папок вместе с их содержимым... Две проблемы которые нужно решить: 1) Более точный подсчёт оставшегося до окончания копирования времени (мне кажтся у меня вообще неверный подсчёт, делал давно). 2) AVI-Анимация останавливается на время копирования большого файла - это можно было бы решить если создание всего GUI повесить на отдельный скрипт, но тогда будет висеть два процесса для одной задачи »

Думаю проблемы решаемы, но скрипт очень сырой и сначала нужно привести в порядок то что уже есть... к примеру файлы, вложенные в подкаталоги не копируются так как перед вызовом _FileCopyEx() нужно сначала создать структуру каталогов - CopyFileExA каталоги создавать не может... Функция _FileListToArrayEx() тоже работает странно - в такой ее реализации нет смысла в маске, так как она применяется к каталогам и тем самым отменяет поиск в подкаталогах, тут возможны варианты в зависимости от того что требуется от функции... Синхронизация копирования и обновления GUI тоже имхо слишком запутанна - одновременно применяются разные способы GUIGetMsg(), GUIGetCursorInfo(), GUIRegisterMsg() насколько это необходимо?... ну и по мелочам ... Кстати, замедление скрипта никак не связано с использованием CallBack, просто нет смысла обновлять GUI для каждого блока данных... имхо нужно либо ставить пропуски (по счетчику) либо обновлять ГУИ по таймеру.

[Creat0R]

Maza Faka,

залей на slil.ru

Слил - Но скоро перезалью, нашёл пару битых ссылок (в меню форума), а также нужно добавить пару фич.

amel27,

файлы, вложенные в подкаталоги не копируются

Странно, у меня всё копируется.

CopyFileExA каталоги создавать не может

Поэтому у меня _FileCopyEx() создаёт их по запросу

она применяется к каталогам и тем самым отменяет поиск в подкаталогах

У меня функция возвращает подкаталоги и файлы в них, использовал именно эту функцию т.к хотел обойти необходимость в рекурсии.

насколько это необходимо?

Эти строчки можно убрать:

Код:

$aCurInfo = GUIGetCursorInfo($hCopyProgrss_GUI)
If IsArray($aCurInfo) And $aCurInfo[2] = 1 And $aCurInfo[4] = $Cancel_Button Then ExitLoop

Это я забыл, они использовались раньше для определения отмены копирования.

нет смысла обновлять GUI для каждого блока данных

Он обновляется по необходимости, т.е файл копируется, и соответственно обновляются данные.

Мне интересно решить проблему с _GetTimeRemained(), я теперь уверен что моё “древнее” решение совсем неверно, подсчёт не должен происходить на основе количества копируемых файлов и определённом (зарание) уровне (для суммы файлов).

[Kenwood3D]

Обычный пример работет? »

Работает. Дело в том что у меня работают все команды ControlTab.au3, кроме тех, которые касаются текста - названия закладки. Т.е. не считывает название закладки и не переключает по названию, а остальные команды работают.

[Creat0R]

Kenwood3D,

кроме тех, которые касаются текста - названия закладки

Но в этом примере тоже задействована команда GetItemText, если она тут (с моим примером) работает, значит проблема где то в системе

[DImaN!]

Подскажите пожалейста Как можно растянуть и зафиксировать панель задач на две строки (желательно, чтобы квикланч оказался сверху, а открытые программы - снизу).