работа с файлами в HEX формате, поиск и замена по 16ричному адресу значения в файле.

[andr_mozg]

Как можно по задонному адресу прочитать значение и потом его заменить?

к примеру есть файл (прикреплен.)



в нем есть адрес 000000E6 значение 16цатиричное = CC



можно ли сразу по этому адресу получить значение не читая весь файл??

спасибо

[kaster]

Код:

Код: Выделить всё

FileSetPos
FileRead

для чтения нужного байта без чтения всего файла. но писать файл не прочитав нельзя.

[andr_mozg]

спасиб, то же их смотрел, но пока неполучилось реализовать задуманное.

[andr_mozg]

Код:

Код: Выделить всё

Func _FHEX($sFile,$ha)
	Local $hFile = FileOpen($sFile, 16)
	Local $sRez
	If $hFile = -1 or Dec ($HA) > (FileGetSize ( $sFile))-1 Then
		Return -1
	EndIf
	FileSetPos($hFile,Dec ($HA), 0)
	$sRez = hex( FileRead($hFile,1))
	FileClose($hFile)
	Return $sRez
EndFuncc

вот как то так