Page 1 of 2

APORTE: FUNCTION DISPLAY 2.0

Posted: Fri Aug 28, 2009 1:45 am
by WilliamAdami
Amigos de lo forum , estoy colocando un aporte a lo Forum. Se trata de la function DISPLAY.PRG version 2.0 y faz o redimensionar automaticamente a la resolucion corrente de la pantalla, o seja, sus pantallas visualizarao sempre iguales em qualquer resolucion ! Y las fuentes de los controles se ajustam automaticamente, no precisando se importar com los tamanos de las fuentes !

Lo exemplo TELA.EXE foi inicialmente desenado en resolucion de 800 X 600 y lo dialog aparecera sempre igual en qualquer resolucion !!!!

Este projecto teve inicio con la function AutoResiz() de nostro hermano FIVEWIDI (muchas gracias Fivewidi por la grande idea inicial ) publicada aqui neste forum .

link para download:

http://www.fivewin.com.br/exibedicas.asp?id=1009


Para utilizar la funcion deve-se coloca-la en lo evento ON INIT:

Activate Dialog Odlg ON INIT display(odlg,nresolution)

- nResolution : numero que indica qual resolucion las pam]ntallas foram desenhadas inicialmente , y podem ter los seguintes valores:
1 = 640 X 480
2 = 800 X 600
3 = 1024 X 768
4 = 1152 X 864
5 = 1280 X 800
6 = 1280 X 1024
7 = 1600 X 1200
8 = 768 X 1024
9 = 1440 x 900
10 = 1280 x 768
11 = 1280 x 720

Controles implementados ate agora: (redimensionam correctamente !)

- Say
- Get
- Group
- Radio
- Checkbox
- ComboBox
- Xbrowse
- Listbox
- Wbrowse
- Timage
- Bitmaps
- BarButton
- Trees
- Folders
- BtnBmp
- Tbutton
- Ssay
- Dsay
- SBrowse
- DbCombo
- SayRef
- TTabs
- Tpages


Espero que les sejam muy util, asi como esta siendo para mi.

Muchas Gracias a Antonio Linares e Daniel Garcia (Gil) que bastante mi ajudaram en los processos de redimension de los controles. Y muchas, muchas gracias a FiveWidi !

Aguardo los coments de usteds sobre la funcion

Muchas Gracias

Saludos

William Adami

Pouso Alegre - MG -Brasil

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Fri Aug 28, 2009 2:53 am
by Willi Quintana
EXCELENTE!!!!
Salu2

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Fri Aug 28, 2009 6:13 am
by Antonio Linares
William,

gracias! :-)

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Fri Aug 28, 2009 1:28 pm
by WilliamAdami
Yo gostaria de pedir a los colegas do Forum que ao acrescentarem otros controles en la dicta function que tambien publique en lo forum para todos.

Gracias y perdon por escrever no muy bien lo Espanhol ....

Salu2


William Adami

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Sun Aug 30, 2009 9:14 pm
by FiveWiDi
Gracias William,

Me alegro mucho de que te haya sido útil.

Un Saludo
Carlos G.

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Mon Aug 31, 2009 9:04 pm
by ADBLANCO
Gracias, Hace tiempo que necesitaba algo como esto, Mi problema es que no me trabaja??
:oops:

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Mon Aug 31, 2009 9:19 pm
by WilliamAdami
AdBlanco, disculpa si no compreendo corretamente, non te estás funcionando la funcion ?


William

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Tue Sep 01, 2009 4:07 am
by AIDA
Que bien :D

Esto si es algo muy bueno :shock:

Muchas gracias :wink:

Saluditos

Aida

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Tue Sep 01, 2009 2:02 pm
by ADBLANCO
Si Wiliam, Por alguna razón me da una serie de errores a la hora de compilar.
Puede ser por la versión de Xharbour y/o Fw que utilizo, total que cuando logré que compilara
no hace efecto alguno.

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Tue Sep 01, 2009 2:03 pm
by ADBLANCO
Hola Aida! :oops:

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Tue Sep 01, 2009 2:14 pm
by WilliamAdami
o que no compila, lo TELA.PRG o la DISPLAY.PRG ? Usted deves Testar solamente la DISPLAY.PRG juntamente con uno Dialog que USTED criou. Existe varias pessoas que testaram la funcion y no apresenta errors, independente de la version de FW.
Verfique los #include que no utilizar en su PRG e debes comenta-lo con //

verfique o que usted estas fazendo errado

William

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Thu Sep 03, 2009 8:49 pm
by ADBLANCO
la display no me compila me arroja

Ambiguous reference: 'STRETCHCOL_LAST'

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Thu Sep 03, 2009 9:32 pm
by WilliamAdami
ok, lo problema es con lo XBROWSE, enton su version de FWH no es compatible.

Para corrigir , en la DISPLAY.PRG debes quitar lo #Include "XBROWSE.CH"

y quitar la linea que chama a 'STRETCHCOL_LAST'

Retirando estas lineas , la DISPLAY.PRG hay que compilar y funcionar con su FWH


Please, verifique y habla-me si funciona


William

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Fri Sep 04, 2009 1:23 pm
by ADBLANCO
Por alguna extraña razón no me trabaja, Me explico, ya compila, pero no surte efecto en el sistema,
Sin embargo el ejemplo que tu mandastes si corrige la resolución de pantalla, pero en ningún sistema de los de nosotros lo hace,
Lo estoy colocando en el On Init

:oops:

Re: APORTE: FUNCTION DISPLAY 2.0

Posted: Fri Sep 04, 2009 10:14 pm
by WilliamAdami
ok, verifique:

- los Dialogs del .RC debem estar desenhados com lo WorkShop en resolucion 800X600

- la chamada a la function Display() :

Activate Dialog oDlg on init display(odlg,2) // 2 = resolucion 800 X 600

- Todos los controles del dialog debem tener una Font associada ( do tipo : oControl:oFont:= SuFont )

- Verifique si no tienes modificado a la classe Dialog.prg


Agora si no te trabajas la funcion, solamente puede ser la version de su FW. Lamento.


Saludos


William