Promove um estado de espera no aplicativo
Promove um estado de espera no aplicativo procedure Delay(iMSecs: Integer); var lnTickCount: LongInt; begin lnTickCount := GetTickCount; repeat Application.ProcessMessages; until…
Como Tocar um Arquivo de Som .wav no Delphi
Reproduzindo Arquivos .wav no Delphi No Delphi, você pode tocar um arquivo de som no formato .wav utilizando a função…
Como Enviar E-mail no Delphi com o Componente NMSMTP
Aqui está uma versão otimizada da sua publicação, com mais clareza, organização e SEO aprimorado: Como Enviar E-mail no Delphi…
Número de cópias para a impressão
Número de cópias para a impressão Procedure AjustaPapel(Copias:Integer); var Device : array[0..255] of char; Driver : array[0..255] of char;…
Função para impressão de linhas em um relatório
Função para impressão de linhas em um relatório procedure TPrintx_Form1.Say(Nlin,Ncol: Integer;Var LinhaAtual: Integer; Var Arquivo: Text;Texto: Variant); var X: Integer;…
Chama arquivos BMP de uma Dll
//coloque as imagens em um arquivo Res e compile a biblioteca com a diretiva {$R icones.res} //para chamar as imagens…
Como se movimentar e manipular tabelas no Delphi
Como se movimentar e manipular tabelas no Delphi Nesta Dica do Web Mundi.com, veremos como se movimentar e manipular tabelas…
Reparar e compactar um banco de dados Access com Delphi
Reparar e compactar um banco de dados Access com Delphi Quem já trabalhou com o Ms Access, alguma vez já…
Verifica a existência de uma placa de som
Verifica a existência de uma placa de som Como verificar a existência de uma placa de som via programação Delphi…
Filtra todos os números de uma string
Filtra todos os números de uma string em Delphi Function SoNumero(Texto : String) : String; var Ind : Integer; TmpRet…