Namen einer Konstanten/Variable als String ausgeben

**smallsmoker**

Hi,
ich habe in meinem programm ein paar Konstanten definiert:

Delphi-Quellcode:

			const

  CMD_CHUNK    =  5; // Piece of Data

  CMD_STOP     =  6; // Data was send completely

  CMD_NICKNAME =  7; // new Nickname

nun möchte ich nicht den wert der konstante bspw.: CMD_CHUNK also inttostr(CMD_CHUNK) = '6' ausgeben sondern 'CMD_CHUNK'.
das könnte ich z.b so machen:

zusammenfalten · markieren

Delphi-Quellcode:

			case Konstante of

  CMD_CHUNK:

    begin

      Log.Lines.Add('CMD_CHUNK');

    end;

  CMD_STOP:

    begin

      Log.Lines.Add('CMD_STOP');

    end;

  CMD_NICKNAME:

    begin

      Log.Lines.Add('CMD_NICKNAME');

    end;

end;

(Log ist ein Tmemo)

aber ginge das nicht einfacher ?

mfg smallsmoker

Namen einer Konstanten/Variable als String ausgeben

Namen einer Konstanten/Variable als String ausgeben

Forumregeln