Função que testa se a hora é antes de Meio dia
function IsAM: Boolean;
begin
Result := Frac(Time) > 0.5
end;
Posts Similares
Mapear um drive de rede
Mapear um drive de rede Como mapear uma unidade de rede via programação Delphi Function MapeaRede(Letra,Path,provedor:Pchar):String; // Local = Letra…
Como Abrir base de dados com Senha ?
Como Abrir base de dados com Senha ? Este exemplo utiliza o objeto Dao Jet. Para outros objetos consulte o…
Como Obter a Data de Modificação de um Arquivo Usando Delphi
Como Obter a Data de Modificação de um Arquivo Usando Delphi No desenvolvimento de software, é comum precisarmos obter a…
Como Configurar o Visual Studio Code para programar em Python – Parte 1
Nesta publicação e vídeo aula do canal webmundi.com, aprenderemos a Configurar o Visual Studio Code para programar na linguagem Python, instalando extensões, módulos e efetuando configurações no VSCode.
Efetuando Discagem no VB
Para efetuar uma discagem pelo VB,basta insirir o código: Crie um MsComm no seu Form; Depois Digite: Mscomm1.CommPort = 2…
Colocar duas linhas em um botão
Colocar duas linhas em um botão Para colocar 2 linhas em um botão em Visual Basic, utilizamos o seguinte…