FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour RibbonBar de FWH con apariencia Windows 7
Posts: 566
Joined: Thu Aug 30, 2007 03:40 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Tue Dec 15, 2009 04:37 PM

hi Mantonio, very thanks, this samples is a good sample of class programming too.

only one doubt: this fwh class included is changed? can i use original ones?

Posts: 330
Joined: Fri May 25, 2007 09:06 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Tue Dec 15, 2009 05:56 PM

amigo... existen cambios en dos .prg.. el trbgroup y trbtn

estan marcados asi:: //Por ABC-System

trbgroup

METHOD LButtonDown( nRow, nCol, nFlags ) INLINE ::lPressed := ::lMOverAction //Por ABC-System

trbtn

DATA lPressedR INIT .F. //Por ABC-System

METHOD RButtonDown( nRow, nCol, nKeyFlags ) //Por ABC-System

METHOD RButtonDown( nRow, nCol, nKeyFlags ) //Por ABC-System

::lPressedR:=.T.

return Super:RButtonDown( nRow, nCol, nKeyFlags )

ahora si antonio puede incluir estos cambios en las nuevas versiones seria genial::

aca andamos cualquier duda::

Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Tue Dec 15, 2009 08:13 PM
Gracias Mantonio

Code (fw): Select all Collapse
 聽 @ 01, 01 BTNBMP btn_circle OF oRbar SIZE 50, 50 TRANSPARENT;
聽 聽 聽 聽 聽 聽 RESOURCE "btnnormal" 聽 聽, ; 聽//Boton normal
聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽"bntpress" 聽 聽 , ; 聽//Boton presionado
聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 NIL聽 聽 聽, ; 聽//Boton disable
聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽"btnmousemove" 聽 ; 聽//Boton mousemove
聽 聽 聽 聽 聽 聽 2007 NOBORDER UPDATE;
聽 聽 聽 聽 TOOLTIP "Muestra < Menu > Standar del Sistema";
聽 聽 聽 聽 MESSAGE "Muestra < Menu > Standar del Sistema"


no me imagine nunca la clase btnbmp, siempre busque TRBtn
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 115
Joined: Fri Oct 14, 2005 07:10 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Tue Dec 15, 2009 09:34 PM

Donde consigo RIBBON.CH ?

Saludos,

Gonzalo

Puerto Montt - CHILE

FWH 22.12 - Harbour 3.2.0dev (r2008190002) - Borland/Embarcadero C++ 7.0(32-bit)
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Tue Dec 15, 2009 11:26 PM

Gonzalo,

Ribbon.ch es un fichero de FWH que se incluye en nuestro producto comercial.

Solo pueden publicarse modificaciones de los ficheros originales aqui, no los ficheros completos, pues solo los usuarios registrados a las versiones correspondientes pueden tener acceso a ellos, gracias :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 115
Joined: Fri Oct 14, 2005 07:10 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Wed Dec 16, 2009 03:06 PM

Antonio,

Tengo la version 2.7 comprada en Junio 2006. Deduzco entonces, que esta versi贸n es muy antigua y debo actualizarme.
A prop贸sito, basta con que compre la "Actualizaci贸n a la nueva versi贸n de FWH" ?

Saludos,

Gonzalo

Puerto Montt - CHILE

FWH 22.12 - Harbour 3.2.0dev (r2008190002) - Borland/Embarcadero C++ 7.0(32-bit)
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Wed Dec 16, 2009 03:09 PM

Gonzalo,

Si, asi es.

Para usar todas estas novedades tan atractivas de FWH es preciso usar la versi贸n m谩s reciente, actualiz谩ndose, gracias :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Wed Dec 16, 2009 05:28 PM

MAntonio88
Sorry I cannot download your files

Best Regards, Saludos



Falconi Silvio
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Wed Dec 16, 2009 05:32 PM
mantonio_08 wrote:http://www.mediafire.com/myfiles.php

ahi les dejo el link de descarga..

