Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.06.19;
Скачать: [xml.tar.bz2];

Вниз

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

 
stream   (2003-06-05 16:19) [0]

Добрый день. Как програмно изменить курсор приложения? Пример в из справки Делфи не работает.


 
Sandman25   (2003-06-05 16:25) [1]

Screen.Cursor := crHourGlass


 
VMcL   (2003-06-05 16:26) [2]

Этот что ли не работает?

var
Save_Cursor:TCursor;
begin
Save_Cursor := Screen.Cursor;

Screen.Cursor := crHourGlass; { Show hourglass cursor }

try
{ Do some lengthy operation }
finally
Screen.Cursor := Save_Cursor; { Always restore to normal }
end;
end;


 
stream   (2003-06-05 16:28) [3]

Мне нужно загрузить свой, нестандартный курсор (он находится в файле xxx.res, который я подключаю к своей программе


 
VMcL   (2003-06-05 16:30) [4]

>stream © (05.06.03 16:28)

Курсоры - *.cur, *.ani


 
VMcL   (2003-06-05 16:32) [5]

>stream © (05.06.03 16:28)
Curs := LoadCursor(hInstance, "MyCursor");
Screen.Cursor := Curs;


Так, вроде...


 
Ru   (2003-06-05 16:34) [6]

Form1.Cursor:=crCross; - например так написать в обработчике какого-либо события.


 
stream   (2003-06-05 16:35) [7]

Пишу {$R xxx.cur} и получаю
[Error] RLINK32: Unsupported 16bit resource in file "D:\stars\Cursor2.cur"


 
VMcL   (2003-06-05 16:35) [8]

>VMcL © (05.06.03 16:32)
Нет, вот так:

Screen.Cursors[crMyCurs] := LoadCursor(hInstance, "MyCursor");
Screen.Cursor := crMyCurs;


 
VMcL   (2003-06-05 16:37) [9]

>stream © (05.06.03 16:35)

{$R xxx.res}

а xxx.res - это должен быть откомпилированный xxx.rc (brcc32.exe)


 
stream   (2003-06-05 16:40) [10]

> VMcL © (05.06.03 16:35)
У меня LoadCursor возвращает что-то большее 65000, что должно значить ошибку. Я создал файл *.res, в нем описан мой курсор, но почему-то не загружает


 
Юрий Зотов   (2003-06-05 17:07) [11]

1. > "Unsupported 16bit resource..."
Чем и как рисовался курсор?

2. > Я создал файл *.res...
То же самое - чем и как?


 
VMcL   (2003-06-05 17:08) [12]

>stream © (05.06.03 16:40)

Текст rc-файла?


 
stream   (2003-06-05 17:17) [13]

>Юрий Зотов © (05.06.03 17:07)
Курсор создавался в Image editor"е


 
VMcL   (2003-06-05 17:22) [14]

>stream © (05.06.03 17:17)

Может перепутал? Cursor - Icon, я только что делал в Im. Ed. - всё ОК. Проверь регистр букв - по-моему нужно передавать строку в верхнем регистре в LoadCursor.


 
VMcL   (2003-06-05 17:24) [15]

>VMcL © (05.06.03 17:22)

Точнее в самом Image Editor"е имя должно быть в верх. рег.


 
stream   (2003-06-05 17:35) [16]

Всем большое спасибо, а особенно VMcL. Все заработало!!!



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

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

Наверх





Память: 0.48 MB
Время: 0.011 c
8-60277
АлексКриппер
2003-02-27 09:31
2003.06.19
Как создать MIDI музыку


1-60165
tasman
2003-06-06 06:51
2003.06.19
Динамическое назначение event у компоненты NMPop3 (из FastNet)


4-60476
lutik
2003-04-16 12:20
2003.06.19
Как сменить канву заголовка окна


14-60327
Карлсон
2003-06-01 16:21
2003.06.19
чистящие средства.


3-60030
Chayan
2003-05-27 16:54
2003.06.19
Edit, Grid





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский