Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Offset von einem Label (https://www.delphipraxis.net/65337-offset-von-einem-label.html)

brechi 15. Mär 2006 13:21


Offset von einem Label
 
Mit Delphi 7 funktioniert folgender (logischer) Code nicht.
Ich hatte die Frage zwar schon vor einem Jahr mal im DF gepostet,
aber da hier ja einige Leute direkt Kontakt zu Borland haben schreib ich sie hier nochmal rein.

Delphi-Quellcode:
var p: Pointer;

label hallo;
begin
  asm // funktioniert 'p' enthält die absolute Adresse
    PUSH OFFSET hallo
    POP DWORD PTR [p]
  end;

  p := @hallo; //funktioniert nicht, Delphi verweigert die Kompilierung, obwohl es 'eigentlich' möglich sein müsste

  hallo:
end;
Ist das Problem inzwischen bei Delphi05/06 gelöst. Wird es eventl. irgendwie anders Unterstützt?
Gibt es eine Möglichkeit, dass dies irgendwann mal umgesetzt wird?

Auch wenn Labels nicht benutzt werden sollten, für den ein oder anderen Code hat dies doch Vorteile.
Wäre deshalb mal nett zu hören was ihr davon haltet.


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:40 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz