[Delphi] Arquivos de Texto

[Robz Lancaster 0]

Bom Pessoal, Estou afim de montar um programinha , e eu preciso saber como faço para editar uma X linha de um arquivo de texto:

 

EX:

 

Tenho lá

 

Bom // Linha 1º

Dia como // Linha 2º

Vai //linha 3º

Você ? // Linha 4º

 

Então quero saber qual comando para eu editar a palavra da 3ª Linha Para

"sua Familia e"

 

Mas preciso saber o comando alguem poderia me ajudar ?

[bdexterholland 0]

Você pode usar o TStringList para carregar este arquivo. O TStringList permitirá tratar cada linha como um ítem em um array. Segue exemplo:

var
 Arquivo: TStringList;
Begin
 {Carregando o StringList para memória}
 Arquivo := TStringList.Create; 
 {Carregando o arquivo com as strings}
 Arquivo.LoadFromFile('C:\ArquivoMensagen.TXT');
 {Substituindo frase da 3ª linha}
 Arquivo.Strings[2] := 'Sua familia e';
 {Salvando arquivo atualizado}
 Arquivo.SaveToFile('C:\ArquivoMensagen.TXT');
 {Tirando o StringList da memória}
 Arquivo.Free;
end;

[Robz Lancaster 0]

Ata Tendi mas o Array começa do [0] né?

E outra, Tipo como eu faço para Mudar uma Frase para outra ?

 

Tipo

 

login: 127.0.0.1

 

Para

 

login: 192.168.0.1

 

 

Apenas mudar os Valores ou seja editar o Valor do ip

porque você me ajudou/ensinou mudar a linha e como eu faço para mudar dessa forma ?

Tank's

[bdexterholland 0]

Ata Tendi mas o Array começa do [0] né?

Sim, e, apesar de strings serem (superficialmente) arrays de Char, começam do [1].

 

E outra, Tipo como eu faço para Mudar uma Frase para outra ?

Apenas mudar os Valores ou seja editar o Valor do ip

porque você me ajudou/ensinou mudar a linha e como eu faço para mudar dessa forma ?

Tank's

Da, forma que eu lhe mostrei muda a linha inteira, você pode fazer assim:

Arquivo.Strings[2] := 'login: ' + IP;

Acho que será mais fácil que tentar substituir caracteres da frase...