Серый форум — AHK: Как сложить данные ячеек

Re: AHK: Как сложить данные ячеек

null@example.com (Indomito) — Wed, 04 Jul 2012 01:56:18 +0000

tiim посмотри "в сторону" AutoIt он наиболее, как мне кажется, тебе подойдёт, т.к. он немного схож с AHK, а его методы более стандартизированы - я про декларирование переменных например. AutoIt — Википедия

Re: AHK: Как сложить данные ячеек

null@example.com (tiim) — Tue, 03 Jul 2012 22:51:21 +0000

Indomito, обязательно попробую PascalABC.NET, VBS, AutoIt (правда когда буду чуток свободнее) . Я просто думал, что AHK самый простой язык.....

Re: AHK: Как сложить данные ячеек

null@example.com (Indomito) — Tue, 03 Jul 2012 07:44:01 +0000

-off
tiim просто название скриптового языка AutoHotkey говорит само за себя... ну я бы не стал учится программированию на нём, есть более простые решения твоей цели.
Согласен, что Microsoft VS это монстр (мягко сказано), но есть например PascalABC.NET, VBS, AutoIt (если нравятся скриптовые языки)... список большой, простых и полнофункциональных (ну почти) языков.
IMHO

Re: AHK: Как сложить данные ячеек

null@example.com (tiim) — Tue, 03 Jul 2012 07:20:58 +0000

Indomito, я просто пытаюсь разобраться в каком-то простом языке программирования, чтобы иногда по мере необходимости писать легкие программки для себя.
Правда в последнее время напряженка со свободным временем...

Re: AHK: Как сложить данные ячеек

null@example.com (Indomito) — Tue, 03 Jul 2012 04:13:04 +0000

tiim пишет:

Этот скрипт я пытаюсь сделать для того чтобы понять как можно программировать в AHK...

можно уточнить?

Как писать скрипты АНК?
или
Как в AHK использовать GUI?

Если ты хорошо разобрался в AHK, то можно переходить к граф. интерфейсу пользователя, а если пытаешься перепрыгнуть...
В AHK GUI реализован не на 100% к желаемому, проще использовать например Microsoft VS 2010 Pro., меньше будет головной боли - IMHO.

P.S. Для каждого языка/инструмента своя цель - весьма оправданная.

Re: AHK: Как сложить данные ячеек

null@example.com (teadrinker) — Mon, 02 Jul 2012 19:57:18 +0000

Не совсем понял задачу, но вот пример смены списка ComboBox в зависимости от выбранного в DropDownList:

Gui, Add, DDL, vDDL gDDL, 1||2|3
Gui, Add, ComboBox, vComboBox, A||B|C
Gui, Show
return

DDL:
   Gui, Submit, NoHide

   if DDL = 1
      NewCombo = A||B|C
   else if DDL = 2
      NewCombo = D||E|F
   else if DDL = 3
      NewCombo = G||H|I
   
   GuiControl,, ComboBox, % "|" NewCombo
   return

Re: AHK: Как сложить данные ячеек

null@example.com (tiim) — Sat, 30 Jun 2012 14:40:24 +0000

Этот скрипт я пытаюсь сделать для того чтобы понять как можно программировать в AHK. Скрипт из себя представляет таблицу. Верхние выпадающие списки предназначены для выбора варианта решения.
у меня почему-то в списке Combobox значение не изменяется после того как его выберешь. А в остальном вроде разобрался....

Re: AHK: Как сложить данные ячеек

null@example.com (teadrinker) — Thu, 28 Jun 2012 12:25:32 +0000

tiim пишет:

Методом проб и ошибок накатал кое-что:):

Напиши, как пользоваться данным скриптом, что куда записывать, и что и где должно появляться.

Re: AHK: Как сложить данные ячеек

null@example.com (tiim) — Thu, 28 Jun 2012 07:40:02 +0000

