программинг на Асме в Дельфях

[miroslav]

Помогите!!!
Я делаю функцию на Асме в дельфях, но она не работает!
Почему?
function SqrMan(x:integer):integer; assembler;
begin
asm
mov eax,x
mov ebx,eax
mul ebx
mov @result,eax
end;
end;

 

[Yason]

Ты будешь смеяться, но ту же функцию выполняет и такой код (Delphi 5)

function SqrMan(x: integer): integer;
asm
mov eax, x
imul eax
end;

По поводу ошибки:
Unless a function returns a string, variant, or interface reference, the compiler doesn’t allocate a function result variable; a reference to the @Result symbol is an error. For strings, variants, and interfaces, the caller always allocates an @Result pointer.
(с)Delphi help

 

[kagor]

Yason