Olá!
Eu gosto muito de usar tipos enumerados e existe um risco claro de haver ambiguidades.
Para evitar isso, existe a diretiva:
{$SCOPEDENUMS ON} ou {$SCOPEDENUMS OFF}
Para mais informações veja em:
http://docwiki.embarcadero.com/RADStudio/XE4/en/Scoped_Enums_(Delphi)
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...
