http://andy.jgknet.de/dspeedup/index.php
Muito bom este Expert para Delphi. Dá umas incrementadas bem interessante sem poluir muito o Delphi.
Eu particularmente detesto colocar tranqueiras no Delphi mas acredito que este valha a pena.
Como converter decimal para romanos em Delphi
-
function DecToRoman( Decimal: LongInt ): String;
{Converte um numero decimal em algarismos romanos}
const
Romans: Array[1..13] of String = ( 'I', 'I...