[Dúvida] Resource

[''MM'' 0]

Ou, como vcs fazem pra injetar Multipla Resource.

 

Tipo um button auto kill,outro Button One Hit.

 

Como fica dentro do .kom ?Como fica dentro do Script.** ?

 

Eu tentei varias vezes mas não consegui.

[~OwneR~ 8]

Upa seus scripts e me passa o link por MP, daí eu te passo a resource com as IDs...

[''MM'' 0]

Não tem como explicar por aqui ?

[Surfistinha£ 25]

Nao fica dentro do .Kom fica na resource pra isso vc criar um one thi e um auto kill

 

Isso fica na area gc

[''MM'' 0]

Eu sei, mas no Code do Delphi Muda algo ?

[Surfistinha£ 25]

Nao sei qual e o code mostre por favor

[''MM'' 0]

O Code da Resource é assim:

 

var

Arq: TResourceStream;

begin

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

try

Arq.SaveToFile(Edit1.Text+'\stage\fight_stg.kom');

finally

Arq.Free;

end;

showmessage('Se o Diretorio acima estiver Correto, o Script será Ativado !');

If timer3.Enabled = True then

Showmessage('Modificado Com Sucesso! Bom Jogo')else

Showmessage('Diretório Certo ! Parabéns =D ')

end;

 

Se eu criar um button One Hit e outro Auto Kill, o Code muda de cada button ?

[~OwneR~ 8]

Não tem como explicar por aqui ?

 

Eu já expliquei umas 3x... Então vamos lá de novo u_u"

 

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

• Entre
• ou
• Cadastre-se

 

'-'

 

Se você tiver muitas resources é bom criar uma procedure assim você economiza código.

Usa essa aí \/

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

• Entre
• ou
• Cadastre-se

Pra chamar ela é so fazer assim (coloca isso no botão viu??):

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

• Entre
• ou
• Cadastre-se

 

PS: Se você trabalhar com algum componente da form na procedure você deve fazer isso:

Declara a procedure lá em type abaixo do TForm1 = class(TForm)

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

• Entre
• ou
• Cadastre-se

E renomeia a procedure para:

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

• Entre
• ou
• Cadastre-se

 

Pronto u_ú

 

--------EDIT--------

Já ia me esquecendo que você DEVE declarar a resource em implementation, tipo assim:

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

• Entre
• ou
• Cadastre-se

[''MM'' 0]

Sim, não entendi muito bem,.

 

Mas la no .** junto com o Brcc32 tem que cria novas linhas.

 

To meio Perdido.

[Surfistinha£ 25]

Alem disso vc tem que criar uma resoucer com seus scripts

[''MM'' 0]

Eu sei, como ficaria as linas dentro da Resource.

 

Tem como coloca um Exemplo ?

[~OwneR~ 8]

...

Cria um txt no Bloco e notas...

Coloca tipo assim

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

• Entre
• ou
• Cadastre-se

Muda a extensão do txt para .R-C (sem o traço...)

Clica com o botão direito no arquivo e vai em abrir com...

Clica em procurar...

Vai na pasta BIN do Delphi e escolhe o BRCC32.EXE

Dá OK...

Agora executa o arquivo e PRONTO... A resource vai ser criada na pasta do .R-C