Fundir DLL dentro do .exe

[SrMaster]

seguindo esse tutorial consegui fundir.

1 - Crie uma pasta no Local desejado. Exemplo 'C:\WAV Res'.

2 - Copie todos os arquivos que deseja inserir em seu executavel.

3 - Crie um arquivo de texto(.txt) nessa pasta. Exemplo 'WavRes.txt'.

4 - No Arquivo texto: será informado um nome qualquer que será usando como referencia; o tipo de arquivo (WAVFILE, MP3FILE, ZIPFILE, etc...); e por ultimo o nome do arquivo real com a extensão. Exemplo: MUSICA01.WAV.
Exemplo geral( VMUSICA WAVFILE MUSICA01.WAV ) .

5 - Compile o arquivo de texto usando o Brcc32.exe(no diretório Delphi\Bin) por linha de comando. De preferencia crie na pasta um atalho para o Brcc32, depois dê um clique com o botão esquerdo do mouse sobre o arquivo de atalho e clique em 'Propriedades', no campo objeto depois do "C:\...\Delphi\Bin\brcc32.exe" dê um espaço e digite entre aspas duplas o nome do arquivo de texto que você criou com o caminho completo. Exemplo: "C:\Wav Res\WavRes.txt".
Pronto para compilar o arquivo dê um clique duplo no atalho.

6 - O Brcc32 vai gerar um arquivo de recursos com o mesmo nome do arquivo de texto. Exemplo 'Wav.RES'.

7 - Copie este arquivo para a pasta onde está o projeto.

8 - Agora no Delphi abra o projeto que você deseja inserir o arquivo de recursos, click no menu Projects | View Source e digite {$R Wav.RES}.

9 - Pronto agora é só Compilar o projeto e os arquivos vão estar dentro do aplicativo.

Como usar os arquivos?

Abaixo está o procedimento que vamos usar para extrair o arquivo Musica01.wav e grava-lo no disco.

procedure Form1.Button1Click(Sender: TObject);
var
  Arq: TResourceStream;
begin
  Arq:= TResourceStream.Create(HInstance, 'VMUSICA', 'WAVFILE');
  try
    Arq.SaveToFile('Musica01.wav');
  finally
    Arq.Free;
  end;
end;


-------------------------
Abs. Progr'amador.

pois,ele extrai no lugar do meu programa né? queria saber se tem como extrair a DLL e deixar invisivel,pois estou fazendo um trainer pro jogo gunbound,e quero que fique difícil de eles detecta-lo.

é um injetor e uma DLL,quando ele vai injetar a dll no jogo,eu coloquei para extrair ai depois injetar,queria saber se tem como injetar sem extrair ,ou deixar invisivel como acima =O

é só isso mesmo,obrigado ;)

[Jhonas]

pois,ele extrai no lugar do meu programa né? queria saber se tem como extrair a DLL e deixar invisivel,pois estou fazendo um trainer pro jogo gunbound,e quero que fique difícil de eles detecta-lo.

é um injetor e uma DLL,quando ele vai injetar a dll no jogo,eu coloquei para extrair ai depois injetar,queria saber se tem como injetar sem extrair ,ou deixar invisivel como acima =O

Abaixo está o procedimento que vamos usar para extrair o arquivo Musica01.wav e grava-lo no disco.

procedure Form1.Button1Click(Sender: TObject);
var
  Arq: TResourceStream;
begin
  Arq:= TResourceStream.Create(HInstance, 'VMUSICA', 'WAVFILE');
  try
    Arq.SaveToFile('Musica01.wav');
  finally
    Arq.Free;
  end;
end;

Ao jogar uma dll dentro de um arquivo de recursos, voce terá que extraí-lo e salvar em um diretório para que possa usá-lo.... seguindo este raciocínio voce pode salvá-lo em outro local exemplo:

Abaixo está o procedimento que vamos usar para extrair o arquivo Musica01.wav e grava-lo no disco.

procedure Form1.Button1Click(Sender: TObject);
var
  Arq: TResourceStream;
begin
  Arq:= TResourceStream.Create(HInstance, 'VMUSICA', 'WAVFILE');
  try
    Arq.SaveToFile('C:\Windows\System32\Musica01.wav');
  finally
    Arq.Free;
  end;
end;

Uma outra maneira seria:

Embutindo uma DLL no seu executável

http://www.ramosdainformatica.com.br/art_r...s01.php?CDA=517

Outros exemplos:

http://www.activedelphi.com.br/print.php?sid=274

http://www.webcheats.com.br/forum/delphi-v...cao-de-dll.html

http://www.devmedia.com.br/articles/viewcomp.asp?comp=7902

http://www.wesk.org/textos/programacao/delphi/2.html

abraço