работа с txt файлами (delphi 7)

[-Jack-]

Всем доброго времени суток. Есть некая структура txt файла

pararm1: 23
pararam2: file.txt
tralalam: test

Как проверить, что структура файла не нарушена ( т.е. все параметры идут в определённой последовательности, в файл не вписаны никакие другие параметры) ?

Как изменить 1 из параметров( к примеру, значение param1 изменить с 23 на 123abc ?

[Кольша]

var
s:Tstringlist;
i:integer;
begin
s:=Tstringlist.create;
s.loadfromfile('yafiletxt.txt');
for i:=0 to s.count do
if (pos('pararm1:',s[i])=0) or (pos('pararm2:',s[i])=0) or (pos('tralalam:',s[i])=0) then
showmessage('Nu vot kakogo ti izmenil fail?')
s.free;
end;

На компиляторе не проверял возможны ошибки.

[Shouldercannon]

Лучше

for i := 0 to s.count - 1 do

чтобы цикл за рамки не выходил и не вызывал ошибку

В *.txt только
pararm1: 23
pararam2: file.txt
tralalam: test
?
Может лучше использовать INI-файл?

[-Jack-]

Сообщение от Shouldercannon

Лучше

for i := 0 to s.count - 1 do

чтобы цикл за рамки не выходил и не вызывал ошибку

В *.txt только
pararm1: 23
pararam2: file.txt
tralalam: test
?
Может лучше использовать INI-файл?

К сожалению, параметры и расширение файла уже заданы...

Кольша, спасибо огромное за помощь !!!

[astecenko]

Очень просто, работайте с TStringList
Задаете NameValueSeparator равным двоеточию и дальше работаете по принципу пар ключ=значение.