Carregando texto para variáveis
Olá pessoal.
Alguém pode me dizer como leio um arquivo texto e garrego cada linha em uma var diferente?
Tenho esse texto por exemplo (todas as vars como string)
200
100
10
eu me ferro com delphi
São 4 linhas
Preciso que
x:=200
x1:=100
x3:=10
x4:=eu me ferro com delphi
Grato
Alguém pode me dizer como leio um arquivo texto e garrego cada linha em uma var diferente?
Tenho esse texto por exemplo (todas as vars como string)
200
100
10
eu me ferro com delphi
São 4 linhas
Preciso que
x:=200
x1:=100
x3:=10
x4:=eu me ferro com delphi
Grato
Alexandre
Curtidas 0
Respostas
João Sobrinho
22/01/2012
Colega, poderia carregar um memo com o arquivo texto.
memo1.Clear;
memo1.Lines.LoadFromFile(CaminhoDoSeuArquivoTexto);
var1 := memo1.Lines[0];
var2 := memo1.Lines[1];
var3 := memo1.Lines[2];
var4 := memo1.Lines[3];
Espero ter ajudado.
memo1.Clear;
memo1.Lines.LoadFromFile(CaminhoDoSeuArquivoTexto);
var1 := memo1.Lines[0];
var2 := memo1.Lines[1];
var3 := memo1.Lines[2];
var4 := memo1.Lines[3];
Espero ter ajudado.
GOSTEI 0
Alexandre
22/01/2012
Olá João...
Como é pouca coisa, estou querendo eliminar o banco de dados, senão
tem que instalar o Firebird, etc...
Sua rotina deu certino... valeu.
Só mais uma pergunta.
Caso eu queira alterar os valores dessas variáveis (esse arquivo texto, como faço?
Valeu.
Grde abraço e muito obrigado pela dica
Como é pouca coisa, estou querendo eliminar o banco de dados, senão
tem que instalar o Firebird, etc...
Sua rotina deu certino... valeu.
Só mais uma pergunta.
Caso eu queira alterar os valores dessas variáveis (esse arquivo texto, como faço?
Valeu.
Grde abraço e muito obrigado pela dica
GOSTEI 0
Rod
22/01/2012
Amigo pode procurar por arquivos ini
uso asssim:
https://www.devmedia.com.br/post-304-Manipulando-arquivos-INI.html
uso asssim:
https://www.devmedia.com.br/post-304-Manipulando-arquivos-INI.html
GOSTEI 0
Alan Souza
22/01/2012
se for pra gravar no txt, só fazer o inverso
memo1.Lines[0] := var1;
memo1.Lines[1] := var2;
memo1.Lines[2] := var3;
memo1.Lines[3] := var4;
memo1.SaveToFile(caminhodoseuarquivo);
(o .ini também é uma alternativa interessante, dá uma pesquisada)
memo1.Lines[0] := var1;
memo1.Lines[1] := var2;
memo1.Lines[2] := var3;
memo1.Lines[3] := var4;
memo1.SaveToFile(caminhodoseuarquivo);
(o .ini também é uma alternativa interessante, dá uma pesquisada)
GOSTEI 0
Alexandre
22/01/2012
Olá.
Funcionou.
Grato pela dica.
Gde abraço
Funcionou.
Grato pela dica.
Gde abraço
GOSTEI 0