das is mein code, compiliere tut es, nur es kratz ab, und ich weiss net was falsch is. uebrigens hab ich delphi 2009
Delphi-Quellcode:
unit inlineasm;
interface
type
TAsm =
class
m_strAsm:
string;
public
constructor Create;
property Text:
string read m_strAsm;
end;
implementation
constructor TAsm.Create;
begin
asm
push edx
@str:
db '
Hello World', $0
lea edx, @str
mov TAsm[eax].m_strAsm, edx
pop edx
end;
end;
end.