Page 2 of 4
Re: Consulta sobre resolución de pantalla.
Posted: Thu Jul 15, 2010 4:01 am
by Rathinagiri
Superb!
Thanks a lot for sharing friend.
Re: Consulta sobre resolución de pantalla.
Posted: Thu Jul 15, 2010 7:39 am
by 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)...
Re: Consulta sobre resolución de pantalla.
Posted: Thu Jul 15, 2010 9:03 am
by 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
Re: Consulta sobre resolución de pantalla.
Posted: Thu Jul 15, 2010 9:12 am
by 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
Re: Consulta sobre resolución de pantalla.
Posted: Thu Jul 15, 2010 1:03 pm
by srvet_claudio
Very good
Thanks.
Regards,
Claudio.
Re: Consulta sobre resolución de pantalla.
Posted: Thu Jul 15, 2010 2:21 pm
by jreduojeda
Muchas gracias.
Lo probaré.
Saludos,
Re: Consulta sobre resolución de pantalla.
Posted: Mon Mar 18, 2013 8:20 pm
by Pablo César
Steed wrote:Hi, All
I Adapted, almost, the Hmg_ext autoajust sample to Hmg, enjoy.
Regards,
Ed
Muy bueno ! Very good and thank you for sharing !!!
Re: Consulta sobre resolución de pantalla.
Posted: Tue Mar 19, 2013 4:14 am
by Leopoldo Blancas
Excelente amigos...
Saludos
Polo
*------------------------------------------
Great friends ...
regards
Polo
Re: Consulta sobre resolución de pantalla.
Posted: Tue Mar 19, 2013 9:48 pm
by 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
Re: Consulta sobre resolución de pantalla.
Posted: Wed Mar 20, 2013 10:17 am
by 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