Главная страница
    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.043 c
14-1101237565
Piter
2004-11-23 22:19
2004.12.12
Интересный пример кода в Тейксера и Пачеко


11-1083849539
Delphi5.01
2004-05-06 17:18
2004.12.12
... как вызвать функцию paint предка ...


3-1100435214
Алексей
2004-11-14 15:26
2004.12.12
красивый DBGrid


4-1098954487
Colonel
2004-10-28 13:08
2004.12.12
Обработчик клавиатуры/мыши


1-1101368057
Дядя
2004-11-25 10:34
2004.12.12
TwordApplication для разных версий Worda





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