Neues Icon für Messagebox

[SirThornberry]

ich hab das Gefühl du verstehst den Quelltext nicht sondern hast ihn einfach nur kopiert.

Pointer(PWideChar(WideString('MAINICON'))); Der Quelltext macht nichts anderes als 'MainIcon' zu einem WideString zu casten, davon die Adresse zu holen und diese auf einen Pointer zu casten um sie zuweisen zu können.

Wenn du also ein Icon in einer Ressource hast, hat diese Ressource einen Namen. Diesen Namen musst du zu einem WideString wandeln und die Adresse des WideStrings kannst du dann lpszIcon zuweisen.