Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.006 Beiträge
 
Delphi 12 Athens
 
#7

AW: Vertändnisfrage zu 'Meldungen'

  Alt 6. Jun 2018, 10:28
Ich wollte sie aber nicht einfach weghaben, sondern auch wissen, was sie bedeutet.
Etwas ausführlicher: MessageDlg ist in Vcl.Dialogs als inline deklariert. In diesem Fall erzeugt der Compiler keinen Funktionsaufruf, sondern fügt den Code der Funktion direkt ein. Damit das gelingt, muss dieser Code natürlich auch an dieser Stelle compilierbar sein.

Nun sind einige der Typdeklarationen in Vcl.Dialogs einfach nur Aliase zu Typen aus System.UITypes:
Delphi-Quellcode:
type

  TMsgDlgType = System.UITypes.TMsgDlgType;
  {$NODEFINE TMsgDlgType}

  TMsgDlgBtn = System.UITypes.TMsgDlgBtn;
  {$NODEFINE TMsgDlgBtn}
  TMsgDlgButtons = System.UITypes.TMsgDlgButtons;
  {$NODEFINE TMsgDlgButtons}
Aus nicht näher ersichtlichen Gründen braucht der Compiler im Falle einer Inline-Auflösung Zugriff auf die originalen Deklarationen. Deswegen muss in deiner Unit die System.UITypes aufgeführt sein.

Machst du das nicht, wird das inline nicht aufgelöst und ein regulärer Call erzeugt.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat