Տուն
Top.Mail.Ru Moscow
Ֆորում: «Գլխավոր»;
Ընթացիկ արխիվը `2002.01.08;
Բեռնել: [xml.tar.bz2];

Down

Ինչպես բեռնել կուրսորը ռեսուրսից, այնուհետեւ պահել այն սկավառակի վրա: Գտնել նմանատիպ մասնաճյուղեր


Delphimun   (2001-12-18 17:11) [0]

Ինչպե՞ս բեռնել կուրսորը ռեսուրսից, այնուհետև այն պահել սկավառակի վրա (գանգրման երկարացման տակ):



Delphimun   (2001-12-18 17:18) [1]

Այս հարցն արդեն երկրորդ անգամն եմ, կարո՞ղ եմ իսկապես չսպասել դրա պատասխանին:



Delphimun   (2001-12-18 17:30) [2]

Ну пожалуйста!!!!!!!!!!!!!!



Dimka Maslov   (2001-12-18 17:38) [3]

TResourceStream.Create -> TFileStream.Create -> TFileStream.Assign



Delphimun   (2001-12-18 17:56) [4]

А с примером



Delphimun   (2001-12-18 17:59) [5]

Ես ներողություն եմ խնդրում այդպիսի պնդման համար `հեշտ հարցի համար, բայց օգնություն չունեմ (դելֆիի հին սկավառակը կոտրվել է, ես նոր եմ գնել, բայց օգնություն չկա)



Delphimun   (2001-12-18 18:11) [6]

Когда я пишу:
...
{$R x:\cur.res}
...
էր
a: TResourceStream;
սկսել
a := TResourceStream.Create(form1.Handle,"cur","Cursor");
Он выдаёт мне динамическую ошибку: Resource cur not found
хотя курсор в ресурсе имеет имя cur
И что мне после этого делать, и нельзя ли с примером



Dimka Maslov   (2001-12-18 18:33) [7]

TResourceStream.Create( hInstance



Delphimun   (2001-12-18 18:40) [8]

Dimka Maslov :
Նույնը



Иван Шихалев   (2001-12-18 19:04) [9]

Курсор хранится как список ссылок на его images. Возможно, в этом проблема, хотя TResourceStream- ը может оказатьзя под это заточен. Посмотри, как у меня реализовано доставание иконок - в кладовке Icon Extractor - курсор полностью аналогичен. Если же TResourceStream- ը специально заточен, то вместо "Cursor" պետք է օգնի RT_CURSOR_GROUP կամ "CURSOR"



Delphimun   (2001-12-19 12:57) [10]

Когда я пишу:
var Curs:HCursor;
CN:string;
սկսել
CN:="cur"+#0;
{ "CUR" is Name from Res file }
Curs:=LoadCursor(hInstance,@CN[1]);
Screen.Cursors[crHandPoint]:=Curs;
button1.Cursor := curs;
У кнопки курсор не изменяется, в чём тут ошибка, тоесть как сделать, чтоб у кнопки курсор стал, как вресурсе?



Digitman   (2001-12-19 13:14) [11]

button1.Cursor - св-во типа TCursor, а ты пытаешься назначить ему значение типа HCursor.



Delphimun   (2001-12-19 13:18) [12]

А как делать нужно(как перевести Hcursor в Tcursor) Please help я же говорю у меня хелпа нет, напишите ПОЖАЛУЙСТА!



Digitman   (2001-12-19 13:19) [13]

и вообще нехорошо это - подменять системные курсоры своими.
const
crMyCursor = 1; // к примеру

Screen.Cursors[crMyCursor]:=Curs;
button1.Cursor := crMyCursor; // вот так правильно будет




Digitman   (2001-12-19 13:20) [14]

и вообще нехорошо это - подменять системные курсоры своими.
const
crMyCursor = 1; // к примеру

Screen.Cursors[crMyCursor]:=Curs;
button1.Cursor := crMyCursor; // вот так правильно будет




Delphimun   (2001-12-19 13:29) [15]

Digitman:
Наконецто, свершилось, умный человек нашелся. Я этот вопрос второй день мучаю, а ответ некто не может дать, как будто некто это никогда не использовал!



Digitman   (2001-12-19 14:51) [16]

>Delphimun
А потом другой такой же примитивный вопрос будешь неделю мучить. И все тебе невдомек, что типы должны совпадать, а инфа о типах - как минимум в хэлпе есть, а хэлп для тебя писан - чтобы читать его при любой возникшей проблеме, а не держать его мертвым бесполезным хламом на диске )



Էջեր: 1 ամբողջ ճյուղը

Ֆորում: «Գլխավոր»;
Ընթացիկ արխիվը `2002.01.08;
Բեռնել: [xml.tar.bz2];

Up









Հիշողություն `0.6 ՄԲ
Ժամանակը `0.038 գ
1-22145
MARCODEN- ը
2001-12-15 17:42
2002.01.08
Պատվերով կոճակ


3-21900
վանո
2001-12-07 11:13
2002.01.08
TString և լարային


6-22290
Սինեդ
2001-10-09 17:48
2002.01.08
Հարց Sockets API- ի վերաբերյալ


7-22426
inferno123
2001-09-25 10:32
2002.01.08
Պորտ ծրագրավորում


1-22043
Սերժ
2001-12-18 19:18
2002.01.08
Deleteնջել օբյեկտը





afrikaans ալբանական արաբական հայերեն ադրբեջանական Բասկերի Բելառուսի Բուլղարիայի catalan Չինարեն (պարզեցված) Չինարեն (ավանդական) Խորվաթիայի չեխ դանիերեն հոլանդական Անգլերեն
Էստոնիայի filipino ֆիններեն ֆրանսերեն
galician վրացական գերմանական հունարեն haitian Creole եբրայերեն հինդի հունգարերեն icelandic հայերեն իռլանդական իտալական ճապոնացի Կորեայի Լատվիայի Լիտվայի մակեդոներեն Մալայերեն մալթերեն նորվեգական
պարսկական Լեհաստանի պորտուգալացի ռումինական ռուսական սերբերեն Սլովակիայի Սլովենիայի իսպաներեն սուահիլի շվեդերեն թայերեն թուրքական ուկրաինական ուրդու վիետնամերեն ուելսերեն հայերեն bengali բոսնիերեն
Cebuano Esperanto գուջարաթի հաուսա Hmong Igbo ճավաերեն kannada Khmer Lao լատիներեն մաորի մարաթի մոնղոլական նեպալերեն Punjabi Somali tamil telugu յորուբա
զուլուսերեն
Անգլերեն Французский Немецкий Итальянский Португальский Русский Испанский