a los colegas que lo quieran probar... una recomendacion,, ojo con el manejo de los array.. que son algo complejos de entender.. claro si es que quieren usarlos.. ahora si lo que desean es solo saber como se hace el boton redondo y el quickaccess.. pueden solo utilizar esa parte y adaptarla a sus necesidades..

cualquier duda por aca estare...

ATTE..
un colega



on this link I cannot download anything ....
can you help me pls ?
Best Regards, Saludos



Falconi Silvio
Posts: 244
Joined: Fri Oct 28, 2005 06:29 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Wed Dec 16, 2009 07:03 PM
Silvio:

The link http://www.megaupload.com/?d=FRAGU5UE is working ok!

Salute
Alejandro Cebolido

Buenos Aires, Argentina
Posts: 330
Joined: Fri May 25, 2007 09:06 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Thu Dec 17, 2009 01:43 AM

(Editado por Antonio)

Mantonio, no puedes distribuir clases originales de FWH, son propiedad intelectual de nuestra empresa, gracias

Puedes publicar los cambios que les hagas, pero solo las diferencias, no las clases completas. Gracias

============================================ OOooOO ==================================================

MASTER ANTONIO,, mis disculpa por la subida, no fue mi intencion , no me percate que dentro de la carpeta comprimida, se me quedaron agregados esos prgs..,,, no volvera a ocurrir..

para los q no pudieron bajarlo::: aca el link.. CORREGIDO

http://www.mediafire.com/?3ajdkjiymmv

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Thu Dec 17, 2009 06:12 AM

Mantonio,

gracias :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 45
Joined: Tue May 06, 2008 11:20 AM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Sat Dec 19, 2009 02:21 PM

Antonio: Los Ribonbar los voy a poner. En realidad son de WORD 2007, mucho antes que Windows 7, los he usado en Word y veo la ventaja que son "peque帽os" di谩logos que sustituyen a muchos popus y proporcionan una informaci贸n mas amplia de las opciones posibles y una acci贸n m谩s r谩pida sin tener que abrir tantas listas.

Saludos, - Juan -

Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Sat Dec 19, 2009 04:03 PM
Antonio,

MAntonio_08 use bitmaps for show the quickaccess button and round button
it can be good
Instead I re-write the ribbon class add new methods

Now I can create the riboon in this mode :


If we want 2007 effect


DEFINE RIBBONBAR oRBar WINDOW oWnd PROMPT "Configuraci贸n", "Ficheros", "Informes", "Ayudas" HEIGHT 160 TOPMARGIN 55


//Circolar Button

oRBar:cImageCircle1 := ".\bitmaps\BtnNormal.bmp"
oRBar:cImageCircle2 := ".\bitmaps\BtnMousemove.bmp"
oRBar:cImageCircle4 := ".\bitmaps\BtnPress.bmp"


//Load a style
nStyle:=1 // As Default blue
oRBar:SetStyle( nStyle )

// show the Panel Bar and circolar button
oRBar:PaintPanelBar()
oRBar:PaintCircleButton()


ADD GROUP oGr RIBBON oRBar TO OPTION 1 PROMPT "Empresa" width 135


............


On Circular button I can oppen an popup menu and select colors :
Blue, Black, Silver, Orange


Here there are snapshot s of my work for 2007 effect



Base Blue Colors



Menu Config



Aqua colors



Black colors



Orange colors



the last one problem I use the quickaccess bitmap and it is only for blue color , How I can change the pattern of this bitmap OR

How we can create with polygon functiond this bitmap ?



For the effect 2010 I'm studying What I can make... any idea ?
Best Regards, Saludos



Falconi Silvio
Posts: 880
Joined: Fri Jan 12, 2007 08:35 PM
Re: RibbonBar de FWH con apariencia Windows 7
Posted: Sun Dec 20, 2009 05:42 PM

Hola

Todo muy bonito pero a un no me queda :lol:

Saluditos

Aida

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

I love Fivewin

s茅蕦菨晒 谉蓯 蓯蕠s菨 opun莎 菨蕠s菨