As dicas de uso em Delphi são tão simples.
Showhint: = true;
Dica: = 'Mensagem imediata';
Não precisa escrever uma linha de código, é bastante conveniente.
Mas às vezes queremos personalizar os efeitos dos avisos para que pareçam mais bonitos e pessoais.
A implementação da função de dica da Delphi é classificada na classe de aplicativo, para que possamos ver várias propriedades sobre a dica na classe de aplicativo. , o impacto na função de dica de todo o projeto. A vantagem de fazer isso é, obviamente, que unifica o estilo de dica e faz com que outras classes ignorem a implementação da dica.
Podemos construir um projeto simples, colocar um botão, definir a exibição do botão como True e, em seguida, definir um valor para a dica. Ao executar o programa, uma janela rápida aparecerá quando o cursor apontar para o botão.
Mas se escrevermos no evento de criação da janela principal:
Procedimento TForm1.FormCreate (remetente: Tobject);
Começar
Application.showhint: = false;
fim;
Após a execução do programa, não haverá instruções.
Se você está cansado da cor da janela de sugestão que costuma ver, pode definir o hintcolor de aplicação para outra cor. Mas há um problema neste momento. Para fazer isso, temos que entender outro objeto global. A tela inclui o estado de executar o projeto na tela, possui uma propriedade HintFont que permite definir a fonte da mensagem rápida.
Podemos escrever o seguinte código:
procedimento TForm1.Button1Click (remetente: TOBJECT);
Começar
Application.hintColor: = clblack;
Screen.hintfont.color: = clwindow;
Screen.hintfont.size: = 14;
fim;
Execute o programa para ver o efeito e solicita que a fonte tenha se tornado branco e se tornou maior.
Além disso, o aplicativo tem essas três propriedades:
HinthidePause, DintPause, HintShortPause, controla o tempo exibido na janela prompt, etc. HinthidePause Especifica o tempo em que a janela prompt será exibida na tela, em milissegundos. DINTPAUSE Especifica quanto tempo leva para que a janela pronta apareça em milissegundos quando você move o cursor para o controle solicitado. HINTSHORTPAUSE significa que, quando você move rapidamente o cursor através de um conjunto de controles de dica, o intervalo de dica é exibido. Por exemplo, existem dois controles de dica.
Há um atributo especial na aplicação. De fato, um grande objetivo do atributo DINT é dar controles que não podem aparecer diretamente nas janelas de sugestão, para que possam aparecer instruídos de outras maneiras. Por exemplo, para os menus, não podemos fazer o menu aparecer na janela da dica, mas podemos fazer com que a dica do menu apareça na barra de status.
Adicionamos uma barra de status à janela principal do projeto acima, adicionamos um controle de menu, definimos vários itens de menu e definimos algumas strings para os atributos de dica recomendados para cada menu.
Então escreva:
procedimento TForm1.FormCreate (remetente: Tobject);
Começar
Application.onhint: = quandohint;
fim;
procedimento TForm1.WhenHint (remetente: TOBJECT);
Começar
StatusBar1.simpletext: = Application.hint;
fim;
Quando você executa o programa, quando você aponta para o item de menu, verá que um prompt aparece na barra de status.
Como você pode ver acima, algum código simples pode tornar os prompts exclusivos. Mas as pessoas nunca ficarão satisfeitas. Os engenheiros da Delphi pensaram nisso há muito tempo.
Vá e leia o código -fonte do HintWindow.
Embora a dica de Delphi seja simples e fácil de usar, ela não é flexível o suficiente porque fornece um estilo unificado; portanto, você não pode especificar um prompt como uma indicação de erro ou um prompt como uma indicação de aviso. Em relação a isso, precisamos usar uma API para implementá-la. Não vou falar sobre isso aqui.