Title: [Duvida Estupida] Ajuda aki rapidinho plz.. é easy
Post by: Quicky on 06 de October , 2006, 01:37:01 AM
Post by: Quicky on 06 de October , 2006, 01:37:01 AM
LoL.. To começando em delphi
gostei muito da linguagem..
to criando aqui um negocio bem simples.. só que to com um problema
eu preciso por o conteúdo de um edit num arquivo .txt
como eu faria isso de forma simples?
Exemplo:
Idade: [_______]
aih uq ki o krinha pusesse ali dentro do campo.. ele skrevesse num .txt
soh isso
eh meio estupido ue acho.. mas nao achei na net procurando O.O
então se alguem puder ajudar.. eu seria grato =]
gostei muito da linguagem..
to criando aqui um negocio bem simples.. só que to com um problema
eu preciso por o conteúdo de um edit num arquivo .txt
como eu faria isso de forma simples?
Exemplo:
Idade: [_______]
aih uq ki o krinha pusesse ali dentro do campo.. ele skrevesse num .txt
soh isso
eh meio estupido ue acho.. mas nao achei na net procurando O.O
então se alguem puder ajudar.. eu seria grato =]
Title: Re: [Duvida Estupida] Ajuda aki rapidinho plz.. é easy
Post by: Dark_Side on 06 de October , 2006, 01:52:20 AM
Post by: Dark_Side on 06 de October , 2006, 01:52:20 AM
Hi,
Basicamente seria isso:
No procedure do botão, declaramos um ponteiro para arquivo texto, e uma string.
texto := edit1.Text;
String a ser escrita no arquivo => texto do edit.
Com a função AssignFile(), associamos ao ponteiro "arq" o caminho "c:\lol.txt" - arquivo que será criado.
Quando utilizamos ReWrite(arq), o programa abre o arquivo associado para escrita.A função
WriteLn escreve uma linha no arquivo, no caso, o conteúdo da variável "texto". Finalmente, com CloseFile(), fechamos o arquivo.
É mais ou menos isso
Bye.
Basicamente seria isso:
Code Select
procedure TForm1.Button1Click(Sender: TObject);
var
arq:TextFile;
texto: string;
begin
texto := edit1.Text;
AssignFile(arq,'c:\lol.txt');
ReWrite(arq);
WriteLn(arq,texto);
CloseFile(arq);
end;
No procedure do botão, declaramos um ponteiro para arquivo texto, e uma string.
texto := edit1.Text;
String a ser escrita no arquivo => texto do edit.
Com a função AssignFile(), associamos ao ponteiro "arq" o caminho "c:\lol.txt" - arquivo que será criado.
Quando utilizamos ReWrite(arq), o programa abre o arquivo associado para escrita.A função
WriteLn escreve uma linha no arquivo, no caso, o conteúdo da variável "texto". Finalmente, com CloseFile(), fechamos o arquivo.
É mais ou menos isso
Bye.
Title: Re: [Duvida Estupida] Ajuda aki rapidinho plz.. é easy
Post by: Quicky on 06 de October , 2006, 12:41:43 PM
Post by: Quicky on 06 de October , 2006, 12:41:43 PM
kra.. eu ti amo 
ePJAJPWQJPJPAWHHAOWHOQHOAWHQHAHOW
valeu msmo =]
eh simplesinho.. mas num achei em kanto nenhum O.O"
vlw aih kra =DDDD
agora é só por pra funcionar =]
ePJAJPWQJPJPAWHHAOWHOQHOAWHQHAHOW
valeu msmo =]
eh simplesinho.. mas num achei em kanto nenhum O.O"
vlw aih kra =DDDD
agora é só por pra funcionar =]