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 :…
Procedure que escreve na diagonal em Delphi Procedure Diagonal(FName: String;Fsize, Pos, Land:Integer; Fcor:TColor;Texto: String); var lf : TLogFont; tf :…
Reproduzindo Arquivos .wav no Delphi No Delphi, você pode tocar um arquivo de som no formato .wav utilizando a função…
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 Controlar a visibilidade do cursor do mouse pode ser útil…
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 function MaskString(Valor: String) : String; begin Result := FormatMaskText(‘!aaaaaaaaaaa;0; ‘,(FormatFloat(‘#,##0.00’,StrToFloat(valor)))); end;…
Como se movimentar e manipular tabelas no Delphi Nesta Dica do Web Mundi.com, veremos como se movimentar e manipular tabelas…
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. function FormatNumber(l: longint): string; var len, count: integer; s: string; begin str(l, s);…
No Delphi, podemos criar uma função para remover pontos (.) e vírgulas (,) de uma string numérica. Isso é útil…