IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

- Delphi (https://www.ircforumlari.net/delphi/)

- - Boşluklu Kayan Yazı Delphi (https://www.ircforumlari.net/delphi/689553-bosluklu-kayan-yazi-delphi.html)

Kaf_Dağı

18 Mart 2015 14:33

Boşluklu Kayan Yazı Delphi

Kod:

procedure TForm1.FormCreate(Sender: TObject);

begin

timer1.interval:=250;

caption:='deneme'+'  ***... burası boşluk uzunluğu bunu kendiniz ayarlaya bilirsiniz ...***  ';

end;

 

 

procedure tform1.timer1timer(sender: tobject);

begin

caption:=copy(caption,2,length(caption)-1)+ caption[1];

end;

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 15:40.