Icone no Status Bar

Delphi

03/02/2005

OLÁ PESSOAL;

GOSTARIA QUE ALGUEM ME EXPLICA-SE COMO EU POSSO COLOCAR UM ICONE NO STATUS BAR, QUEM PUDER ME DESCREVER A SOLUÇÃO PASSO A PASSO .


ANTESIOSAMENTE
WELLINGTON.


Wfmzip

Wfmzip

Curtidas 0

Respostas

Marcio.theis

Marcio.theis

03/02/2005

De uma olhada neste link:

http://forum.clubedelphi.net/viewtopic.php?t=58081


GOSTEI 0
Walter Faria

Walter Faria

03/02/2005

1 - Coloque um Statusbar renomei como StBar em um form
2 - Um componente ImageList ( adicione a Imagem q vai aparecer na StatusBar )
3 - De um duplo clique na statusbar , ira abrir ( Editn StBar.Panels ), com direito mouse selecione a opcao ADD , Selecione o item criado e mude as propriedades ( Text = Usuario ´ex´, Style = psOwnerDraw ) e feche o editor
4 - No evento do StatusBar ( OnDrawPanel ) coloque o seguinte Codigo :
StBar.Canvas.Brush.Color:=$00FFEECC;
StBar.Canvas.FillRect(Rect);
StBar.Canvas.TextOut(Rect.Left+18,Rect.Top,Panel.Text);
ImageList1.Draw(StatusBar.Canvas,Rect.Left,Rect.top, Panel.index);
5 - rode o aplicativo


Bom tente estes passos caso na consiga me mande um email q eu te dou um exemplo ....blz

walterfoliveira@hotmail.com


GOSTEI 0
Luiz Araujo

Luiz Araujo

03/02/2005

1 - Coloque um Statusbar renomei como StBar em um form
2 - Um componente ImageList ( adicione a Imagem q vai aparecer na StatusBar )
3 - De um duplo clique na statusbar , ira abrir ( Editn StBar.Panels ), com direito mouse selecione a opcao ADD , Selecione o item criado e mude as propriedades ( Text = Usuario ´ex´, Style = psOwnerDraw ) e feche o editor
4 - No evento do StatusBar ( OnDrawPanel ) coloque o seguinte Codigo :
StBar.Canvas.Brush.Color:=$00FFEECC;
StBar.Canvas.FillRect(Rect);
StBar.Canvas.TextOut(Rect.Left+18,Rect.Top,Panel.Text);
ImageList1.Draw(StatusBar.Canvas,Rect.Left,Rect.top, Panel.index);
5 - rode o aplicativo


Bom tente estes passos caso na consiga me mande um email q eu te dou um exemplo ....blz

walterfoliveira@hotmail.com





eu fiz isso mas só aparece 1 imagem, como faço para colocar em varios panel ao mesmo tempo ?
GOSTEI 0
POSTAR