Курсор

← →
GTR86 (2007-02-04 19:03) [0]

Здравствуйте мастера. У меня такая проблема: когда я пытаюсь изменить курсор при событии OnMouseDown на каком либо компоненте, например на ListBox"е (listbox1.Cursor:=crdrag;), то курсор изменяется только при отпускании кнопки мыши. Можно ли сделать так, чтобы курсор изменялся сразу после нажатии кнопки мыши?

← →
TRUNK © (2007-02-04 21:56) [1]

Курсор обновляется при движении мыши. Возможно проблема именно в этом.
Если так, то надо просто программно сдвинуть мышь хотя-бы на один пиксел.

← →
RASkov (2007-02-05 02:02) [2]

> [0] GTR86 (04.02.07 19:03)

procedure TForm.ListBoxMouseDown(...);
begin
Screen.Cursor:=crDrag;
end;

procedure TForm.ListBoxMouseUp(...);
begin
Screen.Cursor:=crDefault;
end;

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