Compara dois valores e retorna o maior
Função que compara dois valores e retorna o maior em Delphi function Max(A, B: Integer): Integer; begin if A >…
Obtendo a velocidade do processador
function CPUSpeed: Double; const DelayTime = 500; // divide o tempo em ms var TimerHi, TimerLo: DWORD; PriorityClass, Priority: Integer;…
Como saber se o aplicativo já foi aberto no Delphi
Como saber se o aplicativo já foi aberto Para saber se o aplicativo já foi aberto no Delphi, Insira o código abaixo…
Movendo um Form sem barra de título
Movendo um Form sem barra de título Forms que não possuem barra de título (as que têm a propriedade BorderStyle setada…
Como Abreviar Nomes no Delphi
Esta função permite abreviar nomes próprios, mantendo o primeiro e o último nome completos e abreviando os intermediários. Código otimizado…
Imprime um campo memo
procedure PrintMemo; var i,col,lin:integer; begin col:=0; // posição da coluna lin:=0; // posição da linha printer.begindoc; for i := 0…
Obter o username logado no Windows
Como obter o username logado no Windows em Delphi Esta função permite que através da rotina GetUserName da API…
Como Traduzir a Mensagem “Delete Record” no Delphi
💡 Problema: Mensagem Padrão ao Excluir um Registro Ao clicar no botão de exclusão (-) do DBNavigator no Delphi, surge…
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 Alterar a Data do Sistema no Delphi
Se você precisa modificar a data e hora do sistema dentro de um programa Delphi, é possível fazer isso utilizando…