[Duvida Estupida] Ajuda aki rapidinho plz.. é easy

Iniciado por Quicky, 06 de Outubro , 2006, 01:37:01 AM

tópico anterior - próximo tópico

0 Membros e 1 Visitante estão vendo este tópico.

Quicky

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 =]
Just Me...

Dark_Side

Hi,
Basicamente seria isso:

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.

Quicky

kra.. eu ti amo  :D
ePJAJPWQJPJPAWHHAOWHOQHOAWHQHAHOW
valeu msmo =]
eh simplesinho.. mas num achei em kanto nenhum O.O"
vlw aih kra =DDDD
agora é só por pra funcionar =]
Just Me...