Inline Asm Problem

[Namenloser]

Darf man fragen, wozu das ganze?

Delphi-Quellcode:

function ShowText: PWideChar;
const
  str: WideString = 'Hello World!';
begin
  Result := PWideChar(str);
end;

Das sollte doch genau so funktionieren und ist deutlich lesbarer.