Einzelnen Beitrag anzeigen

ArrayOf..

Registriert seit: 7. Sep 2003
50 Beiträge
 
Delphi 7 Personal
 
#2

Re: Aufzählungstyp in Typ String umwandeln

  Alt 16. Okt 2003, 15:28
Ich glaube das geht überhaupt nur, indem du den Wert jeweils mit allen Möglichkeiten abfragst - ihn so eindeutig identifizierst und dann also auch den String entsprechend beladen kannst. Am Besten eignet dazu eine Case-Of -Anweisung:

Delphi-Quellcode:
case Heute of

Montag : Wochentag := 'Montag';
Dienstag : Wochentag := 'Dienstag';
.
.

end; { of case }

[edit]

genau, so geht's übrigens auch noch:

Delphi-Quellcode:
const TageStr : array[0..2] of string = ('Montag','Dienstag','Mittwoch');
.
.
type
  Tage = (Montag, Dienstag, Mittwoch);

var
  Form1: TForm1;
  Wochentag : Tage;
.
.
procedure TForm1.Button1Click(Sender: TObject);
begin
  Wochentag := Montag;
  button1.Caption := TageStr[ord(Wochentag)];
end;
[edit=Daniel B]Delphi-Tags korrigiert. Mfg, Daniel B[/edit]
MfG

  Mit Zitat antworten Zitat