Скачать: CL | DM;

Помогите пожалуйста   Найти похожие ветки 

← →
DeMoN-777 ©   (2002-05-15 17:11) [0]

Уважаемые мастера.


Я подгружаю курсор из res файла таким макаром...
procedure TForm1.FormCreate(Sender: TObject);
const
crMyCursor=5;
begin
Screen.Cursors[crMyCursor] := LoadCursor(HInstance, "MyCursor");
Screen.Cursor := crMyCursor;
end;

И всё вроде работает нормально. Но когда подводишь курсор к бордеру любого компонента у которого BorderStile:=bsSingle
курсор снова становится стандартный =(

Вопрос: как лечить ?

Если вопрос непонятен скачайте "пример глюка" (сделан специально для пояснения вопроса).
Весит он правдо много (125 Кб.), но зато сразу всё поймёте.
Качать здесь- http://dcsoft.narod.ru/Project1.exe

С уважением, Дмитрий.

---

← →
DeMoN-777 ©   (2002-05-15 18:24) [1]

Помогите пожалуйста

---

← →
.   (2002-05-15 20:14) [2]

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c