FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Por fin, Pages con Brush y Folders sin encabezados !!!
Posts: 592
Joined: Tue Mar 14, 2006 11:34 PM
Por fin, Pages con Brush y Folders sin encabezados !!!
Posted: Fri Jun 27, 2008 03:08 PM

Hola a todos !!

Para el buen amigo Jose Murugosa y Rolando entre otros que anduvimos buscandole a esto.

Despues de muchos intentos fallidos intentando usar PAGES y a estos aplicarles algun brush ( en este caso un bitmap con degradado de color ) y buscarle sin exito la forma de usar algun FOLDER sin encabezados ( ya que estos SI toman sin ninguna bronca el brush ), y ya casi a punto de aventar el PC por la ventana por la frustacion se me ocurrio una pequeña idea y pensando : -What the fuck-, por que no intentarlo !!!

Y se hizo la luz !!!

Por fin, por fin !!!! ya tengo lo que he estado necesitando hacer.

El truco por llamarlo asi es :

1- En el area que queremos usar, poner un PAGE (un solo dialog)
2- Dentro de este dialog, metemos el FOLDER y la coordenada superior debe ser -14 para que no salgan los encabezados
3- Dentro del FOLDER metemos todos nuestro controles y ya esta !!!

Veremos que usamos un PAGES con degradado y todo, cuando en verdad estamos usando un FOLDER !!!

Espero les sirva a todos.

Saludos

FWH 10.6 + xHarbour + Borland 582
Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
Por fin, Pages con Brush y Folders sin encabezados !!!
Posted: Fri Jun 27, 2008 03:39 PM

Raymundo ,,

Una imagen, dice mas que mil palabras !!!

donde esta ?

jeje saludos..

Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
Posts: 592
Joined: Tue Mar 14, 2006 11:34 PM
Por fin, Pages con Brush y Folders sin encabezados !!!
Posted: Fri Jun 27, 2008 03:51 PM
Cesar :


Con todo gusto :-)



Antes :





Despues :





Saludos
FWH 10.6 + xHarbour + Borland 582
Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
Por fin, Pages con Brush y Folders sin encabezados !!!
Posted: Fri Jun 27, 2008 04:26 PM

muy bueno, RAYMUNDO,

se ve chulis,

saludos..

Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
Posts: 270
Joined: Fri Nov 11, 2005 07:39 PM
Por fin, Pages con Brush y Folders sin encabezados !!!
Posted: Sat Jun 28, 2008 01:01 AM

Hola Raimundo se excelente - te felicito.

Tengo 2 consultas :

1) Para las lenguetas redondas del folder, utilizas alguna librería especia ?

2) Puedes- si es que es posible- poner un ejemplo con código y el rc, para
poder probarlo mejor.

Saludoys y gracias,

Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl
Posts: 592
Joined: Tue Mar 14, 2006 11:34 PM
Por fin, Pages con Brush y Folders sin encabezados !!!
Posted: Sat Jun 28, 2008 06:08 PM

Hola Juan,

  • En efecto ese control es un RibbonBar, te permite usar un menu tipo Office 2007 dentro de tus apps.

  • En realidad todo dependera que es lo que quieres hacer y como lo quieres hacer.

Me explico : He dicho abiertamente que me encanta el uso de Folders en mis apps, de hecho no recuerdo haber hecho una que no lo tenga :)
Pero en un nuevo proyecto estoy implementando este control ( RibbonBar ) y ya me era redundante aplicar un Folder, asi que requeria usar Pages para tal efecto, pero como les estoy poniendo un Brush degradado como fondo, tenia ese problema con las Pages ( cosa que no pasa usando los Folders ) asi que si tus proyectos no requieres usar Pages ni aplicarles un brush, lo mas facil y rapido seria el Folder.

De todos modo aqui va el codigo, ( nada del otro mundo, ni nada especial ) :

REDEFINE PAGES oPosPgs ID 105 OF oDlg DIALOGS "DUMFLDR"

oPosPgs:aDialogs[1]:SetBrush( oBrsh )
oPosPgs:aDialogs[1]:lTransparent := .T.

REDEFINE FOLDER oPosFld ID 101 OF oPosPgs:aDialogs[1] ;
PROMPTS "","" ;
DIALOGS "FLDA","FLDB"

Y como comente anteriormente, la coordenada superior del Folder debe ser -14 para que no se vean las solapas.

DUMFLDR DIALOG 59, 86, 691, 429
STYLE WS_CHILD | WS_VISIBLE
FONT 8, "TAHOMA"
{
CONTROL "",101, "SysTabControl32", 0 | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 1, -14, 685, 442

Y eso es todo.

Saludos

FWH 10.6 + xHarbour + Borland 582
Posts: 270
Joined: Fri Nov 11, 2005 07:39 PM
Por fin, Pages con Brush y Folders sin encabezados !!!
Posted: Tue Jul 01, 2008 07:08 PM

Raimundo - Muchas GRACIAS por responder y poner tu ejemplo.

Lo vamos a estudiar y ver que logramos. :D

Saludos ,

Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl
Posts: 1279
Joined: Mon Feb 06, 2006 04:28 PM
Re: Por fin, Pages con Brush y Folders sin encabezados !!!
Posted: Thu Jul 03, 2008 01:24 AM
Raymundo Islas M. wrote:Hola a todos !!

Para el buen amigo Jose Murugosa ...

Por fin, por fin !!!! ya tengo lo que he estado necesitando hacer.

El truco por llamarlo asi es :

1- En el area que queremos usar, poner un PAGE (un solo dialog)
2- Dentro de este dialog, metemos el FOLDER y la coordenada superior debe ser -14 para que no salgan los encabezados
3- Dentro del FOLDER metemos todos nuestro controles y ya esta !!!


Veremos que usamos un PAGES con degradado y todo, cuando en verdad estamos usando un FOLDER !!!


Espero les sirva a todos.


Saludos


Querido amigo MUCHIIIIIIIIIIIIIISIIIIMAAAAAASSSSSSS GRACIAS!!!!!!!!

Ya lo pongo en práctica.
Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"
Posts: 880
Joined: Fri Jan 12, 2007 08:35 PM
Hola
Posted: Tue Oct 28, 2008 03:45 AM

Que bonito se ve

yo quiero hacerlo como como se hace :D

me dejaron :shock:

Saluditos

Aida :wink:

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

I love Fivewin

séʌǝɹ ןɐ ɐʇsǝ opunɯ ǝʇsǝ
Posts: 593
Joined: Sat May 12, 2007 11:47 AM
Por fin, Pages con Brush y Folders sin encabezados !!!
Posted: Tue Oct 28, 2008 09:29 PM
Raymundo,

Te comento como solucioné el tema, en mi caso, de las pages con fondo en degradé.



Lo que hice fue crear un bitmap con el fondo en degradé (uno por cada page a usar) y lo guardé en mi DLL. En el DLL y abarcando todo el page, coloqué primero un recurso tipo texto y encima todos los otros controles que lleva el page.

Luego, en el PRG, defino ese recurso tipo texto con el que abarqué todo el fondo del page, como un say y listo, sale como quiero.

Saludos.

Rolando :-)

Continue the discussion