[StatusBar]Por que a fonte não muda?

Delphi

09/10/2007

Eu tenho uma StatusBar aonde eu mostro os Hints dos botões e campos do meu sistema.

Acontece que eu tentei mudar a propriedade Font para Bold, pra mostrar os hints em negrito e nada aconteceu... tentei mudar o estilo da fonte, tamanho e nada.

Alguém sabe como eu faço pra que essas alterações ocorram na minha StatusBar ?

PS.: to usando Delphi 7


Marcos.gandin

Marcos.gandin

Curtidas 0

Respostas

Marco Salles

Marco Salles

09/10/2007

Programe o evento OnDrawPanel do StatusBar

P:s Não esquecer de Trocar a Propriedade Style do Painel para
psOwnerDraw

procedure TForm1.FormCreate(Sender: TObject);
begin
StatusBar1.Panels[0].Style:=psOwnerDraw;
end;



GOSTEI 0
Marcos.gandin

Marcos.gandin

09/10/2007

Valeu Marco, funcionou da maneira como você colocou, mas depois eu descobri que também era possivel trocar a fonte e fazer aparecer os resultados somente trocando a propriedade UseSystemFont para False.

Mesmo assim agradeço pela ajuda.

Flw.


GOSTEI 0
POSTAR