Alaska Software Inc. - como determino la dimensin de una ventana
Username: Password:
AuthorTopic: como determino la dimensin de una ventana
Jorge Borlandocomo determino la dimensin de una ventana
on Sun, 09 Dec 2007 00:26:26 -0300
Hola


saben si existe una funcin donde pueda obtener las coordenadas de una 
ventana cuando la inicio con la siguiente funcin ?

oDlg := XbpDialog():new( AppDesktop() )


saludos a todos
Jos Luis Otermin [Alaska Software]Re: como determino la dimensin de una ventana
on Fri, 21 Dec 2007 13:46:53 -0300
Jorge,

Una forma de crear un dilogo que tenga el mismo tamao que el padre sera:

PROCEDURE Ventana( oParent )
    En este ejemplo se asume que oParent es un XbpDialogo.

   aSize := oParent:drawingArea:currentsize()
   oDlg := XbpDialog():New(oParent:drawingArea,,{0,0},aSize,,.F.)
   oDlg:create()
   ...
RETURN

Por supuesto, oParent puede ser un objeto cualquiera incluyendo AppDesktop()

En ese caso deberamos modificar el procedimiento para que quede:

PROCEDURE Ventana( oParent )
   LOCAL aSize, oDlg

    Utilizamos la introspeccin para saber quin es su ancestro.
   IF oParent:isDerivedFrom( "XbpDialog" )
         oParent := oParent:drawingArea
   ENDIF

   aSize := oParent:currentsize()

   oDlg := XbpDialog():New(oParent,,{0,0},aSize,,.F.)
   oDlg:create()
   ...
RETURN

Espero haber sido de ayuda.

Jos Luis Otermin
Soporte Tcnico

Alaska Software Inc.
Foros de Usuarios: news://news.alaska-software.com
Foros de Usuarios Web: http://news.alaska-software.com
Pgina Web: http://www.alaska-software.com
Base de Conocimientos en la Web: http://www.alaska-software.com/kbase.shtm
Oficina en Europa: Fax: +49 (0) 61 96 - 77 99 99 23
Oficina en EEUU: Fax: +1 (646) 218 1281





"Jorge Borlando" <jlborlando@way.com.ar> escribi en el mensaje 
news:6a47c966$62ff27e0$9178@news.alaska-software.com...
> Hola
>
>
> saben si existe una funcin donde pueda obtener las coordenadas de una 
> ventana cuando la inicio con la siguiente funcin ?
>
> oDlg := XbpDialog():new( AppDesktop() )
>
>
> saludos a todos
>
Osvaldo Ramirez Re: como determino la dimensión de una ventana
on Fri, 21 Dec 2007 15:54:13 -0700
Estimado Doctor Jose Luis

Cual es tu email ?

Saludos


José Luis Otermin [Alaska Software] wrote:
> Jorge,
> 
> Una forma de crear un diálogo que tenga el mismo tamaño que el padre sería:
> 
> PROCEDURE Ventana( oParent )
>     En este ejemplo se asume que oParent es un XbpDialogo.
> 
>    aSize := oParent:drawingArea:currentsize()
>    oDlg := XbpDialog():New(oParent:drawingArea,,{0,0},aSize,,.F.)
>    oDlg:create()
>    ...
> RETURN
> 
> Por supuesto, oParent puede ser un objeto cualquiera incluyendo AppDesktop()
> 
> En ese caso deberíamos modificar el procedimiento para que quede:
> 
> PROCEDURE Ventana( oParent )
>    LOCAL aSize, oDlg
> 
>     Utilizamos la introspección para saber quién es su ancestro.
>    IF oParent:isDerivedFrom( "XbpDialog" )
>          oParent := oParent:drawingArea
>    ENDIF
> 
>    aSize := oParent:currentsize()
> 
>    oDlg := XbpDialog():New(oParent,,{0,0},aSize,,.F.)
>    oDlg:create()
>    ...
> RETURN
> 
> Espero haber sido de ayuda.
> 
> José Luis Otermin
> Soporte Técnico
> 
> Alaska Software Inc.
> Foros de Usuarios: news://news.alaska-software.com
> Foros de Usuarios Web: http://news.alaska-software.com
> Página Web: http://www.alaska-software.com
> Base de Conocimientos en la Web: http://www.alaska-software.com/kbase.shtm
> Oficina en Europa: Fax: +49 (0) 61 96 - 77 99 99 23
> Oficina en EEUU: Fax: +1 (646) 218 1281
> 
> 
> 
> 
> 
> "Jorge Borlando" <jlborlando@way.com.ar> escribió en el mensaje 
> news:6a47c966$62ff27e0$9178@news.alaska-software.com...
>> Hola
>>
>>
>> saben si existe una función donde pueda obtener las coordenadas de una 
>> ventana cuando la inicio con la siguiente función ?
>>
>> oDlg := XbpDialog():new( AppDesktop() )
>>
>>
>> saludos a todos
>>
> 
>
Jos Luis Otermin [Alaska Software]Re: como determino la dimensin de una ventana
on Sat, 22 Dec 2007 15:50:02 -0300
Hola Osvaldo,

Revisa tu casilla personal.
Ah esta tu respuesta.

Un abrazo

Jos Luis Otermin
Soporte Tcnico

Alaska Software Inc.
Foros de Usuarios: news://news.alaska-software.com
Foros de Usuarios Web: http://news.alaska-software.com
Pgina Web: http://www.alaska-software.com
Base de Conocimientos en la Web: http://www.alaska-software.com/kbase.shtm


"Osvaldo Ramirez" <ramirezosvaldo@prodigy.net.mx> escribi en el mensaje 
news:7c2757bc$16385817$9239@news.alaska-software.com...
> Estimado Doctor Jose Luis
>
> Cual es tu email ?
>
> Saludos
>
>
> Jos Luis Otermin [Alaska Software] wrote:
>> Jorge,
>>
>> Una forma de crear un dilogo que tenga el mismo tamao que el padre 
>> sera:
>>
>> PROCEDURE Ventana( oParent )
>>     En este ejemplo se asume que oParent es un XbpDialogo.
>>
>>    aSize := oParent:drawingArea:currentsize()
>>    oDlg := XbpDialog():New(oParent:drawingArea,,{0,0},aSize,,.F.)
>>    oDlg:create()
>>    ...
>> RETURN
>>
>> Por supuesto, oParent puede ser un objeto cualquiera incluyendo 
>> AppDesktop()
>>
>> En ese caso deberamos modificar el procedimiento para que quede:
>>
>> PROCEDURE Ventana( oParent )
>>    LOCAL aSize, oDlg
>>
>>     Utilizamos la introspeccin para saber quin es su ancestro.
>>    IF oParent:isDerivedFrom( "XbpDialog" )
>>          oParent := oParent:drawingArea
>>    ENDIF
>>
>>    aSize := oParent:currentsize()
>>
>>    oDlg := XbpDialog():New(oParent,,{0,0},aSize,,.F.)
>>    oDlg:create()
>>    ...
>> RETURN
>>
>> Espero haber sido de ayuda.
>>
>> Jos Luis Otermin
>> Soporte Tcnico
>>
>> Alaska Software Inc.
>> Foros de Usuarios: news://news.alaska-software.com
>> Foros de Usuarios Web: http://news.alaska-software.com
>> Pgina Web: http://www.alaska-software.com
>> Base de Conocimientos en la Web: 
>> http://www.alaska-software.com/kbase.shtm
>> Oficina en Europa: Fax: +49 (0) 61 96 - 77 99 99 23
>> Oficina en EEUU: Fax: +1 (646) 218 1281
>>
>>
>>
>>
>>
>> "Jorge Borlando" <jlborlando@way.com.ar> escribi en el mensaje 
>> news:6a47c966$62ff27e0$9178@news.alaska-software.com...
>>> Hola
>>>
>>>
>>> saben si existe una funcin donde pueda obtener las coordenadas de una 
>>> ventana cuando la inicio con la siguiente funcin ?
>>>
>>> oDlg := XbpDialog():new( AppDesktop() )
>>>
>>>
>>> saludos a todos
>>>
>>