Como incluir o ícone da quot;mãozinhaquot; do IE no delphi

Delphi

26/07/2005

Tipo..., fiz um programa q usa um link q abre uma pag web, só q na hora de escolher o cursor pra saber qual cursor aparecerá quando o mouse estiver sobre o link, no delphi ñ tem akele cursor padrão da ´mãozinha´ do Internet explorer o q tem é um parecido mais ñ o mesmo do IE...

a pergunta é, como incluir a ´mãozinha´ q aparece no Internet explorer no delphi???


Duolon

Duolon

Curtidas 0

Respostas

Duolon

Duolon

26/07/2005

Ninguem???


GOSTEI 0
Guilherme

Guilherme

26/07/2005

vc esta colocando para abrir um link por um label ?????
si for é so vc mudar a probriedade cursor para crHandPoint


espero ter ajudado !!!!!


GOSTEI 0
Michael

Michael

26/07/2005

Olá colega!

Primeiro vc extrai o cursor do Internet Explorer com algum programa visualizador de arquivos de recursos, como o ResExplorer que vem com o Delphi. Depois vc salva este cursor como um arquivo no disco, ou o coloca em um arquivo de recurso da sua aplicação, e o carrega com [b:912c74241c]LoadCursor[/b:912c74241c], ou [b:912c74241c]LoadCursorFromFile[/b:912c74241c].

[]´s


GOSTEI 0
Michael

Michael

26/07/2005

Ah, me esqueci: sinceramente não sei se é legal fazer isso.

Se não for, a saída é vc desenhá-lo na mão mesmo.

[]´s


GOSTEI 0
Duolon

Duolon

26/07/2005

Olá colega! Primeiro vc extrai o cursor do Internet Explorer com algum programa visualizador de arquivos de recursos, como o ResExplorer que vem com o Delphi. Depois vc salva este cursor como um arquivo no disco, ou o coloca em um arquivo de recurso da sua aplicação, e o carrega com [b:1cd3815102]LoadCursor[/b:1cd3815102], ou [b:1cd3815102]LoadCursorFromFile[/b:1cd3815102]. []´s


Onde q tem o LoadCursor, ou LoadCursorFromFile pra mim carregar a imagem do ícone??? pra capturar o cursos vou usar um printscreem e colar no paint e salvar como .cur ou .ico


GOSTEI 0
Michael

Michael

26/07/2005

Colega,

[b:09937b483d]LoadCursor [/b:09937b483d]e [b:09937b483d]LoadCursorFromFile [/b:09937b483d]são funções da API do Windows. Logo, basta adicionar a unit Windows à sua cláusula [b:09937b483d]uses[/b:09937b483d].

Quanto a usar PrintScreen para capturar a imagem do cursor, eu acho que não vai dar certo. Até onde eu sei, essa tecla salva a imagem da tela na área de transferência, mas SEM o cursor.

Use o ResExplorer q é mais fácil.

[]´s


GOSTEI 0
Duolon

Duolon

26/07/2005

Colega, [b:e1272b384c]LoadCursor [/b:e1272b384c]e [b:e1272b384c]LoadCursorFromFile [/b:e1272b384c]são funções da API do Windows. Logo, basta adicionar a unit Windows à sua cláusula [b:e1272b384c]uses[/b:e1272b384c]. Quanto a usar PrintScreen para capturar a imagem do cursor, eu acho que não vai dar certo. Até onde eu sei, essa tecla salva a imagem da tela na área de transferência, mas SEM o cursor. Use o ResExplorer q é mais fácil. []´s


Cara é q eu sou bem iniciante no delphi, como eu faço isso?
e se tem razão quanto ao printscreem.. ele ñ captura o mouse..


GOSTEI 0
Duolon

Duolon

26/07/2005

mais uma coisa, onde eu acho o Res explorer meu delphi é o 7


GOSTEI 0
Duolon

Duolon

26/07/2005

UP! :wink:


GOSTEI 0
Adriano Santos

Adriano Santos

26/07/2005

Veja um exemplo:

const 
  crSeuCursor = 1; // Tem que ser um valor maior que 0 (zero)


procedure TForm1.FormCreate(Sender: TObject);
begin
  Screen.Cursors [crSeuCursor] := LoadCursorFromFile (´c:\winnt\cursors\harrow.cur´);
  // O cursor pode ser dos tipos comum (*.cur) ou animado (*.ani)
  // Lembre-se: o arquivo tem que estar na mesma pasta do programa
  // ou digite o nome do caminho dele.
end;

procedure TForm1.FormShow(Sender: TObject);
begin
  Form1.Cursor := crSeuCursor;
end;



GOSTEI 0
POSTAR