Forum: Win32/Win64 API (native code)
Delphi
by Zacherl,
29. Aug 2006
Wenn du dein Icon über einen Index einbindest (Mainicon ist meine ich 1), dann kannst du das verwenden:
function MyMessageBox(hWnd: HWND; Text, Caption: String; IconID: DWORD;
const Buttons: Cardinal = MB_OK): Integer;
var MsgInfo: TMsgBoxParams;
begin
With MsgInfo do
begin
cbSize := SizeOf(TMsgBoxParams);
dwContextHelpId := 0;
dwLanguageId := LANG_NEUTRAL;
Forum: Win32/Win64 API (native code)
Delphi
by Zacherl,
29. Aug 2006
Du musst LoadRessource('MainIcon') oder so ähnlich verwenden ...