Delphi-ile-Keygen-Yapımı_emresupcinMerhaba arkadaşlar,

 

3 gündür dersleri biraz boşladık bu yüzden sizlere basit bir delphi dersi anlatacağım konumuz ise Delphi programını kullanarak nasıl keygen yapabiliriz.

 

 

 

Öncelikle bir TButton ve bir TEdit belirtin. Butonun adını “Değiştir” koyun. Şimdi butona iki kez tıklayıp şu kodu ekleyin:

 

 

1  var
2  x, y, x2, y2 : integer;
3  begin
4  x := Random(100000);
5  x2 := Random(100000);
6  y := Random(100000);
7  y2 := Random(100000);
8  
9  Edit1.Text := IntToStr(x)+ '-' +  IntToStr(x2)+ '-' +   
                         IntToStr(y)+ '-' +  IntToStr(y2)

 

Şimdi Run butonuna basın ve programı çalıştırın. “Değiştir” butonuna tıklandıkda Edit’deki rakamlar değişiyor. Yazının sadece okunmasını istiyorsak da Edit’e tıklayıp, ReadOnly kısmını true yapmalıyızRandom kısmındaki rakamın sıfırları Edit’deki rakamlara eşitdir. O yüzden sıfırları çoğalta ve azalta bilirsiniz.

Yazar
Yazar
Bilgisayar Programcısı, Web Tasarımcı, Üniversite Öğrencisi...
Twitter Facebook Google Linkedin Flickr YouTube

Önceki Yazı:E-Ticaret Nedir? Kavramını Tam Olarak Biliyor musunuz?

Sonraki Yazı:ASP’de Gelişmiş IsNull Fonksiyonu Nasıldır?

BENZER YAZILAR
YORUMLAR
SİZ DE CEVAP YAZABİLİRSİNİZ
Bu yazı hakkında görüşünüzü belirtin.

ES Web Tasarım Web Tasarım Blog Teması Emre Supçin Bu tema ES Web Tasarım tarafından düzenlenmiştir. Hiçbir şekilde kopyalanamaz.