Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Gráficos
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

 
 
Herramientas Buscar en Tema Desplegado
  #4  
Antiguo 28-10-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 24
Caro Va por buen camino
Hola onystam, como te han explicado solo es usar los eventos que te indica Neftali y cargar una u otra imagen,

Código Delphi [-]
procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
 //Cuando presione cambiamos la imagen
 Image1.Picture.LoadFromFile('d:\Imagen1.jpg');
end;
 
procedure TForm1.Image1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
 //Y al soltar cargamos la imagen incial.
 Image1.Picture.LoadFromFile('d:\Imagen.jpg');
end;
 
procedure TForm1.FormCreate(Sender: TObject);
begin
 //inicializamos el TImage
 Image1.Picture.LoadFromFile('d:\Imagen.jpg');
end;

Inclusive, también podrías hacerlo con una sola imagen y un label, cargas la imagen en el TImage y encima de ese TImage colocas el label, para solo cambiar de color del label utilizando los eventos OnMouseDown, OnMouseUp y también tiene OnMouseEnter, OnMouseLeave..

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
como ponerle una imagen a un boton pyanqn Varios 10 26-04-2012 17:52:05
Como hacer que funcione en Vista? Alfredo Varios 5 08-11-2007 14:31:01
Delphi4PHP Cómo hago que me funcione el TabOrder maximo_nashir PHP 4 31-08-2007 05:47:32
Insertar una imagen que funcione como boton gozi Conexión con bases de datos 2 05-12-2005 07:21:41
Boton que funcione como Backspace Julio César Varios 1 15-05-2003 21:15:06


La franja horaria es GMT +2. Ahora son las 13:41:17.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi