Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.15;
Скачать: CL | DM;

Вниз

Как записать опр. строку по счёту в файл?   Найти похожие ветки 

 
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;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.011 c
14-48245
Igor_thief
2002-07-16 12:28
2002.08.15
Компонент


3-47922
Vern
2002-07-23 09:10
2002.08.15
Проблемы с SQL


7-48339
Timon
2002-02-05 14:32
2002.08.15
Как заморозить всех?


14-48280
Vicos1
2002-07-21 17:12
2002.08.15
Вопрос по матери на i810


6-48234
mixVictor
2002-06-04 03:24
2002.08.15
Inetdetector