Правка файла в HEX

← →
-Jack- (2002-05-10 16:51) [0]

Скажите, как мне программно поменять в файле значение по адресу допустим 0x0000009A на FF? Как вообще прочитать файл в HEX?

← →
Anatoly Podgoretsky © (2002-05-10 17:14) [1]

В HEX то зачем, работай с двоичным файлом

← →
Olgerd © (2002-05-10 17:22) [2]

Я просто читаю с помощью TFileStream в буфер, например
var Buff:char;
FileStream1.Seek($0000009A,soBeginning);
FileStream1.ReadBuffer(Buff,1);
Ord(Buff) - будет номер твоего символа

← →
[NIKEL] © (2002-05-10 17:33) [3]

попоробуй это
procedure TForm1.Button1Click(Sender: TObject); var f:TFileStream; s:byte; begin //Открываем нужный файл f:=TFileStream.Create("твойфайл.exe",fmOpenReadWrite); //переходим на нужную позицую в файле(твой адрес) f.Seek($0AC0E9,soFromBegining); //читаем текущее значение (можно узнать чё там находиться) f.Read(s,size(s)); //записываем твой FF s:=$FF; //возвращаемся обратно f.Seek($0AC0FE,soFromBegining); //записываем новое значение f.write(s,sizeof(s)); f.Free; end;

← →
-Jack- (2002-05-11 15:50) [4]

Всем спасибо, на мысль натолкнули =)

← →
-Jack- (2002-05-12 15:07) [5]

Скажите как можно сдвинуть адрес на один байт вправо не переписывая его весь. Например с 00000281 на 00000282.

← →
-Jack- (2002-05-12 15:36) [6]

...и ещё вся эта фигня не хочет отображаться в эдите.

← →
Anatoly Podgoretsky © (2002-05-12 15:52) [7]

-Jack- (12.05.02 15:07)
P := Pointer(Integer(P) + 1)

← →
-Jack- (2002-05-12 16:51) [8]

Указатеть с вещественным числом вроде не совместим. Как нить перевести мона? Как мне сделать чтоб я в одном эдите ввожу число, а оно отображалось в другом в HEX?

Прочти книжечку "Системы счисления" в частности раздел шестнадцатеричная...

← →
-Jack- (2002-05-13 06:23) [10]

Причём тут счисления, я это умею. Там же не надо в двоичную переводить. Раз такой умный взял бы да сказал как сделать.

← →
-Jack- (2002-05-14 10:56) [11]

Если б когда я писал этот вопрос, знал что есть inttohex(...), то я б вопрос не писал =)))

Правка файла в HEX Найти похожие ветки