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

Вниз

TextFile   Найти похожие ветки 

 
Сор   (2004-11-29 19:12) [0]

Надо прочитать численные значения в текстовом файле и сравнить их с получившимися в процессе работы.Например,
Вот что записано в текстовом файле
1,1
8,5
9,3
Получившееся значение
1,2
Вот его и надо сравнить со значениями в файле и если они не совпадают добавить получившееся значение в файл (следующей строкой)


 
begin...end ©   (2004-11-29 19:14) [1]

> Сор   (29.11.04 19:12)

И что конкретно не получается?


 
Сор   (2004-11-29 19:25) [2]

Сравнение


 
Anatoly Podgoretsky ©   (2004-11-29 19:31) [3]

if A = B, где A и B твои переменные.


 
begin...end ©   (2004-11-29 19:32) [4]

> [2] Сор   (29.11.04 19:25)

Сравнение производится при помощи операций отношения "<", "<=", "=", ">=", ">".

Перед тем, как сравнивать, нужно прочитать файл (с помощью процедуры ReadLn), попробовать преобразовать каждую строку в число (см. функции StrToFloat, StrToFloatDef, TryStrToFloat), а потом сравнить по очереди эти числа с "получившимся значением".

Текстовый файл связывается с файловой переменной с помощью процедуры Assign, открывается для чтения с помощью процедуры Reset, открывается для добавления строк с помощью процедуры Append.



Страницы: 1 вся ветка

Текущий архив: 2004.12.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.045 c
1-1101839603
Ищущий ответ
2004-11-30 21:33
2004.12.12
Почему не работает код?


1-1101900116
ANDREI
2004-12-01 14:21
2004.12.12
sos


3-1100155505
newby
2004-11-11 09:45
2004.12.12
Округление в футере EHLib DBGrid


14-1101105848
ИМХО
2004-11-22 09:44
2004.12.12
Слово об эмиграции


14-1101310747
Empleado
2004-11-24 18:39
2004.12.12
may be useful