Форум: "Основная";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];

Вниз

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

← →
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]

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

---

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

Форум: "Основная";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.006 c