Enviando arquivos para a lixeira
Enviando arquivos para a Lixeira Para excluir um arquivo, enviando-o para a Lixeira (ao invés de excluí-lo definitivamente), use a rotina…
Como Verificar se uma Unidade de Disco Está Preparada no Delphi
Se você deseja verificar se uma unidade de disco (como C, D ou um pendrive) está pronta para uso no…
Função para verificar um tipo de variável
Função para verificar um tipo de variável function GetVariantType(const v: variant): string; begin case TVarData(v).vType of varEmpty: result := ‘Empty’;…
Utilizar o MessageBox com parâmetros
Utilizar o MessageBox com parâmetros var Button: Integer; Mensagem1 : Array[0..79] of Char; Mensagem2 : Array[0..79] of Char; begin StrPCopy(Mensagem1,…
Como Configurar o Acesso a um Banco de Dados Paradox em Rede
Se você deseja compartilhar um banco de dados Paradox em uma rede e permitir que múltiplos usuários acessem simultaneamente, siga…
Como Verificar se um Diretório Existe no Delphi
Se você precisa verificar se uma pasta está presente no sistema antes de executar alguma ação, o Delphi oferece uma…
Converte um valor Hexadecimal em Integer
Função que converte um valor Hexadecimal em Integer em Delphi function HexToInt(const HexStr: string): longint; var iNdx: integer; cTmp: Char;…
Obtendo o próximo dia útil caso a data informada caia em um fim de semana
Obtendo o próximo dia útil caso a data informada caia em um fim de semana Function ProximoDiaUtil (dData : TDateTime)…
Como Mudar o Papel de Parede do Windows Usando Delphi
Como Mudar o Papel de Parede do Windows Usando Delphi Alterar o papel de parede do Windows programaticamente pode ser…
Como Verificar se um Arquivo Existe no Delphi
Em algumas aplicações, pode ser necessário verificar se um determinado arquivo está presente no sistema antes de prosseguir com uma…