Вниз
Скачать: CL | DM;

Распознование   Найти похожие ветки 

 
Opera ©   (2003-10-01 12:46) [0]

Помогите как узнать файл по его содержимому? Например по 60 байтам в середине программы и если это тот файл вывести мессаг?


 
Digitman ©   (2003-10-01 12:49) [1]


> в середине программы


нет понятие "середина программы"
есть понятие "смещение искомого фрагмента относительно начала файла"

тебе это смещение заранее известно ?


 
Opera ©   (2003-10-01 12:51) [2]

Ну-у-у нет ну как можно проверить тот это файл или нет, помоги


 
Palladin ©   (2003-10-01 13:00) [3]

в орешник


 
BillyJeans ©   (2003-10-01 13:08) [4]

если тебе повезет, и в данные 60 байт войдет какая-либо ключевая комбинация, то считай, что мессагу выводить мона ;)


 
Digitman ©   (2003-10-01 13:17) [5]

1. Находишь любым способом размер файла Len
1. делаешь hMap:= CreateFileMapping(... имя_файла ...)
2. делаешь pMap := MapViewOfFile(hMap, ..)

const
Model: array[0..59] of Byte = .....; здесь - модель поиска
var
i: Integer;
pModel: Pointer; // указатель на модель поиска
pMap : Pointer; // указатель на образ файла в ВАП процесса
Len : Integer; // размер файла
ptr: PByte;
...
pModel := @Model;
ptr := pMap;
...
а далее - цикл :

for i:= 0 to Len - SizeOf(Model) do
if CompareMem(ptr, pModel, SizeOf(Model)) then
break;
else
Inc(ptr);

if i < Len - SizeOf(Model) then
... тот это файл
else
... или нет



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.018 c
14-40611
Romkin
2003-09-24 17:06
2003.10.13
А я задачку нашел


1-40428
AndrewK
2003-10-01 14:49
2003.10.13
Получение True или False по выражению в строке


14-40668
GiGiPage
2003-09-23 13:58
2003.10.13
Билет по физике


14-40579
stone
2003-09-23 11:01
2003.10.13
Парадокс в датах


14-40612
Кулюкин Олег
2003-09-19 13:30
2003.10.13
Крик души: нужен грид




   Наверх