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

Вниз

Правка файла в 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?

---

← →
BAHO ©   (2002-05-13 05:31) [9]

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

---

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

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

---

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

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

---

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

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

Наверх

Память: 0.48 MB
Время: 0.01 c