Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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.58 MB
Время: 0.032 c
1-48088
Blacki
2002-08-03 22:56
2002.08.15
Сохранение в Gif


3-47965
ShuraGrp
2002-07-25 12:56
2002.08.15
Ошибка insert select


1-48051
V.Turecky
2002-08-04 08:40
2002.08.15
CreateProcess. Нужна информация.


14-48310
Igorek
2002-07-22 14:51
2002.08.15
Срочно нужно полное описание синтаксиса ObjectPascal !


14-48268
Виктор
2002-07-14 10:48
2002.08.15
Печать на GDI-принтере





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский