Icone no Status Bar
03/02/2005
0
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
Posts
03/02/2005
Marcio.theis
http://forum.clubedelphi.net/viewtopic.php?t=58081
03/02/2005
Walter Faria
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
19/01/2021
Luiz Araujo
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 ?
Clique aqui para fazer login e interagir na Comunidade :)