StringList
Como Deletar a primeira e a ultima linha de um StringList ?
ou do proprio arquivo texto ?
ou do proprio arquivo texto ?
Fabiano Góes
Curtidas 0
Respostas
Rjun
27/09/2005
Para apagar uma linha da StringList você usa o método Delete, passando como parâmetro a linha q se deseja apagar.
[code]
var
Arquivo: TStringList;
begin
Arquivo := TStringList.Create;
try
Arquivo.LoadFromFile(´C:\Documento.Txt´);
Arquivo.Delete(0); // Apaga a primeira linha
Arquivo.Delete(Arquivo.Count - 1); // Apaga a última linha
Arquivo.SaveToFile(´C:\Documento.Txt´);
finally
FreeAndNil(Arquivo);
end;
end;
[code]
var
Arquivo: TStringList;
begin
Arquivo := TStringList.Create;
try
Arquivo.LoadFromFile(´C:\Documento.Txt´);
Arquivo.Delete(0); // Apaga a primeira linha
Arquivo.Delete(Arquivo.Count - 1); // Apaga a última linha
Arquivo.SaveToFile(´C:\Documento.Txt´);
finally
FreeAndNil(Arquivo);
end;
end;
GOSTEI 0
Fabiano Góes
27/09/2005
Valeu mais uma vex Rjun !!!!
GOSTEI 0