MAINICON laden

[himitsu]

[quote="Luckie"]Das Anwendungsicon legt Delphi mit der Ressourcen ID MAINICON in der Ressource ab. Wie komme ich jetzt an das Icon über die ID dran?

[add]

Zitat:

To load one of the standard system-defined icons, set the hInstance member to NULL and set lpszIcon to one of the values listed with the LoadIcon function.

???

Delphi-Quellcode:

MsgInfo.hInstance := 0;
MsgInfo.dwStyle := MB_USERICON;
MsgInfo.lpszIcon := MAKEINTRESOURCE(LoadIcon(GetWindowLong(hParent, GWL_HINSTANCE), IDI_APPLICATION));

oder meinen die es so?

Delphi-Quellcode:

MsgInfo.hInstance := 0;
MsgInfo.dwStyle := MB_USERICON;
MsgInfo.lpszIcon := IDI_APPLICATION;