Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TextFile [D7, WinXP]


Сор ©   (2004-11-29 19:12:00) 

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


begin...end   (2004-11-29 19:32:00) [1]

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

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

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

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


Anatoly Podgoretsky   (2004-11-29 19:31:00) [2]

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


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

Сравнение


begin...end   (2004-11-29 19:14:00) [4]

> Сор   (29.11.04 19:12)

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо