Tekil Mesaj gösterimi
Alt 07 Temmuz 2010, 21:18   #1
Çevrimdışı
Slipknot
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Program Lisansı




Lisans alınca veya alamayınca çalıştırmak istediğiniz kodları bitbtn1 in onclikine yazacaksınız
orjinali böyle;


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
begin if code.Text = inttostr(sayi*25+9) then begin Application.MessageBox('Program lisansı Alındı', 'Tebrikler!', MB_OK ); end else begin Application.MessageBox('Program lisansı Alınamadı Hata: Yanlış Kod', 'Hata!', MB_OK or MB_ICONERROR) end end;

buda sizin düzenleyeceğiniz şekil;


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
begin if code.Text = inttostr(sayi*25+9) then begin //buraya lisans alınca çalışacak olan kod end else begin //buraya lisans almayınca(hata) calışacak olan kod end end;


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
Büyümeden yaşlandım ben.Hayat; ilk gördüğüm insanların,ilk gördüğüm gibi olmadıklarını öğretti.

Kahraman Tazeoğlu
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklamver bizimmekan