Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.19;
Скачать: CL | DM;

Вниз

как поменять байтики в файле...   Найти похожие ветки 

 
НАИВый панк   (2002-08-04 19:09) [0]

так... ну вопрос вот в чём...мне нужно в файле file.exe поменять например по смещению 00014521h , 85 на 84... как это сделать?... наверное нужно нетипизированные файлы использовать или как?...т.е надо что то типа кряка зделать... за ранее спасибо...


 
Song ©   (2002-08-04 19:13) [1]

Читайте файл в TFileStream/TMemoryStream


 
tsarevep ©   (2002-08-04 19:43) [2]

Все крякаем!


 
int64 ©   (2002-08-04 19:44) [3]

За правильность не ручаюсь. Наглаз написал.

Var Ch:Char;
F:File;
Begin
Assign(F,"CrackMy.EXE");
Reset(F,1);
Seek(F, $00014521);
Ch:=Char($84);
Blockwrite(F,Ch,1);
CloseFile(f);
End;


 
НАИВый панк   (2002-08-04 20:40) [4]

2 tsarevep ...хе хе...эт не для кряка... :))))))..по собственным нужджам!.. :)))))


 
Aydar   (2002-08-05 03:04) [5]

var
F:YFileStream;
S:Byte
begin
F:=TFileStream.Create("file.exe",fmOpenReadWrite);
F.Seek($00014521,soFromBeginning);
S:=$84; F.Write(S,SizeOf(S));
F.Free;
end;


 
просто панк   (2002-08-06 01:11) [6]

ой спасибки большие... :о)



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

Текущий архив: 2002.08.19;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
14-60836
Sergo
2002-07-24 15:52
2002.08.19
Расширение


14-60852
J_S
2002-07-23 11:38
2002.08.19
ZIP


3-60527
Valeron
2002-07-30 12:44
2002.08.19
Help! BDE!


14-60856
RV
2002-07-24 22:53
2002.08.19
Есть математики средь люда делфийского?


1-60564
KF
2002-08-06 04:57
2002.08.19
Пароли Outlook