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

Вниз

сравнение двух нетипизированных файлов   Найти похожие ветки 

 
reticon   (2002-12-20 13:20) [0]

Подскажите пожалуйста, как сравнить два нетипизированных файла, например с таким содержанием:

файл_1:

1 3 2 4 3 3 2 1 4 1 1 4 1 2 3 4 2 3 1 2
2 1 3 2 4 4 4 3 1 1 2 1 1 3 2 1 3 2 2 2

файл_2:

1 2 3 4 4 4 3 4 2 2 1 2 1 1 1 1 2 3 2 3
2 3 2 3 3 3 2 1 1 2 2 4 4 4 2 2 2 3 1 1

необходимо сравнить первую строку файла_1 с первой строкой файла_2 и
вторую строку файла_1 со второй строкой файла_2

как узнать, какие байты в строках совпадают, а какие отличаются?


 
mrcat   (2002-12-20 13:22) [1]

что должно быть результатом сравнения?


 
atmospheric   (2002-12-20 13:24) [2]

ну читать построчно ReadLn(f, s1); ReadLn(g, s2);

а потом сравнивай
for i:=1 to length(s1) do
if s1[i] = s2[i] then
...


 
reticon   (2002-12-21 04:50) [3]

To atmospheric

...ну читать построчно ReadLn(f, s1); ReadLn(g, s2);

ReadLn использовать нельзя, оно используется для текстовых файлов. Т.к. файл нетипизированный, нужно юзать BlockRead.

...а потом сравнивай
for i:=1 to length(s1) do
if s1[i] = s2[i] then

А можно поподробнее?


 
Для   (2002-12-21 05:03) [4]

нетипизированных файлов не может быть понятия "строка"! Тогда как понять следущее:

> reticon © (20.12.02 13:20)
...
> необходимо сравнить первую строку файла_1 с первой строкой >файла_2 и вторую строку файла_1 со второй строкой файла_2




 
Song   (2002-12-21 09:00) [5]

2reticon © (21.12.02 04:50)
Ты не ответил на вопрос mrcat © (20.12.02 13:22)
Поэтому сказать алгоритм пока нельзя.


 
Kotka   (2002-12-21 16:45) [6]

У мя на сайте есть исходники проги, которая сравнивает файлы побайтно с помощью TFileStream.


 
reticon   (2002-12-21 18:30) [7]

To mrcat

<Что должно быть результатом сравнения?

Результатотм сравнения должно быть, какие байты в строках различаются между собой.


 
Anatoly Podgoretsky   (2002-12-21 19:00) [8]

Байты это сравнение двоичных файлов, а строки это текстовые файлы, в них символы


 
reticon   (2002-12-22 18:32) [9]

> To Anatoly Podgoretsky

Результатом сравнения должно быть, какие символы в стрроках различаются между собой


 
Anatoly Podgoretsky   (2002-12-22 18:34) [10]

Тогда ты уже получил ответ выше


 
reticon   (2002-12-22 23:12) [11]

Способ, предложенный atmospheric, не работает (если я делаю все правильно). И еще выдает ошибку 104.


 
Morfein   (2002-12-22 23:21) [12]

Да делаешь mapping, побайтно читаешь память и сравниваешь... какие проблемы?... а вы тут спорите о том, какие файлы какой функцией читать...


 
[NIKEL]   (2002-12-22 23:35) [13]

посмотри на UBPFD



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

Форум: "Основная";
Текущий архив: 2003.01.06;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.006 c
1-15120
Groove
2002-12-23 08:03
2003.01.06
ХРАНЕНИЕ табличных данных


14-15236
laza admin
2002-12-14 23:52
2003.01.06
Люди срочно надо до понедельника составить на паскале прогу, кото


14-15263
Nick-From
2002-12-16 18:18
2003.01.06
Транслятор Basic в Pascal


1-15129
orion_st
2002-12-23 14:22
2003.01.06
Как перевести дату в TDateTimePicker на следующий день?


14-15229
race1
2002-12-14 16:30
2003.01.06
косясище





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