Ich wollte mit MessageBoxIndirect eine MessageBox mit eigenem Symbol machen, alles funktioniert, nur es kommt nicht mein Symbol...
Delphi-Quellcode:
var
params: MSGBOXPARAMS;
begin
with params
do begin
cbSize := SizeOf(TMsgBoxParams);
dwContextHelpId := 0;
dwLanguageId := LANG_NEUTRAL;
dwStyle := MB_OK
or MB_USERICON;
hInstance := GetWindowLong(
Handle, GWL_HINSTANCE);
hwndOwner :=
Handle;
lpfnMsgBoxCallback :=
nil;
lpszCaption := '
blubb';
lpszIcon := '
MAINICON';
lpszText := '
blubb';
end;
MessageBoxIndirect(params);
end;
Das Icon MAINICON ist in der Anwendung vorhanden, hab extra mit dem ResourceHacker nachgeguckt, müsste also doch eigentlich alles so in Ordnung sein...
Was mach ich da falsch?