5 Dicas de Desenvolvimento em Delphi
Nesta publicação apresentaremos 5 Dicas e truques de Desenvolvimento na Linguagem de Programação Delphi
Criação de índices em tempo de execução
Pergunta: Tenho um programa que se utiliza de alguns arquivos que preciso efetuar a criação de índices em tempo de execução….
Compactando tabelas Paradox no Delphi
Compactando tabelas Paradox no Delphi procedure ParadoxPack(Table : TTable); var TBDesc : CRTblDesc; hDb: hDbiDb; TablePath: array[0..dbiMaxPathLen] of char; begin…
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…
Remove os zeros a frente de um valor
Função que remove os zeros a frente de um valor em Delphi function RemoveZeros(S: string): string; var I, J :…
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 habilitar e desabilitar as teclas ctrl+alt+del ?
Como habilitar e desabilitar as teclas ctrl+alt+del ? // desabilita procedure TForm1.Button1Click(Sender: TObject); var numero: integer; begin SystemParametersInfo(97,Word(true),@numero,0); end; //…
Número de cores aceitas pelo monitor
Número de cores aceitas pelo monitor O código abaixo apresenta a implementação de uma função que retorna o número de…
Informações do Ambiente
Informações do Ambiente Como obter informações do ambiente via Programação Delphi 1a. Parte: A função. function API_GetEnvironmentVariables : String; var…
Altera a data e a hora de um arquivo especificado
Função que altera a data e a hora de um arquivo especificado em Delphi function AlterFileTime(const filename: String; const…