Форум » [x]Harbour » WVT , GET (Checkbox , Listbox , RadioGroup) » Ответить
WVT , GET (Checkbox , Listbox , RadioGroup)
Dima: Есть у кого то готовое что бы не сочинять свое ? Нужен аналог или что то похожее для WVT терминала. PS Xharbour 1.1
Ответов - 3
Andrey: Dima пишет: Есть у кого то готовое что бы не сочинять свое ? А в самом \xHarbour\contrib\wvtgui разве такого нет ?
Dima: упс.......торможу В простом примере работает конструкция типа GET CHECKBOX а в проге нет (чекбокс не отображается на экране) Буду разбираться...
Dima: Разобрался. Если Set Cons off тогда CHECKBOX и остальные навороты не работают в WVT Пример [pre2] #include "hbgtinfo.ch" Proc main() local c:=" " local lx:=.f. set cons off // если закоментировать то CHECKBOX работает setcolor("w/n") cls Setcursor(1) @ 10,10 say "TEST1" color "gr+/n" get c color "n/w" @ 11, 10 say "TEST2" GET lx CHECKBOX color 'w/b+,w/b,w+/r,w/g+' read return PROCEDURE HB_GTSYS() REQUEST HB_GT_WVT RETURN [/pre2]
полная версия страницы