Menus Estilo XP · Club Builder

Club Builder
Foro de C++Builder en español

FAQ

Buscar

Miembros

Grupos de Usuarios

Registrarse

Perfil

Entra para ver tus mensajes privados

Entrar

Menus Estilo XP

Foros de discusión -> Tips & Tricks

Ver tema anterior :: Ver tema siguiente

Autor Mensaje

_Willa
Capt
Capt

Registrado: 28 Ago 2002Mensajes: 169Ubicación: Madrid ( España )

Publicado: Mar 16 Nov, 2004 12:03 pm Asunto: Menus Estilo XP

_Willa escribió:

Buenas Foro,

Dejo tres ejemplos que he traducido de Delphi a Builder de
Estilos de Menu tipo XP.
Indicar q todos los ejemplos funcionan almenos en C++Builder 6
en cualquier otra versión no aseguro nada.
Todos los ejemplos estan creados a modo de documentación.

1) El Original del primer ejemplo se puede ver en:

http://www.shagrouni.com/english/software/xpmenu.html
http://www.shagrouni.com/english/software/menu.html

Si modificamos el proyecto Ejemplo-1, y incluimos el siguiente bloque:

Código:







   ...


   ...


  ACanvas->Brush->Color = FBackColor;


  ACanvas->FillRect(TextRect);





  TColor FSelectedBkColor2 = (TColor) 0xEFE7E7;


  bool bPasa=false;


  if(FMenu->ClassNameIs("TMainMenu")){


    for(int  i=0; i< FMenuItem->GetParentMenu()->Items->Count;i++){


        if( FMenuItem->GetParentMenu()->Items[i].Parent ){ //  ==FMenuItem->Parent ){


            ACanvas->Brush->Color = FIconBackColor;


            ACanvas->FillRect(ARect);


            if (FMenuItem->ImageIndex == -1 && FMenuItem->Bitmap->Width == 0){


                TextRect = ARect;


                bPasa=true;


                break;


            }


        }


    }


  }


  if (!bPasa)


  {


    ACanvas->Brush->Color = FSelectedBkColor2; // FIconBackColor;


    ACanvas->FillRect(IConRect);


  }


  if (FMenuItem->Enabled)


    ACanvas->Font->Color = FFontColor;


  else


    ACanvas->Font->Color = FDisabledFontColor;





  ...


  ...

La imagen se parece mas a la original, ( haciendo algún que otro retoque )

Ejemplo-1 TMenu: http://www.avancegame.com/cpp/menus/TMenuXP1.zip

2) El Original de este otro Ejemplo se encuentra en:

http://www.builder.cz/art/delphi/delphi_extramenu.html

Ejemplo-2 TMenu: http://www.avancegame.com/cpp/menus/TMenuXP2.zip

3) El Original de este se encuentra en:

http://www.cppfrance.com/code.aspx?id=9385

Ejemplo-3 TMenu: http://www.avancegame.com/cpp/menus/TMenuXP3.zip

Espero que os guste!!

_________________
Saludos
~~~~~~~~
Wink

_Willa
~~~~~~~~
www.avancegame.com

Ultima edición por _Willa el Mar 23 Nov, 2004 4:00 pm, editado 3 veces

Volver arriba

jotny
Master
Master

Registrado: 17 Feb 2004Mensajes: 226Ubicación: santiago

Publicado: Sab 20 Nov, 2004 5:45 pm Asunto: No pude bajar los archivos para CB6...

Hola... el server de los links esta suspendido-....podrias ponerlo neuvamente please? o mandarme los ejemplos a jmunozperez@gmail.com... me gustaria probarlos.. muchisimas gracias

Volver arriba

Mostrar mensajes de anteriores:

Foros de discusión -> Tips & Tricks

Todas las horas son GMT + 1 Hora

Página 1 de 1

No puedes publicar temas nuevos en este foro
No puedes responder a temas en este foro
No puedes editar tus mensajes en este foro
No puedes borrar tus mensajes en este foro
No puedes votar en las encuestas de este foro

Hosting WordPress Indedmedia desde 3,99 €