---- Delphi é uma linguagem de programação orientada a objetos. Entre as muitas classes contidas em Delphi, a Tapplication é uma classe que desempenha um papel muito importante. A classe de tapplication é uma classe usada para descrever aplicativos compilados pela Delphi. Através da aplicação flexível desta classe, muitos programas distintos podem ser preparados. Vamos dar alguns exemplos a esse respeito.
---- 1 Detecte se o programa Windows atual está ativado:
---- A classe Tapplication possui uma propriedade-ativa, que pode descrever se o programa atualmente em execução é ativado e se torna o foco do Windows. O código de detecção é o seguinte:
Ifapplication.active = falsethen
ShowMessage ('A janela atual não está ativada');
---- 2 Obtenha o nome do programa atual:
---- A propriedade EXENAME da classe Tapplication pode retornar o nome completo do arquivo (incluindo o caminho) deste programa executável. O código implementado é o seguinte:
--- showMessage (Application.Exename);
---- 3 Altere o título quando o programa for minimizado
---- Se você observar com cuidado, descobrirá que os títulos de alguns programas não são consistentes com os nomes dos programas, especialmente em alguns programas em inglês , geralmente se tornou algumas cartas. O que funciona no meio é a propriedade do título da classe de tapplication. Esta propriedade determina o título quando o programa é minimizado e o título da barra de título na janela é determinado pela propriedade da legenda do formulário. O código é o seguinte:
Form1.caption: = 'título da janela';
Application.Title: = 'Título do programa';
---- De fato, também podemos especificar o valor do atributo de título da classe Tapplication ao programar. O método de operação é abaixar o menu do projeto no ambiente de desenvolvimento e selecionar o menu Opções e a caixa de diálogo, como mostrado na Figura 1 (omitido). Esse efeito também pode ser alcançado preenchendo a coluna de título desta caixa de diálogo. E como os arquivos gerais do projeto são nomeados em inglês, o título da caixa de mensagens aparece durante a operação do programa em inglês. Mas depois de especificar essa propriedade, os títulos de todas as janelas de mensagem deste programa se tornam o valor do título. Isso faz com que o programa pareça mais completo.
---- 4 Especifique a janela principal do programa
--- As interfaces nos sistemas Windows são todos o Windows, mas, de um modo geral, há uma janela principal. A propriedade Mainform da Tapplication pode retornar à janela principal do programa.
---- 5 Caixa de mensagem de exibição
---- Delphi possui muitas funções e procedimentos para exibir caixas de mensagens. Se você deseja gerar um botão com a tela chinesa, precisará de uma função de caixa de mensagem que ajude no Tapplication. O protótipo desta função é o seguinte:
---- functionMessageBox (texto, legenda: char; sinalizadores: longint): Inteiro
;
---- Nesta função, os dois primeiros itens são as informações de prompt exibidas e o título da janela da mensagem. Os usuários familiarizados com Delphi podem notar que essa função é um pouco diferente da função do mesmo nome fornecido pelo Delphi3. em ponteiros. Devemos prestar atenção à diferença ao usá -la.
---- Application.MessageBox ('Você precisa salvá-lo?', 'Mensagem imediata', MB_OKCANCEL);
----- Finalmente, é dada alguma explicação sobre o valor de retorno dessa função. é pressionado.
---- O significado do botão na Tabela 1 e o valor definido no sistema
O significado do botão o valor retornado pela função ao pressionar este botão
Idabort 3
Idcancel 2
Idignore 5
Idno 7
IDOK 1
IDRETRY 4
Idyes 6
---- 6 Controle o tamanho da janela
--- Geralmente, a alça da janela pode ser usada para ajustar o tamanho da janela, mas também pode ser usada para ajustar o tamanho da janela usando eventos de aplicativo. O método de implementação é usar os dois processos a seguir:
Application.Minimized;
Application.restore;
--- O processo anterior é usado para minimizar a janela principal do programa, e o último processo é usado para restaurar a janela minimizada em seu tamanho original.
---- 7 Link Online Ajuda Arquivo
---- A propriedade CurrentHelpFile do aplicativo pode especificar o nome do arquivo do arquivo de ajuda on-line usado pelo programa atual. Esta propriedade é frequentemente usada em conjunto com outro método. Como exemplo:
Application.HelpFile: = 'Online Ajuda Nome do arquivo';
Application.helpjump ('tema do arquivo de ajuda online')
----- Através dessa combinação de comando, podemos fazer com que o sistema exibisse um arquivo de ajuda on-line mostrando um determinado tópico.
---- 8 Crie dinamicamente o Windows quando o programa estiver em execução
---- Normalmente, as janelas são adicionadas ao projeto durante o design, mas às vezes também precisamos adicionar dinamicamente o Windows quando o programa estiver em execução.
Form3: TForm3; // Declare a classe de janela
Application.CreatEform (TForm3, Form3); // Crie janela
---- 9 termine o programa
---- Embora possamos fechar um programa fechando a janela principal, uma maneira melhor é usar o processo de encerramento de aplicação. Pode obter um desligamento mais completo do programa.
---- 10Destroy Attribute.
---- Embora a Delphi forneça essa propriedade, não é recomendável usá-la. é semelhante. Ele pode não apenas fechar a instância do programa, mas também liberar os recursos ocupados pelo programa, alcançando o objetivo de limpar completamente o programa para fora do sistema.