Thread: Creating DLL's in Delphi.

BEFORE YOU READ ALL WHAT 'S NEXT :
So before reading the topic I'll be telling you that :
1 - The topic will be teaching only to create a DLL and not to create a hack for games. Even trying to inject a DLL into a game it will not affect anything.

2 - If you already have knowledge of the contents of this Creation DLL is not necessary to read , post comments and much less useless , besides it is considered flood .




Some questions constumam be questions of several people :

Well I created a DLL to do more like it in a transfomar Hack ?
A: Well, first you need to know about how the game works , and modify the conteúdo.Por example ( this is not written in any game is just a demonstrational ) say it is written:
Damage = 25
So the DLL you will make it tranforme that number into something bigger, this will cause the " Damage" is great .
Summarizing the DLL well most of the time only changes existing values ​​, in some cases added.
Note : I suggest to start with The Duel though shortly to be working with him I believe to be a very simple system .

This topic will post some hack oo content in DLL ?
A: Not as I had written it will only show how to create the DLL .

You can put the topic also creating hack's for certain games ?
A: Look, I'll even post it for you to study the Hack would have direct, more like I know a lot of people here is not confiáviel still not be posting things like this .

More teaches you how to make DLL and does not teach how to hack than this point?
A: First, that the DLL is not used only in hack's is used in various programs , and if I postasse the hack straight you would have no study, no it would not do anything you would only make a copy and post elsewhere giving your name as the creator.






The creation


1 Rules for writing a DLL in Delphi : The functions and / or procedures DLL must follow these rules :
- They must be listed in the DLL exports clause . This allows the time to call the functions and / or procedures , to be accepted by the main program .
- The exported functions must be declared as stdcall ;
- The types of parameters a DLL should be standard types of Windows, at least if you want to use the DLL in other development environments , such as C + + .
- A DLL can use global data will not be shared by the base programs . When an application loads a DLL , it stores the global data of the DLL in its own address space


2nd In this step we will take the question to a question very often , " How to create a DLL ? " .
Initiating the development of DLLs in Delphi I will show you a very simple library . The main objective of this example is to show the syntax used to define a DLL in Delphi .
To begin , select the command File / New , choose the DLL in the main New Object Repository . This creates a very simple Source - Code .
Here is the source code of our first DLL :

Code:

Library MINHADLL.DLL;
uses SysUtils,
Classes;
{$R *.res}
function Triple(N: Integer): Integer; stdcall;
begin
Result := N * 3;
end;
function Double (N: Integer): Integer; stdcall;
begin Result := N * 2;
end;
exports Triple, Double;
end. 

3rd And now finally we include the dll in a Win32 project .
To make a form using our DLL we open the Delphi and create a new application .
Edits put two and two Buttons on onclick event of the button will do the calls of functions . To call a function from a DLL you need only declare functions equally as declared in the dll , ie , name , parameters and types .
Here is an example :

Code:

unit Unit1 ;
interface uses Windows , Messages , SysUtils , Variants , Classes , Graphics , Controls, Forms , Dialogs , StdCtrls ;
type TForm1 = class ( TForm )
Button1 : TButton ;
Button2 : TButton ;
Edit1 : TEdit ;
Edit2 : TEdit ;
Button1Click procedure (Sender : TObject ) ;
button2Click procedure (Sender : TObject ) ;
private { Private declarations }
public { Public declarations }
end ;
var Form1 : TForm1 ;
implemetation
{ $ R * . Dfm }

Delphi DLL functions { }

Code:

Double function ( N : Integer ) : Integer; stdcall ; external ' MINHADLL.DLL ' ;
Triple function ( N : Integer ) : Integer; stdcall ; external ' MINHADLL.DLL ' ;
procedure TForm1.Button1Click (Sender : TObject ) ;
var x, y : integer;
begin
x : = StrToInt ( Edit1.Text );
y: = Double ( x);
Edit1.Text : = IntToStr (Y) ;
end ;


TForm1.Button2Click procedure (Sender : TObject ) ;
var x, y : integer;
begin
x : = StrToInt ( Edit2.Text );
y: = triple ( x);
Edit2.Text : = IntToStr (Y) ;
end ;
end .

EM Portugues

Spoiler

ANTES DE TUDO LEIA O QUE VEM A SEGUIR:
Então antes de ler o tópico já estarei avisando que:
1- O tópico só estará ensinando a criar uma DLL e não a criar um hack para jogos. Mesmo tentando injetar a DLL em algum jogo ela não irá influenciar em nada.

