Utilizamos cookies propias y de terceros. Al navegar entendemos que aceptas el uso de cookies. +Info.
Política de cookies
Proyecto AjpdSoft

· Inicio
· Buscar
· Contactar
· Cookies
· Descargas
· Foros
· Historia
· Nosotros
· Temas
· Top 10
· Trucos
· Tutoriales
· Usuario
· Wiki

Proyecto AjpdSoft: Foros

AjpdSoft :: Ver tema - Como puedo cambiar de color un DBEdit
Foros de discusión Buscar Perfil FAQ Iniciar sesión
Information Como puedo cambiar de color un DBEdit

Publicar nuevo tema Responder al tema
Foros de discusión » Borland Delphi, Codegear Delphi .Net   
Ver tema anterior :: Ver tema siguiente
AutorMensaje
frankolar
Buen usuario


Registrado: Jul 07, 2011
Mensajes: 6

Asunto: Como puedo cambiar de color un DBEdit Responder citando

Disculpen, espero me puedan ayudar, lo que necesito es saver de que forma puedo cambiar de color en los DBEdit o Edit al tener el foco dicho control y al salir del mismo cambiar al color que tenia antes.

De antemano muchas gracias por su ayuda...
MensajePublicado:
Mie Ago 03, 2011 8:37 am
Top of PageVer perfil de usuario
alonsojpd
Administrador/Moderador


Registrado: Sep 16, 2003
Mensajes: 2687

Asunto: Re: Como puedo cambiar de color un DBEdit Responder citando



Anuncios



frankolar escribió:
Disculpen, espero me puedan ayudar, lo que necesito es saver de que forma puedo cambiar de color en los DBEdit o Edit al tener el foco dicho control y al salir del mismo cambiar al color que tenia antes.

De antemano muchas gracias por su ayuda...


Hola Frankolar, te comento cómo hacer esto:

1. En el evento OnEnter del componente (sea el DBEdit o el Edit):

Código:

procedure TformGUbicacion.txtNombreEnter(Sender: TObject);
begin
  TEdit(sender).Color := clMoneyGreen;
end;


En el caso anterior te lo explico para un TEdit, para un TDBEdit es lo mismo:

TDBEdit(sender).Color := clMoneyGreen;

Esto haría que cuando se enfocara el TEdit "txtNombre" el fondo aparecerá en verde.

2. Para el caso de cuando se pierde el foco:

Código:

procedure TformGUbicacion.txtNombreExit(Sender: TObject);
begin
  TEdit(sender).Color := clWindow;
end;
MensajePublicado:
Jue Ago 04, 2011 6:04 am
Top of PageVer perfil de usuario
Mostrar mensajes de anteriores:   
Todas las horas son GMT - 1 Horas
Publicar nuevo tema Responder al tema
Foros de discusión » Borland Delphi, Codegear Delphi .Net  

Cambiar a:  
Key
  Puede publicar nuevos temas en este foro
No puede responder a temas en este foro
No puede editar sus mensajes en este foro
No puede borrar sus mensajes en este foro
No puede votar en encuestas en este foro
Este sitio web NO CONTIENE malware, todos los programas con código fuente aquí. Autor: Alonso Javier Pérez Díaz Google+ Síguenos en Google+