Page 1 of 1
Radio buttons en pixels
Posted: Thu Dec 15, 2005 1:14 pm
by Rafael Clemente
Antonio:
Me parece que los Radio buttons en pixels no funcionan; en unidades de Row/Col, sí. Saludos
Rafael
Ejemplo:
Code: Select all
// FiveWin for Pocket PC - Testing radio buttons
#include "FWCE.ch"
#include "WinApi.ch"
//-------------------------------------------------------------------
FUNCTION Main()
LOCAL oWnd, nValue
DEFINE WINDOW oWnd TITLE "Test"
nValue := 1
@ 0,0 RADIO nValue ;
ITEMS "Uno", "Dos", "Tres" SIZE 80, 20 PIXEL COLOR "W+/B";
ON CHANGE MsgBeep()
ACTIVATE WINDOW oWnd
RETURN NIL
Posted: Thu Dec 22, 2005 8:06 am
by Antonio Linares
Rafael,
Al usar la claúsula PIXEL en los radiobuttons, determinamos el espaciado entre un radio y el siguiente. Además hemos tenido que ajustarlos para que se viesen bien, sin PIXEL, en el Pocket PC.
O te refieres a otra cosa ?
Posted: Thu Dec 22, 2005 8:37 am
by Rafael Clemente
Antonio:
Simplemente me extrañaba que en los Radio buttons de FWPPC, la cláusula PIXEL no funciona. En el ejemplo que incluyo, sólo se ve el primer botón "Uno". Cambiando SIZE 200, 20 por SIZE 200, 80, el tamaño vertical de "Uno" aumenta pero siguen sin verse las demás opciones.
Sin la cláusula PIXEL funciona bien pero lo que yo intentaba era poder controlar el espaciado vertical entre botones.
Saludos,
Rafael
Posted: Thu Dec 22, 2005 8:41 am
by Antonio Linares
Rafael,
Entiendo. Vamos a revisarlo.
Radiobuttons en pixels
Posted: Thu Dec 22, 2005 6:42 pm
by Paco Garcia
Antonio, seria de mucha utilidad el poder hacer algo asi:
RADMENU oRadMenu
@ 10, 10 RADIO OF oRadMenu ...
@ 18, 10 RADIO OF oRadMenu ...
y según veo no sería muy difícil de codificar.
Un saludo
Paco
Posted: Thu Dec 22, 2005 6:43 pm
by Antonio Linares
Paco,
No es mala idea, pero ante todo es preferible mantener compatibilidad con código anterior ó se rompen montones de aplicaciones.
radmenu
Posted: Sat Jan 07, 2006 10:36 pm
by Paco Garcia
No estoy hablando de modificar nada sino de un nuevo preprocesado igual que hay @ BITMAP, REDEFINE BITMAP y DEFINE BITMAP cada uno que elija lo que necesite.
No se si has caido en la cuenta de que @ RADIO no hay manera de utilizarlo de buena manera.
Posted: Sun Jan 08, 2006 11:06 am
by Antonio Linares
Paco, Rafael,
Esta es la sintaxis que hemos implementado para crear radios individuales, pertenecientes a un radmenu:
Code: Select all
#xcommand @ <nRow>, <nCol> RADIOITEM [ <oRadItem> PROMPT ] <cCaption> ;
[ <of: OF, WINDOW, DIALOG> <oWnd> ] ;
[ RADIOMENU <oRadMenu> ] ;
[ <help:HELPID, HELP ID> <nHelpId> ] ;
[ <change: ON CLICK, ON CHANGE> <uChange> ] ;
[ COLOR <nClrFore> [,<nClrBack>] ] ;
[ MESSAGE <cMsg> ] ;
[ <update: UPDATE> ] ;
[ WHEN <uWhen> ] ;
[ SIZE <nWidth>, <nHeight> ] ;
[ VALID <uValid> ] ;
[ <lDesign: DESIGN> ] ;
[ <lLook3d: 3D, _3D> ] ;
[ <lPixel: PIXEL> ] ;
=> ;
[<oRadItem> := ] TRadio():New( <nRow>, <nCol>, <cCaption>, .f., .f.,;
Len( <oRadMenu>:aItems ) + 1, <oWnd>, <oRadMenu>,;
[<nHelpId>], [<nClrFore>], [<nClrBack>], [<cMsg>], [<.update.>], [<{uWhen}>],;
[<nWidth>], [<nHeight>], [<{uValid}>], [<.lDesign.>], [<.lPixel.>] );;
AAdd( <oRadMenu>:aItems, ATail( <oWnd>:aControls ) )
Cualquier comentario es apreciado.
Posted: Sun Jan 08, 2006 11:08 am
by Antonio Linares
Este es un ejemplo de uso en samples\tutor09.prg:
Code: Select all
@ 8, 2 RADIOITEM "F&our" RADIOMENU oRadMenu SIZE 80, 15 OF oWnd
