Главная страница
    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.034 c
3-1100496152
AdmSasha
2004-11-15 08:22
2004.12.12
поиск по маске в базе


14-1101231153
Kurtevich
2004-11-23 20:32
2004.12.12
Жалобы на Дельфи :(


11-1083640084
FR!
2004-05-04 07:08
2004.12.12
проблема с установкой soundin компонента


1-1101249250
Кто---то
2004-11-24 01:34
2004.12.12
Как отследить где именно возникает утечка памяти ?


3-1100182085
}|{yk
2004-11-11 17:08
2004.12.12
Инвалидность объектов в Firebird





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