Zpět na seznam článků     Číst komentáře (0)     Verze pro tisk

Cracking4neWBies - Lekce č.12

Autor: DjH   
19.10.2007

Cracking pro začátečníky...podvanácté :-)


Cracking4neWBies

Lekce č.12

Výroba patchů podruhé - Delphi…



Balík zde

Proč se znovu hrabat ve výrobě cracků? Protože teďka Vám ukážu, jak naprogramovat crack v Delphi ;)

V C++ jsou funkce – fopen, fwrite, fseek a fclose…
V Delphi jsou f-ce- FileOpen, FileWrite, FileSeek a FileClose…
Je to velmi podobné… Ale teď, jak to použít? Skoro stejně jako v céčku… tedy syntaxe je takováto:

Procedure CrackIt;
Var
FileHandle, Address, BytesToWrite, NbrOfBytes:integer;
FlName:string;

begin
 FileHandle := FileOpen (FlName, fmOpenReadWrite); //Otevrit soubor, a nastavit FileHandle jako handle souboru…
  FileSeek (FileHandle, Address, 0); //Presun se na offset(address) od zacatku (poslední parametr (0)…0=from begin; 1=current position; 2=end; (2 se pouziva vetsinou pro zjisteni velikosti souboru
  FileWrite(FileHandle, BytesToWrite, NbrOfBytes); //Prepis byty, NbrOfBytes je, kolik bytu se ma zapsat…
  FileClose(FileHandle);
End;

Takže tohle byl podprogram „CrackIt“, (PS:nemusí to být Procedura, může to být i Function ;)), Zavoláme ji „příkazem“ „CrackIt;“…

Musíme ale nadefinovat ještě proměnné… Když budeme chtít cracknout naše (jejich =)) CrackMe z lekce 1 a 2, bude to vypadat takto:

//################################################################//
 Address :=$585; //Hexadecimalni offset ($ znaci hex)
 BytesToWrite:=$74 ; //Hexadecimalni instrukce k zapsani
 NbrOfBytes :=1 ; //Pocet bytu...
 FlName :='crackme.exe';//Implicitni filename...
//################################################################//
 CrackIt; //Start procedury (funkce)...


Samozřejmě je lepší, to skombinovat s OpenDialogem ;)…
V balíku máte příklady v Delphi (VCL i bez VCL) komentáře jsou anglicky, a předem se omlouvám za špatnou angličtinu =), ale česky mě to psát nebaví… je to takové divné…

BTW: jestli NÁHODOU nevíte, jak dělat dialogy, icony, bitmapy atd… Pořiďte si freeware prográmek ResHacker, kde si vše vytvoříte hned, potom by nebylo na škodu si pořídit freeware ResEditor, nebo 30ti denní trial Resource Builder (ale ten stojí za to =), ten je nejlepší)… Pokud nevíte, jak udělat bitmapu:
V ResHackerovi klikněte na upravovaný Dialog pravým myšítkem, klikněte na Insert Control, vyberte BITMAP, a jako „Caption“, napište název Resource bitmapy (v mém příkladu na WinAPI: „PIC1“ (BACHA, JE TO CASE SENSITIVE!!))

Líbil se Vám článek?
Budeme potěšeni, pokud vás zaujme také reklamní nabídka

Social Bookmarking

     





Hodnocení/Hlasovalo: 2.12/8

1  2  3  4  5    
(známkování jako ve škole)