¿Cómo maximizar un diálogo?

[Dario Watchdog]

Hola, primero decir que soy nuevo en FWPCC y que conozco fivewin. Mi situacion es la siguiente, estoy realizando una aplicacion para pda, pero antes de entrar en la aplicación quiero que eliga el usuario. Para ello estoy usando un dialogo en el que monto un listbox que muestra todos los usuarios que estan dados de alta en la base de datos. Hasta aqui no tengo problema ninguno, pero quiero hacer que el diálogo que muestra esté maximizado. ¿Cómo maximizo dicho diálogo?

Gracias anticipadas.

[Antonio Linares]

Dario,

El diálogo lo creas desde el PRG ó está definido en recursos (fichero RC) ?

[Dario Watchdog]

Dario,

El diálogo lo creas desde el PRG ó está definido en recursos (fichero RC) ?

El diálogo está definido en recursos.

****************************
Fichero RC
****************************

LSELUSER DIALOG DISCARDABLE 0, 0, 162, 142
STYLE WS_POPUP|DS_MODALFRAME|WS_SYSMENU|WS_VISIBLE
FONT 8, "MS Sans Serif"
{
CONTROL "", 100, "TWBrowse", WS_TABSTOP|0x00b00000, 9, 4, 143, 133
}

[Antonio Linares]

Dario,

Lo más sencillo es que modifiques el diálogo en el fichero RC para que ocupe toda la pantalla.

Si lo que deseas es que se ajuste al tamaño de cada Pocket PC, entonces lo más sencillo es que le cambies el tamaño desde la claúsula ON INIT:

ACTIVATE DIALOG oDlg ;
ON INIT ( oDlg:SetPos( 0, 0 ), oDlg:nWidth := GetSysMetrics( 0 ), oDlg:nHeight := GetSysMetrics( 1 ) )

[Dario Watchdog]

He puesto en ON INIT lo que me digistes, pero ahora la aplicacion se me queda colgada y tengo que reiniciar el pda.

¿A qué puede ser debido?

[Antonio Linares]

Prueba solo esto a ver que valor te muestra:

MsgInfo( GetSysMetrics( 0 ) )

[Dario Watchdog]

Al final he optado por adaptar el dialogo a mano para el tamaño de pantalla de mi PDA. Y para que me posicionase el dialogo en la posicion (0,0) lo que he hecho ha sido quitarle el CENTERED.

Gracias por todo de todas formas.

[Antonio Linares]

Dario,

Puedes hacerlo asi. Lo acabamos de probar y funciona bien:

Code: Select all  Expand view  RUN

   ACTIVATE DIALOG oDlg CENTERED ;
      ON INIT ( WndTop( oDlg:hWnd, 26 ), WndLeft( oDlg:hWnd, 0 ),;
                oDlg:nWidth := GetSysMetrics( 0 ), oDlg:nHeight := GetSysMetrics( 1 ) - 26 )