Por fin, Pages con Brush y Folders sin encabezados !!!
- Raymundo Islas M.
- Posts: 590
- Joined: Tue Mar 14, 2006 11:34 pm
- Location: Acapulco, Gro. MEXICO
Por fin, Pages con Brush y Folders sin encabezados !!!
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
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
- Raymundo Islas M.
- Posts: 590
- Joined: Tue Mar 14, 2006 11:34 pm
- Location: Acapulco, Gro. MEXICO
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,
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
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl
- Raymundo Islas M.
- Posts: 590
- Joined: Tue Mar 14, 2006 11:34 pm
- Location: Acapulco, Gro. MEXICO
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
- 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
Raimundo - Muchas GRACIAS por responder y poner tu ejemplo.
Lo vamos a estudiar y ver que logramos.
Saludos ,
Lo vamos a estudiar y ver que logramos.
Saludos ,
Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl
- jose_murugosa
- Posts: 943
- Joined: Mon Feb 06, 2006 4:28 pm
- Location: Uruguay
- Contact:
Re: Por fin, Pages con Brush y Folders sin encabezados !!!
Querido amigo MUCHIIIIIIIIIIIIIISIIIIMAAAAAASSSSSSS GRACIAS!!!!!!!!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
Ya lo pongo en práctica.
Saludos/Regards,
José Murugosa
FWH + Harbour + Bcc7. Una seda!
José Murugosa
FWH + Harbour + Bcc7. Una seda!
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
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