Progress además de horizontal en vertical

fleal

Posts: 234

Joined: Tue Oct 25, 2005 12:39 AM

Progress además de horizontal en vertical
Posted: Thu Apr 13, 2006 07:17 PM

Sería bueno tener la opción de ponerlo en vertical

Saludos
Fernando

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Progress además de horizontal en vertical
Posted: Thu Apr 13, 2006 09:59 PM

Fernando,

Implementado. Te lo enviamos por email para que lo pruebes. A que email te lo enviamos ?

Aqui puedes ver como queda:

Desde código fuente se usa la nueva cláusula VERTICAL, y desde recurso hay que especificar el estilo #define PBS_VERTICAL 4

regards, saludos

Antonio Linares
www.fivetechsoft.com

fleal

Posts: 234

Joined: Tue Oct 25, 2005 12:39 AM

A este mail
Posted: Thu Apr 13, 2006 11:43 PM

Barbaro,
ustéd siempre trabajando.

Este es mi correo electronico
flealg@prodigy.net.mx

Gracias
Fernando Leal

Antonio Linares wrote:Fernando,

Implementado. Te lo enviamos por email para que lo pruebes. A que email te lo enviamos ?

Aqui puedes ver como queda:

Desde código fuente se usa la nueva cláusula VERTICAL, y desde recurso hay que especificar el estilo #define PBS_VERTICAL 4

jose_murugosa

Posts: 1279

Joined: Mon Feb 06, 2006 04:28 PM

Progress además de horizontal en vertical
Posted: Fri Apr 14, 2006 03:48 AM

Antonio,

Muy interesante variante.

Será posible que me la envíes también a mí?

Gracias desde ya.

Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Progress además de horizontal en vertical
Posted: Fri Apr 14, 2006 07:28 AM

Jose,

Lo publicaremos en en build de Mayo.

regards, saludos

Antonio Linares
www.fivetechsoft.com

lafug

Posts: 185

Joined: Thu Nov 17, 2005 12:48 AM

Progress además de horizontal en vertical
Posted: Fri Apr 14, 2006 03:03 PM

Antonio,

Perdon la intromisión, pero donde encuentro esta clase?

SALUDOS GRACIAS DE ANTEMANO

Luis Alfonso Fuentes Guerrero

FWH 11.06 xHarbour 1.2.1 BCC55 WorkShop

lafug

Posts: 185

Joined: Thu Nov 17, 2005 12:48 AM

Progress además de horizontal en vertical
Posted: Fri Apr 14, 2006 03:38 PM

encontre la clase

algun ejemplito?

Luis Alfonso Fuentes Guerrero

FWH 11.06 xHarbour 1.2.1 BCC55 WorkShop

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Progress además de horizontal en vertical
Posted: Fri Apr 14, 2006 06:30 PM

Luis,

Code: Select all Collapse

#include "FiveWin.ch"

function Main()

   local oDlg, oProg, nValue := 30, oProg2, nValue2 := 20 
   
   DEFINE DIALOG oDlg TITLE "Progress Bars"
   
   @ 1, 1 PROGRESS oProg POSITION nValue SIZE 80, 12

   @ 1, 20 PROGRESS oProg2 POSITION nValue2 SIZE 12, 50 VERTICAL
   
   @ 3,  9 BUTTON "Ok" ACTION oDlg:End()
   
   ACTIVATE DIALOG oDlg CENTER ;
      ON INIT ( oProg:nPosition := nValue,;
                oProg2:nPosition := 50 )
   
return nil

regards, saludos

Antonio Linares
www.fivetechsoft.com

fleal

Posts: 234

Joined: Tue Oct 25, 2005 12:39 AM

Gracias, funciona muy bien en código.
Posted: Fri Apr 21, 2006 04:38 PM

¿Cómo lo pinto en el Workshop?

he intentando solo arrastrarlo y compactarlo hasta dejarlo vertical pero el meter sigue apareciendo en horizontal.

Esto fué lo que hice:

1) Cambiar mi fivewin.ch por el nuevo fivewin.ch

2) Recompilar el tprogres.prg y agregar el obj resultante a mi compilación

3) Editar mi archivo RC y al principio agregar #define PBS_VERTICAL 4

Entonces en el PRG para usarlo hago

  REDEFINE PROGRESS oProgress ID 331 OF oDlg VERTICAL

Al compilar me aparece un
warning W0001 Ambiguous reference: 'VERTICAL'

Pregunta. ¿En que la he regado?

Gracias

fleal

Posts: 234

Joined: Tue Oct 25, 2005 12:39 AM

Ya funciona en recursos
Posted: Fri Apr 21, 2006 04:59 PM

Solo había que darle doble click al control en el Workshop y agregar en
style | PBS_VERTICAL

:-)

FiveTech Support Forums

Continue the discussion