Прочитать число из бинарного файла

[Tuner]

Нужно прочитать с определенного смещения int число из бинарного файла.
На питоне данная задачка решается просто:

with open(filename, 'rb') as rb:
    rb.seek(216)
    num  = struct.unpack('i', rb.read(4))
    print('num = ', num)

Результат: num = 610234

А как такое реализовать на Autoit?

 

[firex]

#Include <WinAPIEx.au3>

Local $hFile, $iBytes, $tBuf, _
	$iOffset = 0xDEAD
; ---
$hFile = _WinAPI_CreateFile ( ... )
If $hFile Then
	_WinAPI_SetFilePointer($hFile, $iOffset)

	$tBuf = DllStructCreate('int i')
	_WinAPI_ReadFile( _
		$hFile, _
		DllStructGetPtr($tBuf), _
		DllStructGetSize($tBuf), _ ;0x04
		$iBytes _
	)
	;*
	ConsoleWrite( "Result=" & $tBuf.i & @CRLF)

	_WinAPI_CloseHandle($hFile)
EndIf

 

[Tuner]

firex, благодарю!
Неожиданно сложный код, но он работает правильно.

 

[madmasles]

Tuner [?]

Неожиданно сложный код

Нативными функциями:

$hFile = FileOpen(@ScriptDir & '\test.prx', 16)
FileSetPos($hFile, 0x07D2, 0);2002
ConsoleWrite(Int(FileRead($hFile, 4), 1) & @LF)
FileClose($hFile)

 

[Tuner]

Нативными функциями:

Вот это офигенно! Неожиданно простой код :laugh: