Męczę się cały dzień z kodem. Myślałem, że już to skończę, gdy zaskoczył mnie pewien błąd. Nie mam już siły się z tym męczyć. Może wy coś wymyślicie:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
label3.caption:=readmeminteger(inttohex(readmeminteger(pointerEXP)+hextoint('58'),8));
end...