Как изменить курсор

← →
stel (2002-10-05 07:16) [0]

Как изменить курсор, когда указатель мыши находится вне клиентской области окна, например на CaptionBar? Пробовал SetCursor да чё-то не помогает.

← →
Ученик © (2002-10-05 08:38) [1]

procedure WMSetCursor(var Message : TMessage); message WM_SETCURSOR;

procedure TForm1.WMSetCursor(var Message : TMessage);
begin
if Message.lParamLo = HTCAPTION then begin
SetCursor(LoadCursor(0, IDC_WAIT));
Message.Result := 1
end else
inherited
end;

← →
stel (2002-10-05 18:06) [2]

Благодарствую

Как изменить курсор Найти похожие ветки