Colocando aplicação Kylix no TrayIcon do KDE

Neste artigo explicarei como esconder uma aplicação da barra de tarefas no KDE colocando o ícone no TrayIcon.

[ Hits: 15.410 ]

Por: Fabio Massalino em 28/09/2004 | Blog: http://www.optimusconsulting.com.br


Usando o QTrayIcon



Primeiramente, faça o download do arquivo em:
Descompacte-o no diretório /[kylix path]/lib:

$ tar -xvzf QtrayIcon.tar.gz

Abra o kylix e crie uma nova aplicação.

Na Unit1, vá na cláusula USES, e acrescente no final:

QtrayIcon

Acrescente no Form1 os seguintes componentes:
  • PopUpMenu;
  • Image.

No Image1, insira o ícone que você quer que apareça no trayicon.

IMPORTANTE: A imagem precisa ter a extensão .ico.

No popUpMenu, insira as opções que aparecerá ao clicar, com o botão direito do mouse, em cima do ícone.

Vamos a programação:
Na cláusula Types, crie o seguinte objeto, na seção Private:

icone: TTrayIcon;

Crie a procedure TrayDblClick, com os seguinte código:

procedure TrayDblClick(Sender: Tobject);
begin
  Visible := True;
  WindowState := wsNormal;
end;

Adicione os seguintes eventos do Form1:

OnCreate:

begin
Icone:= TTrayIcon.Create(self);
Icone.PopupMenu := PopUpMenu1;
Icone.OnDblClick := TrayDblClick;
Icone.ToolTip := 'Aplicação';  //Hint do aplicativo
Icone.ShowToolTip := True;
Icone.Icon := Image1.Picture.Icon;
end;

OnClose:

begin
Action := caNone;
Application.Minimize;
hide;
end;

OnHide:

begin
  Icone.Show;
end;
Página anterior     Próxima página

Páginas do artigo
   1. Introdução
   2. Usando o QTrayIcon
   3. Conclusão
Outros artigos deste autor

Criando uma aplicação Kylix com PostgreSQL usando Zeos (parte 3)

Criando uma aplicação Kylix com PostgreSQL usando Zeos (parte 1)

Criando uma aplicação Kylix com PostgreSQL usando Zeos (parte 2)

Leitura recomendada

Integrando saídas de comandos shell com sua aplicação Kylix

Aprendendo a modelar forms no Kylix

Como fazer seu programa Kylix chamar uma aplicação externa

Criando uma aplicação que mostra os processos em execução

TCollection e Generics no Free Pascal - Uma breve visão sobre lista de objetos com o Lazarus

  
Comentários
[1] Comentário enviado por engos em 28/09/2004 - 08:45h

Muito bom o artigo.

É bom saber que o pessoal do Kylix está "vivo" no VOL.

Parabéns!

[2] Comentário enviado por AValle em 29/09/2004 - 06:40h

http://clubekylix.com.br/html/modules/news/article.php?storyid=8
Parabéns :)

[3] Comentário enviado por valmorflores em 06/10/2004 - 10:15h

Excelente artigo.

Mais uma prova de que devemos fazer por nós mesmos e continuar o desenvolvimento na linguagem ou ambiente que acreditamos, ignorando as "Tendências", que muitas vezes são manipuladas por jogadas de marketing de algumas empresas. Por enquanto estou dando um /ignore .NET e continuando no universo multi-plataforma no braço.

Valeu Fabio!


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts