Ver Mensaje Individual
  #6  
Antiguo 22-12-2014
Avatar de nlsgarcia
[nlsgarcia] nlsgarcia is offline
Miembro Premium
 
Registrado: feb 2007
Ubicación: Caracas, Venezuela
Posts: 2.206
Reputación: 21
nlsgarcia Tiene un aura espectacularnlsgarcia Tiene un aura espectacular
tulio,

Cita:
Empezado por tulio
...en un botón quiero cambiar el color del formulario, hacer una pausa y cambiar nuevamente el color...


Revisa este código:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
   Form1.Color := clYellow;
   Form1.Repaint;
   Sleep(1000);
   Form1.Color := clNavy;
   Form1.Repaint;
   Sleep(1000);
   Form1.Color := clRed;
   Form1.Repaint;
   Sleep(1000);
   Form1.Color := clGreen;
   Form1.Repaint;
   Sleep(1000);
   Form1.Color := clWindow;
   Form1.Repaint;
end;
El código anterior en Delphi 7 sobre Windows 7 Professional, cambia el color del formulario en runtime, como se muestra en la siguiente imagen:



Te sugiero revisar el Punto # 3 de la Guía de Estilo Estándar.

Gracias por tu colaboración

Nelson.

Última edición por nlsgarcia fecha: 22-12-2014 a las 14:22:16.
Responder Con Cita