Отправлено: 03.01.13 18:44. Заголовок: WVT , GET (Checkbox , Listbox , RadioGroup)

Есть у кого то готовое что бы не сочинять свое ?
Нужен аналог или что то похожее для WVT терминала.


PS
Xharbour 1.1

 Отправлено: 04.01.13 12:33. Заголовок: Dima пишет: Есть у ..

Dima пишет:

цитата:

Есть у кого то готовое что бы не сочинять свое ?

А в самом \xHarbour\contrib\wvtgui разве такого нет ?

 Отправлено: 04.01.13 13:07. Заголовок: упс.......торможу..

упс.......торможу

В простом примере работает конструкция типа GET CHECKBOX а в проге нет (чекбокс не отображается на экране)
Буду разбираться...

 Отправлено: 04.01.13 16:03. Заголовок: Разобрался. Если Se..

Разобрался.
Если Set Cons off тогда CHECKBOX и остальные навороты не работают в WVT

Пример

 
 #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