Consulta sobre resolución de pantalla.

[Rathinagiri]

Superb!

Thanks a lot for sharing friend.

[sudip]

One very small addition

Code: Select all

 ...  private cForm:='Principal'
   MsgInfo("Se ajusta posicion, ancho y font","Informacion")
   DEFINE WINDOW  Principal AT 126,66 WIDTH 648 HEIGHT 404 ;
   TITLE 'AutoAdjust (c)2007-2010 MigSoft ' MAIN;
   on init Autoaj(cForm) ;
   ON SIZE Autoaj(cForm) ;
   on MAXIMIZE Autoaj(cForm)...

[mustafa]

Hola Steed
He probado tu adaptación a HMG , pero cuando le doy al Boton de
"Maximizar" los objetos como FRAME, TAB. TEXTBOX , Botones, etc
quedan del mismo tamaño que tenian , quedando en el lado izquierdo superior
sin alterar el tamaño, si te fijas el ejemplo de MigSoft que mande, cuando Maximizas
WINDOW todos los objetos de automodifican a las nuevas medidas de la Ventana.
ampliando el tamaño
un Saludo
*------------------ Google --------------*
Hi Steed
He tried your adaptation to HMG, but when I give the Button
WINDOW "Maximize" objects as FRAME, TAB, TEXTBOX, Buttons, etc.
are the same size they had, being in the upper left side without altering
size, if you look at the example of MigSoft you send, when maximizing
WINDOW all objects of the new measures automodifican Window.
greater number
Greeting
Mustafa

[mustafa]

Con el arrego de Sudip
añadiendo ----> ON MAXIMIZE Autoaj(cForm)
funciona perfecto
Saludos
*-------- Google ----------------*
With the Fitting of Sudip
adding ----> ON MAXIMIZE Autoaj(cForm)
Regards

Mustafa

[srvet_claudio]

Very good
Thanks.

Regards,
Claudio.

[jreduojeda]

Muchas gracias.
Lo probaré.
Saludos,

[Pablo César]

Hi, All


I Adapted, almost, the Hmg_ext autoajust sample to Hmg, enjoy.


Regards,


Ed

Muy bueno ! Very good and thank you for sharing !!!

[Leopoldo Blancas]

Excelente amigos...
Saludos
Polo
*------------------------------------------
Great friends ...
regards
Polo

[Pablo César]

My contribution in function ISAPPXPTHEMED() which is always is returning true:

Code: Select all

Function ISAPPXPTHEMED()
Local lRet:=OS_ISWINXP_OR_LATER()

If lRet
   lRet:=IsAppThemed()        
Else                           
   lRet:=.F.                  
Endif
Return lRet

[esgici]

Ola Amigo

Thanks to contribution and exploring two hidden / undocumented features

Does may be with this (shorter) way :

Code: Select all

Function ISAPPXPTHEMED()
RETURN ( OS_ISWINXP_OR_LATER() .AND. IsAppThemed() )   

By the way, did you tried for a form included radio group control ?

TIA