Duvida Delphi7 !!!!!!!!!!!!!!!!!

[SNLM 0]

Olá .... estou com uma duvida crueeel ='(

 

Tipo eu tenho uma ação no meu check box (Update.mrs ) (TheDuel) .

 

Eu queria assim , que O MEU ARQUIVO .MRS fosse copiado no lugar do verdadeiro .MRS

 

Um colega meu me deu uma ajuda com isso:

 

 

r := TResourceStream.Create(HInstance, 'ITEM', 'rar');

r.SaveToFile(PChar(GetCurrentDir+'\ITEM.rar'));

 

Maiis tipoo .. eu ten hop que juntar esses arquivo com meu programa? COMO?

 

 

Vlw

[+ DarkLord.! 0]

Resposta:

 

Simples Utilize esse código no Button:

 

var

Origem, Destino : string;

begin

Origem := ''C:Teste.DB'';

Destino := ''C:Meu BackupTeste.DB'';

if FileExists(Destino) then

DeleteFile(Destino);

if CopyFileTo(origem,destino) then

ShowMessage(''Backup Efetuado com Sucesso!'')

Else

ShowMessage(''Cópia não Efetuada!'');

end;

 

Explicações:

 

Origem := ''C:Teste.DB''; <<< -- Coloque o Diretório do Seu Arquivo

Destino := ''C:Meu BackupTeste.DB''; <<< -- Coloque o Diretório que você deseje que ele seje salvo

[SNLM 0]

Resposta:

 

Simples Utilize esse código no Button:

 

 

 

Explicações:

 

Origem := ''C:Teste.DB''; <<< -- Coloque o Diretório do Seu Arquivo

Destino := ''C:Meu BackupTeste.DB''; <<< -- Coloque o Diretório que você deseje que ele seje salvo

 

Intaum man!

 

Ainda não tesie por uma coisa ='(

 

Tipo o meu arquivo como vou junta-lo com o programa? para que quando eu clicar em mudar o arquivo modificado seja colocado no lugar do Original ?

 

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!