Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Сравнение файлов


/-\|e}{ ©   (2002-11-28 17:32:00) 

Помогите пожалуйста! Как можно сравнить содержимое двух файлов exe(например исходного и крякнутого), и чтобы в массив записывались offset и byte"ы (всмысле различия между файлами)
Заранее благодарен


/-\|e}{   (2002-12-01 07:52:00) [1]

Всем БОЛЬШОЕ СПАСИБО !!! Особенно JeanY


Song   (2002-11-29 18:46:00) [2]

производный от TStream+CompareMem()


JeanY   (2002-11-29 16:59:00) [3]

File1:=TFileStream.Create(FileName1,fmOpenRead);
File2:=TFileStream.Create(FileName2,fmOpenRead);
if File1.Size>File2.Size then AN:=File1.Size
else AN:=File2.Size;
for i:=0 to (AN-1) do
begin
File1.Position:=i;
File1.Read(S1,sizeof(S1));
File2.Position:=i;
File2.Read(S2,sizeof(S2));
if S1<>S2 then
begin
Offset[i]:=i;
Byte1[i]:=S1;
Byte2[i]:=S2;
end;
end;

Где Offset, Byte1 и Byte2 массивы Int64


nejest   (2002-11-29 12:38:00) [4]

есть такая ДОСовская команда fc и она может сравнивать 2 файла, вот пример её использования fc /b s.exe v.exe >res.txt в нем начиная со второй строки хранятся смещения и байты 2 файлов, разделёнными пробелами. Тебе только нужно выполнить эту команну и прочитать нужную информацию из итогового файла


Jeer   (2002-11-28 17:54:00) [5]

побайтно


Наверх

Титульная страница Поиск, карта сайта Написать письмо