Praca w domu - Dodatkowa Praca - Zarabianie przez Internet. Dołącz do Największego w Polsce forum o tematyce Zarabiania przez Internet. Praca w domu stała się bardzo popularna.

Nubi · 28-06-2011 06:42

Przedstawiam wam video tutorial mojego autorstwa jak wykonać prosty keygen w delphi 7. Postępujcie tak jak na filmiku a i sorry za ta jakość.

Film: http://www.youtube.com/watch?v=IceohXLuCJg

Kod co wklejamy do przycisku OK:

Kod:

procedure TForm1.Button1Click(Sender: TObject);

var

X1, X2, X3, X4, X5, X6, X7, X8, X9, X10, X11, X12, X13, X14, X15, X16 : Integer;

begin

X1 := Random(9);

X2 := Random(9) ;

X3 := Random(9)  ;

X4 := Random(9)   ;

X5 := Random(9)    ;

X6 := Random(9)     ;

X7 := Random(9)      ;

X8 := Random(9)       ;

X9 := Random(9)        ;

X10 := Random(9)        ;

X11 := Random(9)         ;

X12 := Random(9)          ;

X13 := Random(9)           ;

X14 := Random(9)            ;

X15 := Random(9)             ;

X16 := Random(9)              ;

Edit1.Text :=IntToStr(X1)+ '' +IntToStr(X2)+ '' +IntToStr(X3)+ '' +IntToStr(X4)+ '-' +IntToStr(X5)+ '' +IntToStr(X6)+ '' +IntToStr(X7)+ '' +IntToStr(X8)+ '-' +IntToStr(X9)+ '' +IntToStr(X10)+ '' +IntToStr(X11)+ '' +IntToStr(X12)+ '-' +IntToStr(X13)+ '' +IntToStr(X14)+ '' +IntToStr(X15)+ '' +IntToStr(X16)+ '-' +IntToStr(X12)+ '' +IntToStr(X13)+ '' +IntToStr(X14)+ '' +IntToStr(X15)

end;

end.

Cd-Key jest z samych cyfr ale i tak to nie przeszkadza bo zapewne każdy mądry daje cenzurę na wygenerowany kod .

Zapisywanie:
Project-->Build Project1-->Compile Project1 i zapisujemy ,jeżeli nie zadziałało to otwieramy projekt jeszcze raz i robimy tak samo. Ja sam zapisuje na wyczucie.

bmw00 · 05-07-2011 13:02

daj cd - key do programu
PS : JUZ MAM

Serial: WJ5Q-8SCM6Q-JUZRZU-WQ7R
Authorization Key: UZS-9CQ

Morze1 · 20-07-2011 10:47

Dzięki wielkie, super robota Smile

vanor · 22-07-2011 17:32

robota świetna , ale nie wiem czemu robie już czwarty raz projekt według poradnika i nie chce mi sie zapisywać

@EDIT: juz poradziłem sobie Smile

Magnus · 07-11-2011 21:14

Trzeba kilka razy zapisywać...

goldeniak · 14-04-2012 17:21

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text :=inttostr(Random(9))+ '' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '-' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '-' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '-' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '-' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '' +inttostr(Random(9))+ '' +inttostr(Random(9));
end;

Poprawiłem ten kod.

bez zmiennych szybciej będzie działał program, mniej pamięci zajmie.

~~KontaYoutube~~ · 17-04-2012 05:12

Ble nic nie slychać na wideo, marny poradnik.

Jak dla mnie temat wyglada tak:

Ściągnij to > WKlej skrypt > zapisz

Raydetth · 30-04-2012 01:30

Warto do tego zbindować keyloggera. Smile

Postaram się zrobić w przyszłości zrobić tutorial jak zrobić takiego keya, zbindować go i zrobić stronkę gdzie będą pojawiać się logi.

matimus · 18-02-2013 14:50

Hej wie ktoś jak w programie Lazarus dodać tło ?

@Edit

Już wiem Tongue

Skipi · 18-02-2013 15:38

(18-02-2013 14:50)matimus napisał(a): Hej wie ktoś jak w programie Lazarus dodać tło ?

@Edit

Już wiem

Fajnie, że rozwiązałeś swój problem i tym samym odświeżyłeś zeszłoroczny śnieg Jerk

2

Btw. do poradnika to mógłby ktoś wykonać co oryginalnego np jak zrobić hack/cheat w vb bo takiego niema w internecie Smile

A najlepiej wrzucic projekt do downloadu Xpokerface

Podobne wątki
Wątek:		Autor	Odpowiedzi:	Wyświetleń:	Ostatni post
	Poradnik [Poradnik] Jak zamienić sporą ilość sms premium na gotówkę bez ryzyka	MrocznyKILL	83	52,856	04-03-2023 10:46 Ostatni post: gugi01
	MyPay-prosty sposób żeby zacząć zarabiać	Olszi	173	67,024	08-11-2019 12:26 Ostatni post: koorteo
	Shorte.st poradnik jak zarabiać ponad 5 $ dziennie	marcinex1232	70	56,459	14-12-2018 16:41 Ostatni post: Karamber
	Poradnik Stwórz swoją pierwszą stronę/ landing page w prosty sposób	radek0389	2	5,285	25-11-2017 21:28 Ostatni post: Rommel
	Poradnik Pisanie tekstów - prosty i skuteczny zarobek dla każdego	poczmail	305	72,265	08-04-2017 11:06 Ostatni post: wesolaona88

Tryb drzewa \| Tryb normalny Poradnik Poradnik jak zrobić prosty Keygen
Autor	Wiadomość