Ну вроде все предложения начинаются с большой буквы, а в конце точка . Почему никто не отвечает?:(

Re: AHK: Как сложить данные ячеек

null@example.com (teadrinker) — Wed, 16 May 2012 08:55:08 +0000

tiim, не забываем:

Предложения должны начинаться с большой буквы и заканчиваться точкой.

Re: AHK: Как сложить данные ячеек

null@example.com (tiim) — Wed, 16 May 2012 00:44:00 +0000

Методом проб и ошибок накатал кое-что:):

SetFormat, float, 0.2 ; Количество нолей после точки
Gui, +Resize  
Gui, Add, Edit, x106 y119 w90 h20 gRes vA, 
Gui, Add, Edit, x106 y149 w90 h20 gRes vB, 
Gui, Add, Edit, x106 y179 w90 h20 vC,
Gui, Add, DropDownList, x106 y29 w90 h21 r2 vPower gRes, Р_акт||Р_реакт|
Gui, Add, DropDownList, x106 y59 w90 h21 r2 vFormula gRes, Формула1||Формула2|
Gui, Add, DropDownList, x106 y89 w90 h21 r2 vVariant gRes, Решение1||Решение2|
Gui, Add, ComboBox, x106 y209 w90 h21 r6 vItog gRes, Итог1|Итог2|Итог3|Итог4|Итог5|Итог6|
Gui, Add, Edit, x106 y239 w90 h21 vResult,
; Generated using SmartGUI Creator 4.0
Gui, Show, x144 y91 h318 w308, New GUI Window
Return

GuiClose:
ExitApp

return

Res:
gui, submit, nohide
If (Formula="Формула1" and Power="Р_акт" and Variant="Решение1")
{C:=A+B
    C1:=A+B
    C2:=(A+B)*0.1
    guicontrol,,Itog, |%C1%||%C2%
    R4:=Itog/100
    guicontrol,,Result, %R4%
    }
If (Formula="Формула2" and Power="Р_акт")
{C:=A-B
    C1:=A-B
    C2:=(A-B)*10
    guicontrol,,Itog, |%C1%||%C2%
    }
If (Formula="Формула1" and Power="Р_реакт")
    {C:=A/B
    C1:=A/B
    C2:=(A/B)*100
    guicontrol,,Itog, |%C1%||%C2%
    }
If (Formula="Формула2" and Power="Р_реакт")
{C:=B/A
    C1:=B/A
    C2:=(B/A)*1000
    guicontrol,,Itog, |%C1%||%C2%
}
guicontrol,,C, %C%


return

Только вот не пойму почему в combobox не меняется значение.

Re: AHK: Как сложить данные ячеек

null@example.com (tiim) — Tue, 15 May 2012 12:51:19 +0000

Вот что мне нужно сделать, так навероное понятнее будет:

SetFormat, float, 0.2 ; Количество нолей после точки
Gui, Add, Edit, x106 y119 w90 h20 gRes vA, 
Gui, Add, Edit, x106 y149 w90 h20 gRes vB, 
Gui, Add, Edit, x106 y179 w90 h20 vC,
Gui, Add, DropDownList, x106 y29 w90 h21 r2 vPower gRes, Р_акт|Р_реакт|
Gui, Add, DropDownList, x106 y59 w90 h21 r2 vFormula gRes, Формула1|Формула2|
Gui, Add, DropDownList, x106 y89 w90 h21 r2 vVariant gRes, Решение1|Решение2|
Gui, Add, ComboBox, x106 y209 w90 h21 r6 vItog, Итог1|Итог2|Итог3|Итог4|Итог5|Итог6|
Gui, Add, Edit, x106 y239 w90 h21 vResult,
; Generated using SmartGUI Creator 4.0
Gui, Show, x144 y91 h318 w308, New GUI Window
Return

GuiClose:
ExitApp

return

Res:
gui, submit, nohide
If (Formula="Формула1" and Power="Р_акт" and Variant="Решение1")
{C:=A+B
    C1:=A+B
    C2:=(A+B)*0.1
    guicontrol,,Itog, |%C1%||%C2%
    }
