|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
13.02.2011, 14:12 | #1 |
Форумчанин
Регистрация: 28.09.2010
Сообщений: 246
|
Сравнить два файла
Помогите пожалуйста сравнить два файла по колонке Инд.код
Необходимо что бы прога сравнила значения в колонке Инд.код и вывела в Memo или в отдельный файл Excel совпавшие значения. Я понимаю что это осуществляется как то с помощью for to do но как не пойму вообще.
Смотреть фильмы HD Фильмы для планшетов
|
13.02.2011, 15:16 | #2 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Ты умеешь работать в Делфи с Экзелем?
Если нет рекомендую: 1) Корняков В.Н. «Программирование документов и приложений MS Office в Delphi» 2) http://www.programmersforum.ru/showthread.php?t=125874 (Это для размышлений)
I'm learning to live...
|
13.02.2011, 16:28 | #3 |
Форумчанин
Регистрация: 28.09.2010
Сообщений: 246
|
Корняков В.Н. «Программирование документов и приложений MS Office в Delphi» - прочитал. Там подобной темы нет. Вписать, заменить, сохранить текст - это понятно. А сама процедура проверки наличия совпадений? Это может не только Экселя касаться. Допустим если бы у нас был текстовый файл (2 текстовых файла). Как их сравнить и вывести совпадения в Memo. Меня интересует сам принцип реализации.
Смотреть фильмы HD Фильмы для планшетов
|
13.02.2011, 19:54 | #4 |
DelphiProger
Участник клуба
Регистрация: 14.11.2010
Сообщений: 1,023
|
если только принцип, покажу на StringGrid, думаю поимеш
Код:
Код:
если все одинаково, то выходит сообшение, 'отличии нет'
VirusN13
|
14.02.2011, 16:17 | #5 | |||
Форумчанин
Регистрация: 28.09.2010
Сообщений: 246
|
Что то не так.
Попробовал вот такой код: Цитата:
Выводит: Цитата:
Цитата:
Присутствуют и в первом и во втором списке 111111111111110 111111111111111 111111111111112 111111111111113 111111111111114 Отсутствуе во втором списке 111111111111115 111111111111123 111111111111125 111111456879521 Помогите решить задачу. Исходник прилагается.
Смотреть фильмы HD Фильмы для планшетов
|
|||
14.02.2011, 16:28 | #6 |
DelphiProger
Участник клуба
Регистрация: 14.11.2010
Сообщений: 1,023
|
мои способы показывали сравнение у таблич равных размеров.
вам надо только первые столбики сравнить? вот: Код:
что б наити рти значения нужно зделать тоже самое только местами таблич поменять
VirusN13
Последний раз редактировалось ArtGrek; 14.02.2011 в 16:51. |
14.02.2011, 17:21 | #7 | |
Форумчанин
Регистрация: 28.09.2010
Сообщений: 246
|
Работает правильно. НО! Что бы осуществился выбор карточки необходимо нажать на закрытие формы 2. после каждого нажатия в Мемо добавляются значения. В чем глюк?
Цитата:
Смотреть фильмы HD Фильмы для планшетов
|
|
14.02.2011, 17:27 | #8 | |
DelphiProger
Участник клуба
Регистрация: 14.11.2010
Сообщений: 1,023
|
Цитата:
как происходит процесс?
VirusN13
|
|
14.02.2011, 18:08 | #9 | ||||
Форумчанин
Регистрация: 28.09.2010
Сообщений: 246
|
При нажатии на кнопку "Проверить" открывается вторая форма. В Мемо такой результат
Цитата:
Цитата:
Цитата:
Цитата:
Если 5-10 строк - то с этим как то можно мирится. Но если 1000-1500. Каждый раз нажимать на "Закрыть" что бы осуществилась одна проверка и увидеть одно совпадение или несовпадение - геморно как то. Все решил проблему.
Смотреть фильмы HD Фильмы для планшетов
Последний раз редактировалось artemavd; 16.02.2011 в 03:12. |
||||
14.02.2011, 22:44 | #10 | |
Форумчанин
Регистрация: 28.09.2010
Сообщений: 246
|
Второй вопрос по вышеприведенной прожке. В ней вот этот код.
Цитата:
Прошу прощения. Уже сам разобрался. Терь точно вопрос которого не знаю. Как сделать что бы в Мемо выводилась не одна ячейка, а вся строка. А еще лучше если всю строку перенести не в Мемо а в StringGrid
Смотреть фильмы HD Фильмы для планшетов
Последний раз редактировалось artemavd; 16.02.2011 в 03:10. |
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Сравнить два текстовых файла | assch | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 17 | 29.09.2010 14:41 |
Как быстро сравнить два похожих файла? | myza | Microsoft Office Excel | 8 | 26.08.2010 08:59 |
Сравнить два множества. Pascal | MaxMelnikov | Помощь студентам | 3 | 16.03.2009 09:35 |
как в перле можно сравнить два файла? | menik | Помощь студентам | 1 | 23.02.2009 10:16 |
Сравнить два файла | Aleksandr | Microsoft Office Excel | 6 | 07.10.2008 00:22 |