[Avançado]Criando Um Modificador de Script [ Resource ]

[Surfistinha£ 20]

Explicaçao Basica!

 

 

Nessa video aula voces Irao aprender a fazer um modificador de Script e Adicionar o Arquivo Kom no modificador!

Essa video aula e bem diferente daquelas que voces estao acustumados a ver no youtube que so explica como fazer o modificador e nao explica como fazer a resource para adicionar o arquivo Kom no modificador!

Nessa Video aula irei explicar tudo nos minimos detalhes,Bom a video aula nao ficou perfeita Pois foi minha primeira video aula mais prometo que eu Vou melhora nas proximas.

 

Download video aula:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

Aqui o codigo para adicionar no button:

 

var

Arq: TResourceStream;

begin

begin

Arq:= TResourceStream.Create(HInstance, 'fight_stg', 'KOMFILE');

try

Arq.SaveToFile(Edit1.Text+'\Stage\fight_stg.KOM');

finally

Arq.Free;

end;

end;

ShowMessage('Ativado com sucesso.');

end;

 

 

Qualquer duvida me perguntem !!

 

Codec para assisti está vídeo aula!

 

Download desse programa::

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Download do delphi 7:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

 

Credito: Feed Mercury

[sumonee 0]

bom isso ajuda mais tem um jeito mais facil de criar a .RES.. qnd eu tivr tempo eu faço um topic explicando detalhadamente..

 

obg por compartilhar ! :rolleyes:

[Adeuk 1]

So pra avisar -

 

var

Arq: TResourceStream;

begin

begin

Arq:= TResourceStream.Create(HInstance, 'fight_stg', 'KOMFILE');

try

Arq.SaveToFile(Edit1.Text+'\Stage\fight_stg.KOM');

finally

Arq.Free;

end;

end;

ShowMessage('Ativado com sucesso.');

end;

 

Onde está fight_stg e KOMFILE, o arquivo de texto que fará a RES deverá ser do mesmo jeito.

[l2lipe 0]

surf preciso de uam ajuda naum estou conseguindo criar a resource eu crio o texto no formato .** escrito fight_stg KOM "C:\Arquivos de programas\Delphi7SE\auto-kill\fight_stg.kom" ai eu vo no executar o coloko BRCC32 Resource (q eh o nome q eu renomeie) e naum compila pra criar a resource o q eu faço ???

[Lezer 0]

Po serto ja fiz tudo certo

so que como fasso o resource

[Surfistinha£ 20]

@Lezer ta no video

 

@ baixe a video aula q la explica vlw

[tekitos123 3]

surf preciso de uam ajuda naum estou conseguindo criar a resource eu crio o texto no formato .** escrito fight_stg KOM "C:\Arquivos de programas\Delphi7SE\auto-kill\fight_stg.kom" ai eu vo no executar o coloko BRCC32 Resource (q eh o nome q eu renomeie) e naum compila pra criar a resource o q eu faço ???

 

salva o arquivo .** (resource em texto) em C:\ com o nome de resource.txt

ai é só chamar

B3CC32 resource.txt

vai apararecer o arquivo resource.res em C:\

[akt1996 0]

Eçe video ensina Embutir um arquivo no .exe?

[lucas98 1]

surf eu baixei a video aula e executei no Windowns Midia Player so que chega até uma parte e fala que o midia player nao pode axecutat o arquivo e nao toca mais serah que tem que baixar outro programa ???

 

pra ver a video aula ???

[Surfistinha£ 20]

Irei postar um componete que fica mas facil para voce ja ja edito

[lucas98 1]

ta bom o o video para nessa parte que voce coloca o codigo no button e muda o text do edit para nesse ai para

[Surfistinha£ 20]

Olhem aqui o componente como prometido

http://www.webcheats.com.br/forum/delphi-vb/376505-componente-cria-arquivos-e-compila-res.html

 

Vlwe

[lucas98 1]

sim mais eu quero saber como eu coloko o componente no projeto sabe como eu adicono o arquivo la dentro pro projeto collar o arquivo na pasta que eu quero entendeu ??

 

me passa um tudo ai se puder

[Surfistinha£ 20]

entao e assim mais tipo com ele tem que so fazer isso trocar os camilhos diretorios so isso

vlwe vei

[Romersom 0]

E se eu quizer adicionar mais um arquivo ? Como faz ?

[Adeuk 1]

@Membro acima

 

 

Troque o code para:

 

var

Arq: TResourceStream;

begin

begin

Arq:= TResourceStream.Create(HInstance, 'fight_stg2', 'KOMFILE2');

try

Arq.SaveToFile(Edit1.Text+'\Stage\fight_stg.KOM');

finally

Arq.Free;

end;

end;

ShowMessage('Ativado com sucesso.');

end;

 

Na hora de criar:

 

fight_stg2 KOMFILE2 fight_stg.KOM

 

E declare a res...

[zups 0]

Sem ofender, onde está o avançado nisso? isso eh muito simples, qualquer um que nao saiba programar como a maioria daqui faz isso ^^

[''MM'' 0]

Sem ofender, onde está o avançado nisso? isso eh muito simples, qualquer um que nao saiba programar como a maioria daqui faz isso ^^

 

Vendo video todos fazem, quero ve faze sem ve nada =D

 

É um codigo avançado sim !

[Surfistinha£ 20]

O resoucer e mas avançado doque o copyfile por isso nois chamamos de avançado