FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour APORTE: FUNCTION DISPLAY 2.0
Posts: 68
Joined: Tue Apr 14, 2009 09:26 PM
APORTE: FUNCTION DISPLAY 2.0
Posted: Fri Aug 28, 2009 01:45 AM

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

Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Fri Aug 28, 2009 02:53 AM

EXCELENTE!!!!
Salu2

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Fri Aug 28, 2009 06:13 AM

William,

gracias! :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 68
Joined: Tue Apr 14, 2009 09:26 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Fri Aug 28, 2009 01:28 PM

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

Posts: 1445
Joined: Mon Oct 10, 2005 02:38 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Sun Aug 30, 2009 09:14 PM

Gracias William,

Me alegro mucho de que te haya sido 煤til.

Un Saludo
Carlos G.

Un Saludo

Carlos G.



FiveWin 25.12 + Harbour 3.2.0dev (r2502110321), BCC 7.7 Windows 11 Home

Posts: 299
Joined: Mon Oct 22, 2007 03:03 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Mon Aug 31, 2009 09:04 PM

Gracias, Hace tiempo que necesitaba algo como esto, Mi problema es que no me trabaja??

:oops:

Saludos



Angel, Valencia, Venezuela



xH .997 - FW 7.9 - BCC55 - WorkShop - MySql
Posts: 68
Joined: Tue Apr 14, 2009 09:26 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Mon Aug 31, 2009 09:19 PM

AdBlanco, disculpa si no compreendo corretamente, non te est谩s funcionando la funcion ?

William

Posts: 880
Joined: Fri Jan 12, 2007 08:35 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Tue Sep 01, 2009 04:07 AM

Que bien :D

Esto si es algo muy bueno :shock:

Muchas gracias :wink:

Saluditos

Aida

Que es mejor que programar? creo que nada :)
Atropellada pero aqui ando :P

I love Fivewin

s茅蕦菨晒 谉蓯 蓯蕠s菨 opun莎 菨蕠s菨
Posts: 299
Joined: Mon Oct 22, 2007 03:03 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Tue Sep 01, 2009 02:02 PM

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.

Saludos



Angel, Valencia, Venezuela



xH .997 - FW 7.9 - BCC55 - WorkShop - MySql
Posts: 299
Joined: Mon Oct 22, 2007 03:03 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Tue Sep 01, 2009 02:03 PM

Hola Aida! :oops:

Saludos



Angel, Valencia, Venezuela



xH .997 - FW 7.9 - BCC55 - WorkShop - MySql
Posts: 68
Joined: Tue Apr 14, 2009 09:26 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Tue Sep 01, 2009 02:14 PM

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

Posts: 299
Joined: Mon Oct 22, 2007 03:03 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Thu Sep 03, 2009 08:49 PM

la display no me compila me arroja

Ambiguous reference: 'STRETCHCOL_LAST'

Saludos



Angel, Valencia, Venezuela



xH .997 - FW 7.9 - BCC55 - WorkShop - MySql
Posts: 68
Joined: Tue Apr 14, 2009 09:26 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Thu Sep 03, 2009 09:32 PM

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

Posts: 299
Joined: Mon Oct 22, 2007 03:03 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Fri Sep 04, 2009 01:23 PM

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:

Saludos



Angel, Valencia, Venezuela



xH .997 - FW 7.9 - BCC55 - WorkShop - MySql
Posts: 68
Joined: Tue Apr 14, 2009 09:26 PM
Re: APORTE: FUNCTION DISPLAY 2.0
Posted: Fri Sep 04, 2009 10:14 PM

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