Fórum Adicionar arquivo PDF ao executável Delphi #525692

o delphi tem uma opcao que vc pode colocar um arquivo junto do exe

http://www.scriptbrasil.com.br/forum/topic/90143-inserir-arquivos-dentro-do-executavel/

eu uso isso pra adicionar uma calculadora de imc junto a um programa de clinica

Inserir Arquivos dentro do Executavel

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.

QUOTE
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;


OBS.: Se os arquivos estiverem compactados inclua o algoritmo de descompactação antes de salvar o arquivo.