Как писать в шеснадцатеричный файл??

← →
Cardinal © (2004-02-15 14:51) [0]

У меня не получается через writeln. Это мне понадобилось
после того, как я разобрался в защите от декомпрессии
Upx Shell. Cм:

http://delphimaster.net/view/15-1076761147/

← →
Digitman © (2004-02-15 14:57) [1]

> Как писать в шеснадцатеричный файл

> У меня не получается через writeln

что это еще за "шеснадцатеричный файл" ? текстовый что ли ?

← →
Digitman © (2004-02-15 15:01) [2]

тебе один байтик что ли нужно подправить в исп.файле ? чтобы "защиту сломать" ?
ну так а при чем здесь "шеснадцатеричный файл" ?

открывай файл с пом. TFileStream в режиме read/write, позиционируйся к нужному смещению методом seek(), записывай новое значение байта методом WriteBuffer() - и всех делов !

← →
Defunct (2004-02-15 15:11) [3]

Можно и BlockRead(_)/BlockWrite(_), Seek(_) исп. как отметил Digitman © (15.02.04 15:01) [2],
при открытии файла Reset(F, _размерность_), размерность должна быть равна 1 (1 байт).

← →
Anatoly Podgoretsky © (2004-02-15 16:35) [4]

Write(F, Hex строка)

СМОРОЗИЛ! Я торопился, думал о о редакторе ME, который показывает файл в шеснадцатеричном представлении, и задался вопросом как мне редактировать ...

То-то я удивился - в защите от декомпрессии человек разобрался, а бинарник через WriteLn пишет. Как же так, думаю?

Как писать в шеснадцатеричный файл?? Найти похожие ветки