Promove um estado de espera no aplicativo

Compartilhe :Como se movimentar e manipular tabelas no Delphi Nesta Dica do Web Mundi.com, veremos como se movimentar e manipular tabelas no Delphi. Para manipular banco de dados via código (movimentar o ponteiro e fazer inserção, edição e exclusão de dados), use um dos seguintes comandos abaixo: Dataset.First; // Move para o primeiro registro da tabela ou…

Compartilhe :Em algumas aplicações, pode ser necessário verificar se um determinado arquivo está presente no sistema antes de prosseguir com uma ação. No Delphi, essa verificação pode ser feita facilmente usando a função FileExists da unit SysUtils. Como Funciona? A função FileExists retorna True se o arquivo existir e False caso contrário. Isso permite que…

Compartilhe :Informações do Ambiente Como obter informações do ambiente via Programação Delphi 1a. Parte: A função. function API_GetEnvironmentVariables : String; var pEnvStrings : pointer; i : integer; begin pEnvStrings := GetEnvironmentStrings; try i := 1; repeat while string(pEnvStrings)[i] #0 do begin result:=result+string(pEnvStrings)[i]; inc(i); end; result:=result+#255; inc(i) until string(pEnvStrings)[i]=#0; finally result:=result+#255; FreeEnvironmentStrings(pEnvStrings); end; end; 2a. Parte:…

Compartilhe :Porcentagem de um valor function Gerapercentual(valor:real;Percent:Real):real; begin percent := percent / 100; try valor := valor * Percent; finally result := valor; end; end;