Einzelnen Beitrag anzeigen

Natcree

Registriert seit: 5. Mär 2013
502 Beiträge
 
Delphi 7 Enterprise
 
#6

AW: Edit.text 5 mal Blinken lassen

  Alt 20. Feb 2014, 12:04
Okay habe es hin bekommen
Delphi-Quellcode:
procedure TForm3.Timer1Timer(Sender: TObject);
begin
Edit1.Visible := not edit1.Visible;
timer1.Tag:=Timer1.tag+1;
if timer1.Tag=strtoint(edit1.Text)*2 then timer1.Enabled:=false;
end;
So jetzt müsste nur noch der Text verschwinden und nicht die komplette edit box?
  Mit Zitat antworten Zitat