общие вопросы по WINAPI Опции

[Client]

function windowproc(wnd:hwnd; msg,wparam,lparam:LongInt):LongInt; stdcall;
begin
  case msg of
    WM_DESTROY: begin
      PostQuitMessage(0);
      Result:=0;
      exit;
    end;
  end;
  Result:=DefWindowProc(wnd,msg,wparam,lparam)
end;

Вот простая оконная процедура, которая реагирует на выход. Зачем нужно

Result:=0;

и сразу после этого EXIT и после case

Result:=DefWindowProc(wnd,msg,wparam,lparam)

?

[volvo]

Без нее даже не запустилась программа

Потому что WM_CREATE и WM_PAINT остались необработанными

А как загрузить другой курсор и иконку?

Добавить к проекту RC-файл, в нем описАть иконку:

101 ICON "Icon.ico"

, и подключить ее:

const
  IDI_MyOwnIcon = 101; // <--- должно совпадать с ID в файле ресурсов

...
hIcon := LoadIcon(GetModuleHandle(nil), MAKEINTRESOURCE(IDI_MyOwnIcon));

То же самое - с курсором...