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.

Post: #1

Witam. Z racji tego, że nie mam co robić chciałbym opisać Wam krok po korku jak zrobić własnego keygena w Lazarusie (Delphi to praktycznie ten sam kompilator). Wszyscy programują w VB, a ja wole Lazarusa
Wszystkie linki będą skrócone w adf.ly. Więc jeśli się nie podoba, nie klikaj i szukaj po necie wszystkiego co potrzebne

Zacznijmy.
Najpierw ściągamy Lazarusa [CLICK] dla swojego windowsa. Po otwarciu zobaczymy coś takiego :


Komponent - np. przycisk, etykieta itd...

1. Edytor źródeł - tutaj będziemy wpisywać kod źródłowy, który pozwoli wykonywać operacje programowi po naciśnięciu na dany komponent.
2. Forma - inaczej program. Tak będzie wyglądał nasz program po skompilowaniu. Tutaj będziemy nanosić komponenty.
3. Inspektor obiektów - tutaj będziemy ustawiać wartości/właściwości dla komponentów...
4. Panel programu - umieszczone wszystkie opcje programu oraz komponenty.


Dobra, robimy keygena.

1. Będzie potrzebne nam jakieś zdjęcie jako tło. Dajmy, że robimy keygena do The Sims 3. Więc ściągamy obrazek np. z google grafika.
Następnie wchodzimy do Lazarusa, przechodzimy na komponenty Additional i dodajemy komponent TImage (klikamy na niego, a potem na formę). Będzie to wyglądało tak:


Komponent rozciągamy na cały obszar formy no chyba że chcemy zrobić logo czy coś i zostawić obszar pusty. To chyba każdy potrafi zrobić...

Co dalej... Dalej przechodzimy na Inspektor Obiektów mając zaznaczony cały czas komponent Image1: TImage. W Inspektorze Obiektów klikamy na Picture, a następnie na kwadracik, który jest oznaczony strzałeczką. Wyskakuje nam okno dialogowe, na którym klikamy Wczytaj. No i szukamy naszego zdjęcia, które ma być tłem. Zatwierdzamy OK'ejem no i mamy tło.



Przechodzimy w komponenty Standard i dodajemy :
-TButton
-TEdit
Będzie to wyglądało tak :


Teraz zajmiemy się zmianą napisu Button1 oraz Edit1. Jeżeli ma być to keygen to wiadomo, na przycisku powinno być Generate, a Edit powinien być pusty. Robimy następująco :
Klikamy na komponent Button1 przechodzimy na Inspektor Obiektów i klikamy na Caption. Następnie wprowadzamy nasz napis, który ma się pojawić na przycisku czyli w tym wypadku Generate :

I zatwierdzamy Enterem.

Podobnie robimy z Edit1, w tym wypadku nie Caption, a Text. No więc klikamy na komponent Edit1 i zmieniamy wartość w polu Text. Będzie to pole puste, no chyba, że ktoś chce tam umieścić napis np. "Here will be a key" czy coś w tym stylu.

I zatwierdzamy Enterem.

Button oraz Edit można dowolnie rozciągać (Edit tylko w szerz).
Dobra, połowa roboty za nami. Dodamy jeszcze tylko jeden komponent, o którym zapomniałem wcześniej... Będzie to TProgressBar z komponentów Common Controls

Można go dowolnie rozciągnąć według swojego uznania.

Teraz zajmiemy się troche mniej przyjemną rzeczą czyli kodem źródłowym. Postaram się wszystko objaśnić żeby nie było żadnych problemów.

Przechodzimy do Edytor źródeł czyli tam gdzie wpisujemy kod źródłowy. Szukamy tłustego napisu var czyli sekcji deklaracji zmiennych/stałych. Dopisujemy tam coś takiego :
http://adf.ly/TsN8E

Teraz klikamy 2 razy lewym przyciskiem myszy na komponent Button (nasz Generate). Automatycznie przeniesie nas do Edytor źródeł w miejsce gdzie będziemy przypisywać komendy do Button. W tym miejscu wpisujemy to:
http://adf.ly/TsNV9
FOR .. TO .. DO
Pętla, która ładuje ProgressBar do 100, a następnie wykonuje dalsze operacje.

Gdybyśmy chcieli aby ładowanie ProgressBaru było w odstępach czasowych np. 0,5 sekundy musimy zastosować pętlę repeat - until, która będzie wyglądać tak :
http://adf.ly/TsMwx

Zastosujcie obydwie pętle w programie to zobaczycie na czym polega chociaż i tak opisałem wszystko szczegółowo.


Mamy już załatwiony ProgressBar. Teraz musimy zająć się napisem w Edit no i jakimś oknem, które powiadamia, że klucz został wygenerowany.

Po tym kodzie, który wkleiłeś do Button wpisujemy :
http://adf.ly/TsNhc

Application.Title oznacza nazwę okna czyli np. Success!.
ShowMessage to wiadomość, która pojawi się w oknie.

Na końcu coś czego zapomniałem napisać na początku lecz to nie ma znaczenia. Klikamy na Formę czyli :

I robimy tak jak w przypadku Button'a. Zmieniamy nazwę w Caption. Będzie to nazwa programu czyli w tym wypadku The Sims 3 Keygen.


Tak wygląda nasz keygen.


1. Od razu po otwarciu.
2. Po naciśnięciu Generate i załadowaniu ProgressBara
3. Po naciśnięciu OK w oknie dialogowym

Można także zmienić ikone programu wchodząc w Projekt - Opcje projektu... - Wczytaj ikonę - OK.
Następnie zapisujemy czyli Plik - Zapisz jako - Zapisz - Zapisz
Jeszcze musimy skompilować program bu utworzyć plik .exe. Czyli klikamy F9 po zapisaniu no i mamy naszego keygena pod nazwą project(exe).

Jak widzicie nic trudnego. W 2 min zrobiłem coś takiego



Jeśli macie szacunek do czyjeś pracy proszę o nie wrzucanie tego nigdzie. Poradnik napisany w 100% od początku do końca przeze mnie. Gdyby ktoś wyhaczył jakieś błędy w pisowni czy w programie(w co wątpie) to pisać w komentarzach.
Tak, wiem, jestem okrutny bo skróciłem linki w adf.ly, wybaczcie

Post: #2

Nie należy on do najładniejszych ,poradnik mi się nie przyda bo wolę c++, ale... poradniczek jest spoko dla potrzebujących którzy nie rozumieją jak to wszystko działa się przyda.

Post: #3

przezemnie - przeze mnie *
Reput za chęci - chwała Ci, początkujący będą wdzięczni ;p

Post: #4

Potrzebny jest .Net FrameWork do otworzenia tego keygena w tym programie?

Post: #5

dla początkujących będzie ok

Post: #6

Chlopie thx xd wkoncu sie naucze robic te fake hacki w ppa. Thx

Post: #7

(12-08-2013 20:30)miniek9090 napisał(a):  Potrzebny jest .Net FrameWork do otworzenia tego keygena w tym programie?

Nie, klikasz F9 i kompiluje.

Post: #8

VB Lepszy ale + dam

Post: #9

Cytat:Gdyby ktoś wychaczył jakieś błędy w pisowni

Wyhaczył* 2
Jak zobaczyłem pierwszego screena to myślałem, że to Delphi, czytam mówię WTF jaki Lazarus ?

Post: #10

To praktycznie ten sam kompilator. Delphi bardzo podobne, jak nie takie samo