Сейчас на форуме: UniSoft, zds, ManHunter, rmn (+5 невидимых)

 eXeL@B —› Программирование —› Сравнение HEX файлов?!
Посл.ответ Сообщение

Ранг: 1.8 (гость)
Активность: 0=0
Статус: Участник

Создано: 14 августа 2006 03:04
· Личное сообщение · #1

Как написать на Delphi or C++ Builder утилитку для сравнения 2 HEX файлов? Подскажите, а!




Ранг: 299.6 (наставник)
Активность: 0.30
Статус: Участник
Armadillo Killer

Создано: 14 августа 2006 03:07
· Личное сообщение · #2

На попробуй сурсы на Delphi респекты передавай Guru.eXe

872e_14.08.2006_CRACKLAB.rU.tgz - File.CompareR.src-tmx.zip



Ранг: 1.8 (гость)
Активность: 0=0
Статус: Участник

Создано: 14 августа 2006 03:49
· Личное сообщение · #3

Спасибо! Большое! Выручил..



Ранг: 163.7 (ветеран)
Активность: 0.070
Статус: Участник

Создано: 14 августа 2006 03:51
· Личное сообщение · #4

Для MSVC есть готовая - Microsoft PSDK\Samples\Begin\sdkdiff\




Ранг: 793.4 (! !), 568thx
Активность: 0.740
Статус: Участник
Шаман

Создано: 14 августа 2006 03:59
· Личное сообщение · #5

От таких сорсов тупеешь. Неужели не интересно самому алго алго придумать и закодить?

-----
Yann Tiersen best and do not fuck




Ранг: 1.8 (гость)
Активность: 0=0
Статус: Участник

Создано: 14 августа 2006 04:05
· Личное сообщение · #6

Тупой - не тупой... а в 3 ночи над алго алго думать не очень хочется! А надо было срочно...



Ранг: 1.0 (гость)
Активность: 0=0
Статус: Участник

Создано: 12 марта 2012 10:32
· Личное сообщение · #7

File.CompareR прога то что нужно, только мне надо открытие файлов производить с помощью WinAPI
Code:
  1.     var
  2.     ofn : OPENFILENAME;
  3.     begin
  4.     ZeroMemory(@ofn, sizeof(OPENFILENAME));
  5.     with ofn do
  6.       begin
  7.         lStructSize:=sizeof(OPENFILENAME);
  8.         lpstrInitialDir:='c:\windows';
  9.         lpstrTitle:='Choose Any File';
  10.         nMaxFile:=255;
  11.         lpstrFile:=VirtualAlloc(0, 255, MEM_COMMIT, PAGE_READWRITE);
  12.         lpstrFilter:='Win32 Executables'+#0+'*.exe'+#0+'All file types'#0+'*.*'+#0#0;
  13.         Flags:=OFN_FILEMUSTEXIST + OFN_HIDEREADONLY + OFN_PATHMUSTEXIST;
  14.       end;
  15.      
  16.     if GetOpenFileName(ofn) then
  17.       MessageBox(0, ofn.lpstrFile, nil, MB_OK);
  18.     VirtualFree(ofn.lpstrFile, 0, MEM_RELEASE);
  19. end;

Есть вот этот код, но как его вживить пока не понимаю.



Ранг: 488.1 (мудрец), 272thx
Активность: 0.350
Статус: Участник

Создано: 12 марта 2012 10:44
· Личное сообщение · #8

wiirus мало того что тему поднял 6ти летней давности, так еще и пол процедуры дал. обращай внимание на даты последнего ответа

-----
Наша работа во тьме, Мы делаем, что умеем. Мы отдаем, что имеем, Наша работа во тьме....



 eXeL@B —› Программирование —› Сравнение HEX файлов?!
:: Ваш ответ
Жирный  Курсив  Подчеркнутый  Перечеркнутый  {mpf5}  Код  Вставить ссылку 
:s1: :s2: :s3: :s4: :s5: :s6: :s7: :s8: :s9: :s10: :s11: :s12: :s13: :s14: :s15: :s16:


Максимальный размер аттача: 500KB.
Ваш логин: german1505 » Выход » ЛС
   Для печати Для печати