Cita:
Empezado por albelg
hola amigos del foro me gustaria conocer si existe alguna forma de hacer parpadear el CAPTION de un boton. gracias de antemano
|
Hola albelg,
Puedes hacerlo de varias formas, la primera y la mas rápida es poner un TTimer y cada "x Seg" que muestre el caption y después lo quite.
También puede crear un componente que herede del TButton y añades algunos componentes, pero este último creo que es más complicado.
eje.
Pon un componente TTimer1 en el formulario que esta en la paleta de system y es un reloj
Código Delphi
[-]procedure TForm1.Timer1(Sender: TObject);
begin
with Button1 do
if (Length(Caption) > 0) then
Caption := ''
else
Caption := 'Aceptar';
end;
y para desartivarlo al pulsar el botón solo tienes que poner Timer1.Enabled := False
Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
begin
Timer1.Enabled := False;
Button1.Caption := 'Aceptar'; end;
Un saludo.
upsss, se me ha adelantado ecfisa