 |
Club Builder Foro de C++Builder en español
|
| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
Susan Invitado
|
Publicado: Mie 01 Sep, 2004 5:56 am Asunto: Boton con dos imagenes(freeware) una al pasar el mouse y otr |
|
|
Hola, Necsito algun componente freeware para Builder 6.0 que me pemiita usar una imagen cuando el mouse pasa por encima y otra cunado el boton esta inactivo....espero que meentiendan!!!
De antemano gracias.
Saludos. |
|
| Volver arriba |
|
 |
Cesar C. Salazar Gonzalez Master


Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
Publicado: Mie 01 Sep, 2004 4:49 pm Asunto: |
|
|
Has intentado con los eventos OnMouseMove,
puede que te ayude a realizar algo por el estilo..
| Código: | int StartX, StartY; // Declare at the top of the form’s unit
// Use this code as the OnMouseDown event handler of the form:
void __fastcall TForm1::Button1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y)
{
StartX = X;
StartY = Y;
}
// Use this code as the OnMouseUp event handler of the form:
void __fastcall TForm1::FormMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y)
{
Form1->Canvas->Rectangle(StartX, StartY, X, Y);
StatusBar1->Panels->Items[0]->Text = "";
StatusBar1->Panels->Items[1]->Text = "";
StatusBar1->Panels->Items[2]->Text = "";
StatusBar1->Panels->Items[3]->Text = "";
}
// Use this code as the OnMouseMove event handler of the form:
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift, int X, int Y)
{
if (Shift.Contains(ssLeft)) // make sure button is down
{
if (Y > StartY)
{
StatusBar1->Panels->Items[0]->Text = "Top: " + IntToStr(StartY);
StatusBar1->Panels->Items[2]->Text = "Bottom: " + IntToStr(Y);
}
else
{
StatusBar1->Panels->Items[0]->Text = "Top: " + IntToStr(Y);
StatusBar1->Panels->Items[2]->Text = "Bottom: " + IntToStr(StartY);
}
if (X > StartX)
{
StatusBar1->Panels->Items[1]->Text = "Left: " + IntToStr(StartX);
StatusBar1->Panels->Items[3]->Text = "Right: " + IntToStr(X);
}
else
{
StatusBar1->Panels->Items[1]->Text = "Left: " + IntToStr(X);
StatusBar1->Panels->Items[3]->Text = "Right: " + IntToStr(StartX);
}
}
} |
Esto esta en la ayuda de Builder 6.0, lo traspaso tal y cual para que te puedas dar una idea de lo que puedes hacer, si encuentro algo mas sencillo. te lo envio _________________
 |
|
| Volver arriba |
|
 |
Susana Invitado
|
Publicado: Jue 02 Sep, 2004 4:05 am Asunto: No |
|
|
Gracias Cesar, pero necesito componentes, se que existen esos botones por ahi pero no se en donde encontrarlos,
alguin me da una pista___
gracias.
saludos. |
|
| Volver arriba |
|
 |
Angel Master


Registrado: 15 Abr 2003Mensajes: 2311Ubicación: Toledo (España)
|
Publicado: Jue 02 Sep, 2004 8:33 am Asunto: |
|
|
En LMDTools (yo tengo instalada la vesión 6), los componentes LMDSpeedButton y LMDButton tienen un efecto que cambia el aspecto del mismo al pasar el ratón por encima. No he probado en una aplicación, pero según la demo que viene con la instalación pede ser que te valga. _________________ Un saludo
Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA) |
|
| Volver arriba |
|
 |
Cesar C. Salazar Gonzalez Master


Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
Publicado: Jue 02 Sep, 2004 4:35 pm Asunto: |
|
|
efectivamente, los lmdtools, son muy buenos, la cuestion seria, tratar de comprarlos. ya que al ejecutarse dentro de builder, no envian una mensaje, pero cuando el builder no se esta ejecutando y se corre la apliacion creada con lmdtools, aparecen un mensaje, de gracias por utilizar estos componentes. etc, etc..(bueno en mi caso asi es),
por otro lado.., ahora Susan: para crear el efecto que dices existen varias formas.. y una de ellas es derivar un nueva clase de TButton, existen miles de ejemplos en delphi o builder, por la red, y puede ser una de las soluciones..
mira dentro de 2 dias (sabado-domingo), espera una respuesta mia, en esta parte y te paso un ejemplo con el codigo que necesitas que necesitas.. para crearlo..
saludos.. _________________
 |
|
| Volver arriba |
|
 |
Susan Invitado
|
Publicado: Jue 02 Sep, 2004 6:50 pm Asunto: ? |
|
|
En conclusion puedo o no usar los LMDTools o no??, tendre algun problema al usarlos en mi aplicacion como mensajes, o fallas por no comprarlos, o puedo usar sin problemas una version freeware??
Gracias Angel y cesar
Bye. |
|
| Volver arriba |
|
 |
Cesar C. Salazar Gonzalez Master


Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
Publicado: Jue 02 Sep, 2004 6:53 pm Asunto: |
|
|
Si compras la version, claro que no te aparece el mensaje, pero si bajas la sharware, entonces si vas a ver los diferentes mensajes..
saludos.. la desicion es tuya.. _________________
 |
|
| Volver arriba |
|
 |
Tugui Master


Registrado: 09 Nov 2002Mensajes: 663
|
Publicado: Jue 02 Sep, 2004 9:00 pm Asunto: |
|
|
Hay una versión freeware que no da ningún tipo de problema, avisos o recordatorios de ningún tipo. Me refiero a LMDTools claro. _________________ ¡ADELANTE CON ESTE SUPER FORO! |
|
| Volver arriba |
|
 |
Angel Master


Registrado: 15 Abr 2003Mensajes: 2311Ubicación: Toledo (España)
|
Publicado: Vie 03 Sep, 2004 9:47 am Asunto: |
|
|
César: Llevo varios meses usando LMDTools 6 y a mi no me da ningún mensaje de ningún tipo en las aplicaciones completas. Susan, sinceramente creo que puedes usar la herramienta sin mayor problema; además, ya está disponible la versión 7 _________________ Un saludo
Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA) |
|
| Volver arriba |
|
 |
Susan Invitado
|
Publicado: Jue 09 Sep, 2004 3:06 am Asunto: _ |
|
|
Bueno pero entonces, en los famosos LMDTools hay un boton que me permite poner dos imagenes,??
Gracias amigos..
Bye, |
|
| Volver arriba |
|
 |
|
|
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
|
© 2002–2026 Club Builder · Funciona con phpBB.
|