Aufzählungstyp in string Umwandeln

[Sir Rufo]

und wenn man ganz flexibel sein möchte (wurde von DeddyH auch schon gezeigt)

Delphi-Quellcode:

type
  TOperator = (opPlus, opMinus, opMultiply, opDivide);
const
  TOperatorStr : array[TOperator] of string = ( 'Plus', 'Minus', 'Multiply', 'Divide' );

...

procedure TForm1.Button1Click( Sender : TObject );
begin
  ShowMessage( TOperatorStr[opPlus] );
end;

[himitsu]

Zitat von Sir Rufo:

und wenn man ganz flexibel sein möchte

Das macht man heute doch über Attribute (RTTI).


GetEnumName ist natürlich schön und extrem schlank,
aber wer unbedingt will, kann natürlich auch die neue erweiterte RTTI wie TValue und Co. nutzen. (natürlich mit entsprechendem Delphi)