Verificando a conexão de Internet via Delphi
Verificando a conexão de Internet via Delphi Para verificar a conexão de Internet via Delphi, siga os seguintes procedimentos: Inclua um…
Como Ocultar e Mostrar o Cursor do Mouse em Delphi
Como Ocultar e Mostrar o Cursor do Mouse em Delphi Controlar a visibilidade do cursor do mouse pode ser útil…
Converte String em Pchar
Função que converte String em Pchar em Delphi function StrToPChar(const Str: string): PChar; type TRingIndex = 0..7; var Ring: array[TRingIndex]…
Escreve na diagonal
Procedure que escreve na diagonal em Delphi Procedure Diagonal(FName: String;Fsize, Pos, Land:Integer; Fcor:TColor;Texto: String); var lf : TLogFont; tf :…
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…
5 Dicas de Delphi
5 Dicas de Delphi Neste post mostraremos 5 dicas de desenvolvimento na linguagem de programação Delphi. Verificando se uma data…
Formata valor numérico inserindo mascaras de ponto.
Formata valor numérico inserindo mascaras de ponto. function FormatNumber(l: longint): string; var len, count: integer; s: string; begin str(l, s);…
Converte uma String em Real
Converte uma String em Real Function StrToReal(InStr: String): Real; var Code : Integer; Temp : Real; begin Result := 0;…
Coloca uma máscara numérica em uma String com números
Coloca uma máscara numérica em uma String com números function MaskString(Valor: String) : String; begin Result := FormatMaskText(‘!aaaaaaaaaaa;0; ‘,(FormatFloat(‘#,##0.00’,StrToFloat(valor)))); end;…
Cópia de arquivos no Delphi
Cópia de arquivos no Delphi Para copiar arquivos no Delphi via código utilize: CopyFile (ArquivoDeOrigem, ArquivoDeDestino); Copie o arquivo FMXUtils.Pas…