Casa
Top.Mail.Ru Yandeks.Metrika
Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

Para baixo

Como carregar um cursor de um recurso e depois salvá-lo no disco? Encontre agências semelhantes


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

Como carregar um cursor de um recurso e salvá-lo no disco (sob a extensão cur)?



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

Esta é a segunda vez que faço esta pergunta: não posso realmente esperar por uma resposta?



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

Bem, por favor !!!!!!!!!!!!!!!



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

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



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

E com um exemplo



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

Peço desculpas por essa insistência em uma pergunta fácil, mas eu não tenho uma ajuda (o disco antigo com o delphi quebrou, eu comprei um novo, mas não há ajuda)



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

Quando eu escrevo:
...
{$ R x: \ cur.res}
...
var
a: TResourceStream;
começar
a: = TResourceStream.Create (form1.Handle, "cur", "Cursor");
Isso me dá um erro dinâmico: o recurso cur não encontrado
embora o cursor no recurso seja denominado cur
E o que devo fazer depois disso, e é possível com um exemplo



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

TResourceStream.Create ( hInstance



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

Dimka Maslov:
A mesma coisa



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

O cursor é armazenado como uma lista de links para suas imagens. Talvez este seja o problema, embora TResourceStream pode ser preso por isso. Veja como recebi o ícone - na despensa do Icon Extractor - o cursor é completamente semelhante. Se TResourceStream especialmente afiada, em vez disso "Cursor" deve ajudar RT_CURSOR_GROUP ou "CURSOR"



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

Quando eu escrevo:
var Curs: HCursor;
CN: string;
começar
CN: = "cur" + # 0;
{"CUR" é o nome do arquivo Res}
Curs: = LoadCursor (hInstance, @ CN [1]);
Screen.Cursors [crHandPoint]: = Cursa;
button1.Cursor: = curs;
O cursor do botão não muda, qual é o erro aqui, ou seja, como tornar o cursor do botão um recurso?



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

button1.Cursor é um tipo de TCursor e você está tentando atribuir um valor do tipo HCursor a ele.



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

E como fazê-lo (como converter Hcursor para Tcursor) Por favor, ajude, eu digo que não tenho ajuda, escreva POR FAVOR!



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

e geralmente não é bom substituir os cursores do sistema pelos seus próprios.
const
crMyCursor = 1; // por exemplo

Screen.Cursors [crMyCursor]: = Cursa;
button1.Cursor: = crMyCursor; // isso mesmo




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

e geralmente não é bom substituir os cursores do sistema pelos seus próprios.
const
crMyCursor = 1; // por exemplo

Screen.Cursors [crMyCursor]: = Cursa;
button1.Cursor: = crMyCursor; // isso mesmo




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

Digitman:
Finalmente, aconteceu que um homem inteligente foi encontrado. Eu tormento esta questão no segundo dia, mas alguém não pode dar uma resposta, como se alguém nunca tivesse usado isso!



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

> Delphimun
E então você vai atormentar outra questão similarmente primitiva por uma semana. E você não sabe que os tipos devem coincidir, e há informações sobre os tipos, pelo menos na ajuda, e a ajuda está escrita para você - para lê-lo em caso de qualquer problema e não para mantê-lo inútil em disco)



Страницы: 1 filial inteira

Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

em cima









Memória: 0.6 MB
Hora: 0.031 c
1-22262
Katia
2001-12-17 15:25
2002.01.08
ajudar


1-22264
Anatoly
2001-12-17 06:36
2002.01.08
gráfico


1-22091
Mikhalyov Dmitry
2001-12-19 16:02
2002.01.08
pergunta de pascal


3-21937
ANDREY196
2001-12-04 18:24
2002.01.08
Como faço para alterar a cor em uma determinada linha para uma tabela em DBGRID


14-22339
Chinês como Zo Vut
2001-11-01 10:12
2002.01.08
Programador, qual seu nome?





afrikaans albanês Arabic armênio azerbaijano basco belarusian Bulgarian catalão Chinês simplificado) Chinês tradicional) croata checo dinamarquês Dutch Inglês estoniano filipino Finnish French
Galego georgiano German grego crioulo haitiano hebraico hindi húngaro islandês Indonesian irlandês Italian Japanese Korean letão lituano macedónio Malay maltês Norwegian
persa polonês Portuguese romeno Russa sérvio Slovak esloveno espanhol swahili sueco tailandês turco ucraniano urdu vietnamita galês ídiche bengali bósnio
cebuano esperanto gujarati hausa hmong igbo javanês kannada khmer lao latino maori marata mongol Nepali punjabi somali tâmil telugu yoruba
zulu
Английский francês Alemão Italiano Португальский russo Espanhol