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

← →
НАИВый панк (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]

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

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