Criar arquivos na mesma pasta
10/05/2003
0
Qual o codigo que uso para gravar e ler um arquivo TXT na mesma pasta
do programa?Tipo,onde quer que o usuario executar o programa,não precisara procurar o arquivo TXT,o programa criará sozinho o TXT na pasta aonde estiver o programa.
do programa?Tipo,onde quer que o usuario executar o programa,não precisara procurar o arquivo TXT,o programa criará sozinho o TXT na pasta aonde estiver o programa.
Kroki
Curtir tópico
+ 0
Responder
Posts
10/05/2003
Cruz
procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
begin
s:= ExtractFilePath(Application.ExeName)+´texto.txt´;
FileCreate(s)
end;
var
s:string;
begin
s:= ExtractFilePath(Application.ExeName)+´texto.txt´;
FileCreate(s)
end;
Responder
Clique aqui para fazer login e interagir na Comunidade :)