Форум: "Основная";
Текущий архив: 2002.08.15;
Скачать: [xml.tar.bz2];
ВнизКак записать опр. строку по счёту в файл? Найти похожие ветки
← →
GTA 3 (2002-08-05 12:11) [0]Нужно, при клике на кнопку, записать текст из Edit1 в файл file.xxx, но 3 строчкой по счёту, И, после знака равно. Т.е. чтобы всё, что было в третей строчке после знака "=" удалить, и вместо того записать строку из Едита1. Если не трудно, подскажите пожалуйста код. Заранее спасибо!!!
← →
MBo (2002-08-05 12:43) [1]Уж очень TIniFile напоминает
← →
GTA 3 (2002-08-05 12:45) [2]Ну пожалуйста, помогите
← →
GTA 3 (2002-08-05 12:47) [3]Да, но это не ини-файл.
← →
Skier (2002-08-05 12:47) [4]>GTA 3
> 3 строчкой по счёту
Это что-то типа такого что ли : ?
1)Name
2)=
3)Value
← →
MBo (2002-08-05 12:47) [5]считай файл в TStringList, замени и запиши назад
← →
Anatoly Podgoretsky (2002-08-05 12:47) [6]Не напоминает, в ИНИ порядок не фиксирован, может меняться
← →
GTA 3 (2002-08-05 12:50) [7]>>Skier
Нет, типа такого:
1)xxxxx=111
2)vvvvv=222
3)bbbbb=333
Так поможете? :)
← →
Skier (2002-08-05 12:51) [8]>GTA 3
см. MBo © (05.08.02 12:43)
← →
Виктор Щербаков (2002-08-05 12:52) [9]GTA 3 (05.08.02 12:50)
Сдается мне, что код тебе придется писать самому.
Но ничего, это полезно.
← →
GTA 3 (2002-08-05 14:14) [10]Ну подскажите пожалуйста код тупому человеку! :(
← →
Anatoly Podgoretsky (2002-08-05 14:17) [11]Ждите своей очереди
← →
GTA 3 (2002-08-05 14:40) [12]Значит всё-таки поможете :)))))
Хорошо, жду.....
← →
lenin (2002-08-05 15:01) [13]var str: string;
k: integer;
StrLst: TStringList;
begin
StrLst:=TstringList.Create;
StrLst.LoadFromFile("File.xxx")$
str:=StrLst[2];
k:=pos("=",str);
if k>0 then
begin
delete(str,k+1,length(str)-k);
str:=str+Edit1.Text;
end;
StrLst[2]:=str;
StrLst.SaveToFile("file.xxx");
end;
← →
GTA 3 (2002-08-05 15:03) [14]Огромное СПАСИБОЧКИ!!!!!!! :))
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.08.15;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.009 c