Assemblercode leitest Du einfach nur durch das Schlüsselwort
asm ein und schließt durch end; ab, das geht in ganz normalen Prozeduren.
Dazu ein Beispiel aus der
OH:
Delphi-Quellcode:
function Sum(X, Y: Integer): Integer;
begin
Result := X + Y;
end;
// Das ganze in Assembler:
function Sum(X, Y: Integer): Integer;
stdcall;
begin
asm
MOV EAX,X
ADD EAX,Y
MOV @Result,EAX
end;
end;
Daniel