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…
Remove acentos de uma string
Função que remove acentos de uma string em Delphi function RemoveAcentos(Str:String): String; Const ComAcento = ‘àâêôûãõáéíóúçüÀÂÊÔÛÃÕÁÉÍÓÚÇÜ’; SemAcento = ‘aaeouaoaeioucuAAEOUAOAEIOUCU’; Var…
Captura a tela e salva-a em um Bitmap
Função que captura a tela e salva-a em um Bitmap em Delphi function CaptureScreenRect( ARect: TRect ): TBitmap; // Exemplo…