Fórum StatusBar #215936

21/02/2004

0

Delphi

Como que eu faço para mudar a cor da fonte do StatusBar?
É possivel mudar de um único panel?
Agradeço a quem puder ajudar-me.


Jose

Jose

Responder

Posts

21/02/2004

Jasig Aurumalfa

Pode-se fazer isso usando o editor visual:
Basta clicar no seu StatusBar...
E procurar naquela tabelinha: Font...
Se você quizer eu posto uma resposta com as imagens mostrando como fazer...
Espero ter ajudado...


Responder

Gostei + 0

21/02/2004

Jose

Ja fiz isso e não mudou nada. Motivo pelo qual estou precisando de ajuda
Obrigado mesmo assim.


Responder

Gostei + 0

21/02/2004

Fórum Vini

Olá,
mude a propriedade Style para psOwnerDraw de todos os panels da sua StatusBar.
Coloque esse código no evento OnDrawPanel da StatusBar:
procedure TForm1.StatusBar1DrawPanel(StatusBar: TStatusBar;
  Panel: TStatusPanel; const Rect: TRect);
begin
  case Panel.Index of
    0: StatusBar.Canvas.Font.Name:= ´Comic Sans MS´;
    1: StatusBar.Canvas.Font.Name:= ´Arial´;
    //Siga esse modelo:
    //Indice_do_panel: StatusBar.Canvas.Font.Name:= ´Nome da fonte´;
  end;
  //Pode trocar o +1 pelo tamanho da margem que você quiser
  StatusBar.Canvas.TextOut(Rect.Left+1, Rect.Top,  Panel.Text);
end;


Espero ter ajudado.
Vinicius.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar