Use o componente ApplicationEvents. procedure TForm1.ApplicationEvents1Hint(Sender: TObject); begin StatusBar1.Panels[0].text := Application.Hint; end;
[As partes desta mensagem que não continham texto foram removidas]
Use o componente ApplicationEvents. procedure TForm1.ApplicationEvents1Hint(Sender: TObject); begin StatusBar1.Panels[0].text := Application.Hint; end;
[As partes desta mensagem que não continham texto foram removidas]