Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.27;
Скачать: 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 вся ветка

Текущий архив: 2002.05.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.017 c
1-88557
Сатир
2002-05-16 15:12
2002.05.27
Определение битмапы для нового компонента


1-88469
Лёша
2002-05-17 22:31
2002.05.27
Просмотр HTML


3-88331
Jony
2002-04-30 10:09
2002.05.27
На какое событие повесить обработчик для подсчета суммарных знач.


1-88521
pusrg
2002-05-15 22:13
2002.05.27
Св-во Data для TListItem


4-88680
Stupid
2002-03-27 17:55
2002.05.27
Помогите