Keygen yazmada genel olarak Asembly kullanılır çok daha kolay oluyor. Malesef delphi bilmem. Döngüde bir hatan var gibi geldi. Algoritmayı yazarsan keygeni c++ da yapabilirm..

Bak Projene ActiveX Olarak WindowMediaPlayer'i Ekle. Ekledik'ten Sonra Player'in Adını "WindowsMediaPlayer1" Olarak Var Sayalım. Form'un Girişine veya Button'a Tıklandığında Eklenecek Kod. WindowsMediaPlayer1. URL := ('Mp3 'ün Adı. mp3'); Mp3 Uzantılı veya Başka Bir Ses Dosyasının Adı : ('Mp3 'ün Adı. mp3') Örnek Kod ; unit Form1_; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, ImgList, ToolWin, ExtCtrls, CheckLst, Menus, ActiveX, Buttons, OleCtrls, WMPLib_TLB; type TForm1 = class Command1: TButton; WindowsMediaPlayer1: TWindowsMediaPlayer; procedure Command1Click ; private public end; var Form1: TForm1; implementation procedure TForm1. Command1Click ; begin WindowsMediaPlayer1. URL := ('Mp3 'ün Adı. mp3'); end; end. Not ; Projeyi Exe'ye Çevirdikten Sonra Eklediğin Mp3, Mdi, Wav Gibi Dosyaları Proje İle Aynı Dizine Koyman Gerekecek. -

Al Bakalım. Dediğin Gibi, isminiz yazan Yere dubbah yazılır ise Senin Vermiş Olduğun 4 Rakkamdan Herhangi Birini Random Olarak Gösterecektir. Projeyi Burdan Indirebilirsin.

S. a Arkadaslar.. Ya Ben Seriallerimin Bu olmasını İstiyorum Fakat bir Türlü Ayarlayamıyorum.. delphi 7 ile Keygen Yapıorum.. Su anda Hiçbir Sorun yok.. Ve sunuda Belirteyim bir egitimim Yok bu konuda sadece Arastıra Arastıra Bu kadar İlerleyebildim.. ama ben İsmimi Yazınca Seriallerimin Sunların Olmasını istiyorum..: 1783A102B2B6EB93FA230 13496D08AAABDE837D70 100E5A69EEA97BC359E1 17ED11652BF21453EB1688D ama Ben Keygene İsim Yazıorum O otomatik olarak Yapıor bu işi.. Kendi Kafasına Göre Farklı Farklı Cıkartıyor.. Buda Delphide Kullandıgım Kodlar.. PHP: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, XPMan; type TForm1 = class Edit1: TEdit; Edit2: TEdit; Button1: TButton; Label1: TLabel; Label2: TLabel; XPManifest1: TXPManifest; Label3: TLabel; Label4: TLabel; procedure Button1Click ; private public end; var Form1: TForm1; implementation //LorD_isQ@hotmail.com © 2007 procedure TForm1. Button1Click ; var i, sn:integer; begin sn:=0; for i:=0 to length(edit1. text) do sn:=sn+ord(edit1. text ); sn:=sn sn; edit2. Text:=inttostr ; end; end. Şu serial İşinide bir kavrasam Süper Olucak.. Lütfen Serial İşi nasıl olucak Onu bir Söylermisiniz.. benm istedigim Serialler.. Programı Kendm Kırdım bu

Saol arkadas.. İnsanoglu doyumsuz oluyor.. Sana bir Örnekle acıklayayım About pencereside istiyorum ben müzikte

Asembly ile keygen yapmıştım. Delphi ile bu örneği görmek çok güzel oldu. Teşekkürler.

bu yazdıgından sayı harıcınde bısey cıkmaz bıraderr acı derlerını toplayıp sonra kare alıon

Arkadaslar Yokmu Yardım Edicek kimse.. İnanmıyorum..