statusbar
Boa tarde pessoal,
estou estudando um programa que peguei aqui mesmo no forum, na qual ele tem um formulário principal, que tem um statusbar..
todos os outros formulários são chamados centralizados em showmodal neste formulário..
Qdo passo o mouse por um botão incluir por exemplo do formulário cadastro clientes, ele me dá no status bar do formulário principal o Hint associado a ele.. só que não sei como fazer isso..
vcs sabem como fazer isto?
obrigado
JM
estou estudando um programa que peguei aqui mesmo no forum, na qual ele tem um formulário principal, que tem um statusbar..
todos os outros formulários são chamados centralizados em showmodal neste formulário..
Qdo passo o mouse por um botão incluir por exemplo do formulário cadastro clientes, ele me dá no status bar do formulário principal o Hint associado a ele.. só que não sei como fazer isso..
vcs sabem como fazer isto?
obrigado
JM
Jm
Curtidas 0
Respostas
_alex_
04/09/2003
No form create coloque assim:
application.OnHint:=MeuHint;
depois faça a procedure meuhint como diz abaixo:
procedure TForm1.MeuHint(Sender: TObject);
Begin
statusbar1.Simpletext:=Application.Hint;
end;
application.OnHint:=MeuHint;
depois faça a procedure meuhint como diz abaixo:
procedure TForm1.MeuHint(Sender: TObject);
Begin
statusbar1.Simpletext:=Application.Hint;
end;
GOSTEI 0
Fred
04/09/2003
Coloque no form principal um componente chamado applicationEvents e em seu evento onHint coloque: StatusBar1.panels[0].text := application.Hint; 8)
GOSTEI 0