label

[aayylliinn]

arkadaşlar form açıldığında labelin 2 saniye visible.true olmasını daha sonra visible.false olmasını nasıl yapabilirim? timer dan bahsedilmiş ancak anlayamadım tam.

[csunguray]

Forma bir TTimer koyun. Formun OnCreat ine

Kod: Tümünü seç

procedure TForm1.FormCreate(Sender: TObject);
begin
  Timer1.Interval:=2000;
  Timer1.Enabled:=True;
end;

Timer1 in OnTimer eventina aşağıdakini yazın.

Kod: Tümünü seç

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Label1.Visible:=False;
  Timer1.Enabled:=False;
end;

[ikra]

eger ki her iki saniyede bir görünüp bir görünmemesini istiyorsan

Kod: Tümünü seç

Label1.Visible := not Label1.Visible

[aayylliinn]

teşekkürler arkadaşlar. sağolun..