Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.12.12;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.054 c
4-1098992943
Khabibulin
2004-10-28 23:49
2004.12.12
BIOS


14-1100791925
Гарри Поттер
2004-11-18 18:32
2004.12.12
Помогите с составлением сметы на монтаж локальной сети


1-1101900521
genies
2004-12-01 14:28
2004.12.12
SOS, Help.


4-1099228196
aha
2004-10-31 16:09
2004.12.12
вопрос по использовагнию компортов -


3-1100619712
~Blade~
2004-11-16 18:41
2004.12.12
Обновление таблицы в адо





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский