Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.05.23;
Скачать: [xml.tar.bz2];

Вниз

Правка файла в 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.006 c
1-73148
neax
2002-05-13 18:37
2002.05.23
Editor


1-73166
mifi
2002-05-13 23:08
2002.05.23
рлык TO form


1-73249
nobody2002
2002-05-10 15:49
2002.05.23
Копирование файла на дискету


3-73056
qqqq
2002-04-27 12:13
2002.05.23
TDBListBox - MultiSelect?


3-73080
kimblch
2002-04-29 03:24
2002.05.23
ГЛЮК с LookupFields ????





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский