Delphi+asm

[Павел_ТГУ]

Есть массив
var
arr: array[0..84991] of Byte =(
$4d,$5a,$90,$00,$03,$00,$00,$00,$04 ,$00,$00,$00,$ff,$ff,$00,$00,
$b8,$00,$00,$00,$00,$00,$00,$00,$40 ,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,$00 ,$00,$00,$00,$00,$00,$00,$00,...
......
$00);
y:Pointer;


Не получается запустить его на выполнение:

asm
MOV EAX, y
LEA EBX, arr[0]
CALL EBX
end;

Помогите запустить массив.

[alexcoder]

Что пишет? Шлем для телепатии подсказывает, что у массива нет прав на выполнение и их следует установить страницам памяти, в которых расположен массив функцией VirtualProtect, но это не точно)

[Pavia]

F9 Запустить программу
F5 Поставить Break Point
F7 Трассировать с заходом в процедуры
F8 Трассировать без захода в процедуры
https://prog-example.ru/goryachie-kl...-v-delphi.html

[Павел_ТГУ]

Сообщение от alexcoder

Что пишет? Шлем для телепатии подсказывает, что у массива нет прав на выполнение и их следует установить страницам памяти, в которых расположен массив функцией VirtualProtect, но это не точно)

Ошибку выдает при выполнении((

[evg_m]

MOV EAX, y

а где

y:=....; //какой там адрес нам нужен

[p51x]

Да не выполнится оно все равно. EXE-файл не просто с начала файла выполняется, там лоадер кучу работы сначала делает, а исполняемый код находится не с начала.

[Павел_ТГУ]

Сообщение от evg_m

а где

y:=....; //какой там адрес нам нужен

Я вот точно не помню чему присваивается Y, но у меня так написано и не работает:
y:=@arr[0];

Сообщение от p51x

Да не выполнится оно все равно. EXE-файл не просто с начала файла выполняется, там лоадер кучу работы сначала делает, а исполняемый код находится не с начала.

Ничего подобного у меня раньше выполнялся код из массива, я просто забыл как правильно сделать..((

[Black Fregat]

Сообщение от Павел_ТГУ

Ничего подобного у меня раньше выполнялся код из массива

Так забейте в массив именно код, а не тупо файл .exe