Case Probleme

[MrDevil]

Habe Delphi 5



Habe folgenden Code:

Delphi-Quellcode:

                  case Edit1.Text of
                    'Hallo', 'Hello':
                      ShowMessage('Hallo');
                    'Exit':
                      Close;
                  else
                    ShowMessage('Unknown command: ' + edtCommand.Text);
                  end;

Aber erhalte dann immer die Meldugn
[Fehler] dab_pas.pas(162): Ordinaltyp erforderlich

betrift die Zeile
case Edit1.Text of


Hmmm warum geht das nicht?

[Tormentor32]

Die Caseanweisung funktioniert nur mit Datentypen, die eine feste Größe haben wie zum Beispiel integer oder char.

edit: kleiner Tippfehler

[Phoenix]

Weil Case nur mit Ordinalytpen (Ganzzahlen) geht.
Strings in Case gehen nur mit Tricks, aber da gibts hier nen Thread dazu.

[MrDevil]

aha :-( hmm ok - das heisst muss ich wohl nach etwas suchen hier im Forum - nach was suche ich den da am besten?

[Klaus01]

Vielleicht in der Codelib nach diesen Beitrag
oder bei den Schweizern ist dieses zu finden.

Grüße
Klaus

[Christian Seehase]

Moin Zusammen,

ggf. kommen da auch jbg's Language-Extensions in Frage

[EDIT]
Ausserdem kann man sich in so einem Falle auch noch mit AnsiIndexText / AnsiIndexStr behelfen.
[/EDIT]