| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
Cesar C. Salazar Gonzalez
Master
Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
 Publicado: Sab 17 Jul, 2004 8:50 am Asunto: Enlace a Codigo para XP MENU |
 |
|
Bien, buscando un rato en la red, encotre el siguiente enlace para ver los menus tipo XP MENU, el unico detalle es que esta echo en delphi
Este enlace tiene una buena pinta
http://www.shagrouni.com/english/software/xpmenu.html
y en este otro viene parte del codigo fuente
http://www.shagrouni.com/english/software/menu.html
por falta de tiempo y conocimiento sobre Delphi asi mismo por estar apurado en crear unas facturas, no me es posible pasarlo a Builder...
si alguien tiene la amabilidad de poder hacerlo y poner el codigo en el foro, seria de gran ayuda para muchos que buscan este efecto en sus aplicaciones...
Saludos
_________________
 |
|
| Volver arriba |
|
 |
Cesar C. Salazar Gonzalez
Master
Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
| Publicado: Mie 21 Jul, 2004 8:30 pm Asunto: |
|
|
Ya estoy pasando el codigo en unos dias mas.. esta echo para builder..
saludos..
_________________
|
|
| Volver arriba |
|
|
Invitado
|
| Publicado: Jue 30 Sep, 2004 1:00 am Asunto: componente |
|
|
Cesar que fue del codigo fuente del menu para c++ Builder o seguiremos utilizando el de pascal 
se que lo haces por cuenta propia pero es que el componente esta bueno que espero con ansias el componente escrito en c++  |
|
| Volver arriba |
|
|
Cesar C. Salazar Gonzalez
Master
Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
| Publicado: Jue 30 Sep, 2004 1:06 am Asunto: |
|
|
debo decir que por estar haciendo las facturas, se me olvido completamente, ahora que envian este mensaje pregunta, se los paso, mas adelante. por que da la casualidad, que no hayo, la dichosa carpeta, pues realice unos 2 que 3 formateos en el equipo y en un respaldo debe estar
mil disculpas
_________________
|
|
| Volver arriba |
|
|
Invitado
|
| Publicado: Vie 05 Nov, 2004 4:06 pm Asunto: |
|
|
Hola César C. Salazar González,
He estado repasando y buscando mensajes que tuviese algo de
efectos sobre ventanas de menus, y me ha salido este mensaje tuyo
Enlace a Codigo para XP MENU
Mi duda es si al final lograste transpasar este codigo de delphi
a builder. |
|
| Volver arriba |
|
|
Attila
Invitado
|
| Publicado: Dom 07 Nov, 2004 11:42 am Asunto: |
|
|
Por cierto a todo lo anterior, Soy yo quien puso el mensaje
Como Cesar indica en algun de sus mensajes
que va intentar pasar el codigo.
Me gustaria saber si ya lo tiene disponible
o tiene algun efecto mejor para aplicar a los menus desplegables.
Gracias. |
|
| Volver arriba |
|
|
_Willa
Capt
Registrado: 28 Ago 2002Mensajes: 169Ubicación: Madrid ( España )
|
| Publicado: Lun 08 Nov, 2004 11:26 am Asunto: |
|
|
Hola Attila,
Voy a intentar pasar el codigo del
enlace que pones, cuando lo tengo
terminado te aviso.
_________________
Saludos
~~~~~~~~
_Willa
~~~~~~~~
www.avancegame.com |
|
| Volver arriba |
|
|
_Willa
Capt
Registrado: 28 Ago 2002Mensajes: 169Ubicación: Madrid ( España )
|
| Publicado: Mar 16 Nov, 2004 11:40 am Asunto: |
|
|
Attila,
Dentro de poco tendras en el apartado de trucos
los distintos ejemplos de crear Estilos de Menu XP.
_________________
Saludos
~~~~~~~~
_Willa
~~~~~~~~
www.avancegame.com
Ultima edición por _Willa el Mar 23 Nov, 2004 12:20 pm, editado 1 vez |
|
| Volver arriba |
|
|
kalux
Master
Registrado: 21 Nov 2003Mensajes: 313Ubicación: Alicante - España
|
| Publicado: Jue 18 Nov, 2004 10:59 pm Asunto: |
|
|
_Willa
Los enlaces que pones dan el siguiente error:
Account for domain avancegame.com has been suspended
¿Hay algun otro sitio donde conseguirlos ?
Gracias y un saludo. |
|
| Volver arriba |
|
|
_Willa
Capt
Registrado: 28 Ago 2002Mensajes: 169Ubicación: Madrid ( España )
|
| Publicado: Vie 19 Nov, 2004 12:33 am Asunto: |
|
|
Es verdad!! 
Tengo el servidor jodido!!, no me habia dado cuenta.
Tardaré unos dias en activar de nuevo las descargas.
Mientras tanto si tienes prisa por recibir estos
ejemplos indicame tu correo y te lo envio.
_________________
Saludos
~~~~~~~~
_Willa
~~~~~~~~
www.avancegame.com |
|
| Volver arriba |
|
|
kalux
Master
Registrado: 21 Nov 2003Mensajes: 313Ubicación: Alicante - España
|
| Publicado: Dom 21 Nov, 2004 6:17 pm Asunto: |
|
|
Hola,
Mi direccion es: alicante1967@hotmail.com
Si prevees que en unos dias los tendras puedo esperar, en caso contrario te agradeceria que me los enviaras.
Una observacion, ¿ porque no los incluyes en el proyecto open source de estas paginas ?.
Gracias y un saludo.  |
|
| Volver arriba |
|
|
Cesar C. Salazar Gonzalez
Master
Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
| Publicado: Lun 22 Nov, 2004 7:10 pm Asunto: |
|
|
Oye, revisando el codigo, encontre las siguientes modificaciones
| Código: | FBackColor = (TColor) 0x00E1E1E1;
FIconBackColor = (TColor) 0x00D1D1D1;
FSelectedBkColor = (TColor) 0x00DCCFC7; |
y este es el codigo que no se podia convertir, espero que ahora si te sirva
| Código: | if(FMenu->ClassNameIs("TMainMenu")){
for(int i=0; i< FMenuItem->GetParentMenu()->Items->Count-1;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;
break;
}
}
}
} |
Saludos..
_________________
|
|
| Volver arriba |
|
|
_Willa
Capt
Registrado: 28 Ago 2002Mensajes: 169Ubicación: Madrid ( España )
|
| Publicado: Mar 23 Nov, 2004 12:44 pm Asunto: |
|
|
Bueno!!
Por fin, ya teneis disponibles otra vez los ejemplos listos para bajar.
Cesar, he probado el codigo q. indicas pero no funciona, debe estar
bien transcrito, pero no realiza el resultado esperado.
He estado mirando un poco ese bloque y lo que intenta hacer
es pintar de otro color, la parte de menu de la Cabecera
y pintar un rectangunlo en la parte de menu lista q se desplega.
Voy a revisar este codigo por si tiene alguna cosa q me haya saltado.
_________________
Saludos
~~~~~~~~
_Willa
~~~~~~~~
www.avancegame.com |
|
| Volver arriba |
|
|
Invitado
|
| Publicado: Mar 23 Nov, 2004 4:01 pm Asunto: |
|
|
Cesar,
Lo he revisado y al final funciona de la siguiente forma:
| Código: |
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);
}
|
Al final he comprobado que siempre pintaba el area de Iconos,
inclusive cuando un Item no lo tenia.
Este es el bloque que hay que incorporar al Ejemplo-1
 |
|
| Volver arriba |
|
|
_Willa
Capt
Registrado: 28 Ago 2002Mensajes: 169Ubicación: Madrid ( España )
|
| Publicado: Mar 23 Nov, 2004 4:03 pm Asunto: |
|
|
| Anonymous escribió: | Cesar,
Lo he revisado y al final funciona bien:
Este es el bloque que hay que incorporar al Ejemplo-1
| Código: |
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);
}
|
Al final he comprobado que siempre pintaba el area de Iconos,
inclusive cuando un Item no lo tenia.
|
_________________
Saludos
~~~~~~~~
_Willa
~~~~~~~~
www.avancegame.com |
|
| Volver arriba |
|
|
|
FAQ
Buscar
Miembros
Grupos de Usuarios
Registrarse
Perfil
Entra para ver tus mensajes privados
Entrar
