Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.04.24;
Скачать: CL | DM;

Вниз

LoadIcon   Найти похожие ветки 

 
Sfagnum ©   (2003-02-27 16:01) [0]

есть такой код:
program Setup;

uses windows, messages;
{$R setup.res}

var wc : TWndClassEx;
wndMain: HWND;
Mesg : TMsg;
...
callback функция
...

var xPos,yPos,nWidth,nHeight : Integer;
begin
with wc do begin
cbSize:=sizeof(wc);
style:=CS_HREDRAW or CS_VREDRAW;
lpfnWndProc:=@WindowProc;
cbClsExtra:=0;
cbWndExtra:=0;
hInstance:=HInstance;
hIcon:=LoadIcon(hInstance,PChar("MAINICON"));
hCursor:=LoadCursor(0,IDC_ARROW);
hbrBackground:=COLOR_BTNFACE+1;
lpszMenuName:=nil;
lpszClassName:="WinMin : Main";
end;
RegisterClassEx(wc);

....

end.

хочу шоб у окошка которое будет показывать была иконка расположенная в ресурсах - она там одна - MAINICON
почему она не грузиться? ошибка происходит именно в LoadIcon...

Заранее спасибо


 
Игорь Шевченко ©   (2003-02-27 16:05) [1]

Что говорит GetLastError ?


 
Sfagnum ©   (2003-02-27 16:11) [2]

87


 
Sfagnum ©   (2003-02-27 16:23) [3]

вопрос снят
Instance := GetModuleHandle(nil);
этой строчки не хватало ну и соответсвующих изменений


 
STATIC ©   (2003-02-28 04:46) [4]

Ага.
hInstance:= SysInit.HInstance;
hIcon:=LoadIcon(SysInit.hInstance,PChar("MAINICON"));



Страницы: 1 вся ветка

Текущий архив: 2003.04.24;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
6-77048
eastwood-ask
2003-03-02 07:22
2003.04.24
X.25


4-77242
Гриня
2003-02-28 00:15
2003.04.24
Открытие CD по букве...


3-76778
yurikon03
2003-04-04 09:30
2003.04.24
Как хранить суммы?


14-77128
Феликс
2003-04-06 21:54
2003.04.24
Я весь в непонятках :)


14-77078
Andrey Filatow
2003-04-06 20:49
2003.04.24
update Delphi 7