2- Se já tem conhecimento deste conteúdo da Criação de DLL não é necessário ler, e muito menos postar comentários inúteis, além do mais é considerado como flood.



Algumas perguntas que constumam ser dúvidas de várias pessoas:

Bom eu criei a DLL mais como faço para ela se transfomar em um Hack ?
R: Bom, primeiro você precisa saber mais ou menos como funciona o jogo, e modificar o conteúdo.Por exemplo (isto não está escrito em jogo nenhum é somente uma desmonstração) digamos que esteja escrito assim:
Damage= 25
Então na DLL você irá fazer com que ela tranforme esse número em algo maior, isso irá fazer com que o "Damage" seja grande.
Resumindo bem a DLL na maioria das vezes apenas transforma valores já existentes, em algum casos acrescenta.
Obs: Aconselho começar com The Duel apesar de estar trabalhando a pouco tempo com ele acredito ser um sistema bem simples.

Este tópico irá postar o o contéudo de algum hack em DLL ?
R: Não como já havia escrito ele só irá mostrar como é a criação da DLL.

Você pode colocar no tópico também como criar hack's para determinados jogos ?
R: Olha, eu até postaria para você estudarem já daria o Hack direto, mais como sei que muita gente aqui não é confiáviel ainda não estarei postando coisas deste tipo.

Mais você ensina como fazer DLL e não ensina como fazer o hack, do que isso adianta ?
R: Primeiro que a DLL não é usada somente em hack's é usada em vários programas, e se eu postasse o hack direto vocês não teriam estudo nenhum isto não adiantaria em nada vocês só iriam fazer uma cópia e postar em outros lugares dando o seu nome como o do criador.






A criação


1º Regras para escrever uma DLL no Delphi : As funções e/ou procedimentos de DLL devem seguir estas regras:
- Precisam estar listados na cláusula exports da DLL. Isso possibilita que no momento de chamar a funções e/ou procedimentos, seja aceito pelo programa principal.
- As funções exportadas precisam ser declaradas como stdcall;
- Os tipos de parâmetros de uma DLL devem ser de tipos padrão do Windows, pelo menos se você quiser usar a DLL dentro de outros ambientes de desenvolvimento, como por exemplo, C++.
- Uma DLL pode usar dados globais que não serão compartilhadas pelos programas base. Sempre que uma aplicação carrega uma DLL, ele armazena os dados globais da DLL em seu próprio espaço de endereço


2º Neste passo vamos tirar a dúvida a uma pergunta muita frequente; “Como criar uma DLL?”.
Dando início ao desenvolvimento de DLLs no Delphi, vou mostrar a vocês uma biblioteca muito simples. O principal objetivo desse exemplo é mostrar a sintaxe utilizada para definir uma DLL no Delphi.
Para começar, selecione o comando File/New, escolha a opção DLL na página New do Object Repository. Isso cria um Codigo-Fonte muito simples.
Aqui está código fonte da nossa primeira DLL:

Code:

Library MINHADLL.DLL;
uses SysUtils,
Classes;
{$R *.res}
function Triple(N: Integer): Integer; stdcall;
begin
Result := N * 3;
end;
function Double (N: Integer): Integer; stdcall;
begin Result := N * 2;
end;
exports Triple, Double;
end.

3ª E agora por fim vamos incluir a dll num projecto Win32.
Para fazer um formulário usando nossa DLL vamos abrir o Delphi e criar uma nova aplicação.
Colocar dois Edits e dois Buttons, no evento OnClick dos botões faremos as chamadas das funções. Para chamar um função de uma DLL é preciso apenas declarar as funções de forma igual a declarada na dll, ou seja, nome, parâmetros e tipos.
Aqui fica um exemplo:

Code:

unit Unit1;
interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
type TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Edit1: TEdit;
Edit2: TEdit;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private { Private declarations }
public { Public declarations }
end;
var Form1: TForm1;
implementation
{$R *.dfm}

{funções da DLL Delphi}

Code:

function Double (N: Integer): Integer; stdcall; external 'MINHADLL.DLL';
function Triple (N: Integer): Integer; stdcall; external 'MINHADLL.DLL';
procedure TForm1.Button1Click(Sender: TObject);
var x, y: integer;
begin
x := StrToInt(Edit1.Text);
y := Double(x);
Edit1.Text := IntToStr(y);
end;


procedure TForm1.Button2Click(Sender: TObject);
var x, y: integer;
begin
x := StrToInt(Edit2.Text);
y := Triple(x);
Edit2.Text := IntToStr(y);
end;
end.

sorry use google translator