Code: Select all
Edita:
Gui, Submit, NoHide
Row := A_EventInfo
LV_GetText(observ, Row ,7)
LV_GetText(ids, Row, 2)
GuiControl, , Edit01, % observ
LV_GetText(Unida, Row,1)
if (A_GuiEvent = "DoubleClick")
{
Row := A_EventInfo
Col := LV_SubitemHitTest(LV1)
LV_GetText(result, Row, Col)
;~ MsgBox, , , %result% `nLinha = %Row%`nColuna = %Col%
gui, Edita:destroy
GuiConfig.Cores("Edita")
Gui, Edita:font, S10
Gui, Edita:Add, Edit, x22 y19 w950 h560 vOB,
Gui, Edita:Add, Text, x22 y609 w130 h50 cWhite Center Border, Horário de Abertura dos Portões:
Gui, Edita:Add, Edit, x152 y609 w300 h50 vAbre,
Gui, Edita:Add, Text, x22 y679 w130 h50 cWhite Center Border, Horário de Fechamento dos Portões:
Gui, Edita:Add, Edit, x152 y679 w300 h50 vFecha,
Gui, Edita:Add, Text, x492 y609 w130 h50 cWhite Center Border, Centrais que Perde a hora:
Gui, Edita:Add, Edit, x622 y609 w350 h50 vCentral,
Gui, Edita:Add, Text, x492 y680 w130 h40 cWhite Center Border, Portão:
Gui, Edita:Add, Edit, x622 y679 w200 h40 vPortao,
Gui, Edita:Add, Button, x22 y779 w190 h50 gEdita1, Finalizar
Gui, Edita:Add, GroupBox, x3 y0 w975 h590 cWhite +Center, Observações
Loop % Array_Unid.count()
if(Array_Unid[A_Index].unidades=Unida)
u:=Array_Unid[A_Index].OBS
GuiControl, , OB, % u
MsgBox, , , % u
Gui, Edita:Show, w999 h847, Editor
return