Nice use of the sysinfo control Fabio.
>>I have a screen (form) set as the background of my app. with AutoCenter=.t., but when
>>my client changed the screen resolution, it was not at the center anymore. can I have it always at the center regardless the screen resolution?
>>
>>thanks for the help.
>>
>>regards,
>>
>>Jerry
>
>try this
>
>WITH NEWOBJECT("form1")
> .Show(1)
>ENDWITH
>
>DEFINE CLASS form1 AS form
> Desktop = .T.
> AutoCenter = .T.
> Caption = "EveryTime centered"
>
> ADD OBJECT system AS olecontrol WITH ;
> OleClass = "SYSINFO.SysInfo.1"
>
> PROCEDURE system.DisplayChanged
> ThisForm.Autocenter = m.ThisForm.Autocenter
> ENDPROC
>
>ENDDEFINE
>