fbpx

Procedure que escreve na diagonal em Delphi Procedure Diagonal(FName: String;Fsize, Pos, Land:Integer; Fcor:TColor;Texto: String); var lf : TLogFont; tf : TFont; begin with Form1.Canvas do…

Leia mais

Como executar programas externos ao Delphi? Se você precisar rodar um programa externo durante a execução do seu aplicativo em DELPHI, basta usar a seguinte linha no…

Leia mais

Como inverter os botões do mouse Para inverter os botões do mouse pelo Delphi, basta adicionar à cláusula Uses, Shellapi. inserir a função abaixo em…

Leia mais

Contador de Letras via Delphi Esta função efetua a contagem de letras de uma string fornecida como parâmetro: function WordsCount( s : string ) :…

Leia mais

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; Port : array[0..255] of char;…

Leia mais

25/107