AlexxxMksv
Новичок
- Сообщения
- 39
- Репутация
- 0
Помогите исправить глюк, в этой проге программно добавляю 19 кнопок, для этого опускаю на 12 кнопке, например, бегун Scrollbar вниз и там оставляю, после этого меняю размер окна и кнопки наезжают друг на друга. в чем ошибка?
Код:
#Include <GuiScroll.au3>
$i=1
$GUI = GUICreate("",1000,500, -1, -1,$WS_OVERLAPPEDWINDOW)
$iBar = Scrollbar_Create($GUI, $SB_VERT, 635)
Scrollbar_Step(35, $GUI, $SB_VERT)
$Boot = GUICtrlCreateButton("Добавить",800,180,100,20)
GUISetState()
While 1
$Element = GUIGetMsg()
Switch $Element
Case $GUI_EVENT_CLOSE
Exit
Case $Boot
$Pos = Scrollbar_GetPos($GUI, $SB_VERT)
GUICtrlCreateButton($i,5,(35*$i)-$Pos,30,30)
;~ GUICtrlSetResizing(-1, $GUI_DOCKALL)
$i += 1
EndSwitch
WEnd