If (Formula="Формула2" and Power="Р_акт")
{C:=A-B
    C1:=A-B
    C2:=(A-B)*10
    guicontrol,,Itog, |%C1%||%C2%
    }
If (Formula="Формула1" and Power="Р_реакт")
    {C:=A/B
    C1:=A/B
    C2:=(A/B)*100
    guicontrol,,Itog, |%C1%||%C2%
    }
If (Formula="Формула2" and Power="Р_реакт")
{C:=B/A
    C1:=B/A
    C2:=(B/A)*1000
    guicontrol,,Itog, |%C1%||%C2%
}
guicontrol,,C, %C%


return

Re: AHK: Как сложить данные ячеек

null@example.com (tiim) — Mon, 14 May 2012 14:40:51 +0000

Irbis, совершенно верно....выделил блоки и все работает....
А подскажите каким образом выбранное значение в Combobox использовать для дальнейших расчетов в формуле Cobmobox/100 и результат вывести в новом редактируемом поле ввода Edit.

Re: AHK: Как сложить данные ячеек

null@example.com (Irbis) — Mon, 14 May 2012 11:26:08 +0000

В скрипте не разбирался ,но навскидку видно, что блоки if... if... нужно выделять

If (Formula="Формула2" and Power="Р_реакт")
{
    C:=B/A
    C1:=B/A
    C2:=(B/A)*1000
    guicontrol,,Itog, |%C1%|%C2%
}

(AHK не поддерживает Python-style выделения блоков отступами, а жаль... Есть мысль поработать над этим, но нужно время )

Re: AHK: Как сложить данные ячеек

null@example.com (tiim) — Mon, 14 May 2012 09:43:23 +0000

teadrinker, извиняюсь за не совсем понятный вопрос, как оказывается не всегда просто объяснить то что хочешь сделать:). То, что мне было нужно написал InFlames. В этом коде я попытался добавить еще одно условие:

SetFormat, float, 0.2 ; Количество нолей после точки
Gui, Add, Edit, x106 y119 w90 h20 gRes vA, 
Gui, Add, Edit, x106 y149 w90 h20 gRes vB, 
Gui, Add, Edit, x106 y179 w90 h20 vC,
Gui, Add, DropDownList, x106 y29 w90 h21 r2 vPower, Р_акт|Р_реакт|
Gui, Add, DropDownList, x106 y59 w90 h21 r2 vFormula gRes, Формула1|Формула2|
Gui, Add, DropDownList, x106 y89 w90 h21 r2, Решение1|Решение2|
Gui, Add, ComboBox, x106 y209 w90 h21 r6 vItog, Итог1|Итог2|Итог3|Итог4|Итог5|Итог6|
; Generated using SmartGUI Creator 4.0
Gui, Show, x144 y91 h318 w308, New GUI Window
Return

GuiClose:
ExitApp

return

Res:
gui, submit, nohide
If (Formula="Формула1" and Power="Р_акт")
              C:=A+B
    C1:=A+B
    C2:=(A+B)*0,1
    guicontrol,,Itog, |%C1%|%C2%
If (Formula="Формула2" and Power="Р_акт")
              C:=A-B
    C1:=A-B
    C2:=(A-B)*10
    guicontrol,,Itog, |%C1%|%C2%
If (Formula="Формула1" and Power="Р_реакт")
              C:=A/B
    C1:=A/B
    C2:=(A/B)*100
    guicontrol,,Itog, |%C1%|%C2%
If (Formula="Формула2" and Power="Р_реакт")
    C:=B/A
    C1:=B/A
    C2:=(B/A)*1000
    guicontrol,,Itog, |%C1%|%C2%

guicontrol,,C, %C%


return

Что-то не пойму как сделать так, чтобы в зависимости от выбранных значений Power и Formula в ComboBox попадали результаты вычислений. Данный код заносит в ComboBox вычисление по самым нижним формулам С1:=B/A, C2:=(B/A)*1000.