FiveTech Software tech support forums

... 65535, ) oCheck:SetFont( oFont ) @ 70, 50 RADIO oRadio VAR nOption OF oDlg ; ITEMS "&One", "&Two", "T&hree" _3D SIZE 50, 12 PIXEL ; HELPID 100, 101, 102 ; ON CHANGE MsgBeep() AEval( oRadio:aItems, { | oRad | oRad:SetFont ( oFont ), ; oRad:nClrText ...

... function Main() local nOption nOption = Alert( "take an option",; { "&One", "&Two", "T&hree" },; "Please, select" ) MsgInfo( nOption ) Another() // function located at one.prg MsgInfo( More() ) // More is located at two.c ...

... function Main() local nOption nOption = Alert( "take an option",; { "&One", "&Two", "T&hree" },; "Please, select" ) MsgInfo( nOption ) Another() // function located at one.prg MsgInfo( More() ) // More is located at two.c ...

... I found on my folder and I have the same command @ 3, 2 RADIO oRad VAR nValue ; ITEMS "&One", "&Two", "T&hree" _3D SIZE 150, 25 ; HELPID 100, 101, 102 ; ON CHANGE MsgBeep() // adding an extra radio item at a different location @ 5, 25 RADIOITEM "Fo&ur" ...

... code MY POST testrad (all item together) @ 3, 2 RADIO oRad VAR nValue ;       ITEMS "&One", "&Two", "T&hree" _3D SIZE 150, 25 ;       HELPID 100, 101, 102 ;       ON CHANGE MsgBeep() YOUR POST @ 3, 2 RADIO oRad VAR nValue ; ITEMS "&One", ...

... it's no same command testrad (all item together) @ 3, 2 RADIO oRad VAR nValue ;      ITEMS "&One", "&Two", "T&hree" _3D SIZE 150, 25 ;      HELPID 100, 101, 102 ;      ON CHANGE MsgBeep() your code... (one item by time) @ 10, 50    RADIO aGet[1] ...

... 2 ]:SetText( "&Changed!" ) ) @ 3, 2 RADIO oRad VAR nValue ; ITEMS "&One", "&Two", "T&hree" _3D SIZE 150, 25 ; HELPID 100, 101, 102 ; ON CHANGE MsgBeep() // adding an extra radio item at a different location @ 5, 25 RADIOITEM "Fo&ur" ...

... 2 ]:SetText( "&Changed!" ) ) @ 70, 50 RADIO oRad VAR nValue PIXEL ; ITEMS "&One", "&Two", "T&hree" _3D SIZE 50, 25 ; HELPID 100, 101, 102 ; ON CHANGE MsgBeep() // adding an extra radio item at a different location @ 100, 100 RADIOITEM "Fo&ur" ...

... didn't work. Maybe Transparent is not supported ??? @ 1, 10 RADIO oRad1 VAR nValue ; ITEMS "&One", "&Two", "T&hree" _3D SIZE 150, 25 ; HELPID 100, 101, 102 ; ON CHANGE MsgBeep() AEval( oRad1:aItems, { | oRad1 | oRad1:lTransparent := .T. } ) Peter, can You ...

... #endif oWnd:oClient = oPanel // It is the client control of oWnd @ 0, 0 LISTBOX oLbx VAR cItem ; ITEMS { "One", "Two", "Three" } SIZE 200, 100 OF oPanel oPanel:oLeft = oLbx @ 4, 0 TABS oTabs PROMPT "&One", "&Two", "T&hree" ...

... testtabs.prg lo he compilado y funciona perfectamente. Sin embargo dentro de mi código @ 8, 0 TABS oTabs PROMPTS "&One", "&Two", "T&hree", "&Four" OF oDlg me da el error ya comentado. Este es el código de la clase #include "FiveWin.ch" #include "Constant.ch" ...

É possível colocar na Horizontal os BT de Rádio isto é:

@ 1, 0 RADIO btradio ;
ITEMS "&One", "&Two", "T&hree" SIZE 80, 15;
ON CHANGE MsgBeep() OF oWnd

Resulta isto:
- One
- Two
- Three

Mas eu queria assim:
- One - Two - Three

Será que é possível?

Obrigado

... FiveWin Tabs" ; FROM 3, 3 TO 14, 30 ; COLOR CLR_BLACK, GetSysColor( COLOR_BTNFACE ) @ 8, 0 TABS oTabs PROMPTS "&One", "&Two", "T&hree", "&Four" OF oWnd ; ACTION oWnd:Say( 5, 5, oTabs:nOption ) oWnd:oBottom = oTabs ACTIVATE WINDOW oWnd return nil Yo las uso para cambiar el ...

aida, Define dialog... @ 8, 0 TABS oTabs PROMPTS "&One", "&Two", "T&hree", "&Four" OF oWnd ACTION opcion() Activate dialog... funct opcion do case case oTabs:nOption=1 ; msginfo('primera opcion') case oTabs:nOption=2 ; msginfo('segunda opcion') case ...

... FiveWin Tabs" ; FROM 3, 3 TO 14, 30 ; COLOR CLR_BLACK, GetSysColor( COLOR_BTNFACE ) @ 8, 0 TABS oTabs PROMPTS "&One", "&Two", "T&hree", "&Four" OF oWnd ; ACTION oWnd:Say( 5, 5, oTabs:nOption ) oWnd:oBottom = oTabs ACTIVATE WINDOW oWnd return nil