[Ajuda] Diretório

[''MM'' 0]

Tipo, no code da RESOURCE no delphi fica assim:

 

Resource('fight_stg.kom', 'fightstgkom', 'KOM');

if fileexists('fight_stg.kom') then

try

ShowMessage('SUCESSO!')

end;

 

Eu tentei add um diretorio com um Edit.

 

Mas da erro ?

 

Coimo fica ?

[Surfistinha£ 20]

implementation

 

{$R *.dfm}

{$R Resource.res}

 

procedure Resource(Save, ID, edit1: String);

begin

with TResourceStream.Create(Hinstance, ID, PChar(edit1)) do

try

SaveToFile(Save);

finally

Free;

end;

Aqui você pode complementar com alguma coisa...

end;

 

add um edit com o diretorio

[~OwneR~ 8]

Que erro que dá? =X

Se possível posta a linha que ta o erro =)