La forma de manejar esto es usar funciones de conversion
Código Delphi
[-]
function MesAInt(const TextMes: strnig): Integer;
function IntAMes(const IntMes: Integer): string;
Dependiendo de la version de Delphi, la
mejor forma de hacerlo es combinando un
tipo enumerado con su correspondiente
helper
Te permite implementar algo como esto:
Código Delphi
[-]
var
AMonth: TMonth;
I: Integer;
Text: string;
begin
AMonth := TMonth.Enero;
ShowMessage(AMonth.ToStr); AMonth := AMonth.Next;
I := AMonth.ToInt;
Text := 'Julio';
AMonth := TMonth.Parse(Text);
Text := TMonth.ParseInt(12).ToStr; end;