Delphi Dünyası Facebook'ta

Duyurular

Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

« önceki sonraki »
Sayfa: [1]   Aşağı git

Gönderen Konu: Kayan Yazıya Ne Dersiniz  (Okunma sayısı 1717 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı Mikdad

  • Delphi 4 Level 1
  • *
  • İleti: 150
  • Rep: +2/-2
  • Cinsiyet: Bay
    • http://www.mikdad.net
Kayan Yazıya Ne Dersiniz
« : 08 Kasım 2005 19:08:10 »
Kod: [Seç]
procedure TForm1.FormCreate(Sender: TObject);
begin
timer1.Interval:=250;
caption:='www.Delphidunyası.com';
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
caption:=copy(caption,2,length(caption)-1)+caption[1];
end;
« Son Düzenleme: 09 Kasım 2005 13:44:13 by Fatih »
Kayıtlı
Hiç KiMSe VaZGeÇiLMeZ DeĞiLDiR
WwW.Minikhost.Net    Host Dünyasında Yeni Bir Soluk
WwW.Mikdad.Net        İslami İçerikli Portalınız
WwW.Pckahvesi.com   Netteki Yeni Adresiniz
Sayfa: [1]   Yukarı git
« önceki sonraki »