Strings und Case of

[Klaus Kirchhoff]

Ich möchte folgendes realisieren:

Ich habe eine Varable von Type String "xTier" und möchte
mit einer Case-Abfrage eine Auswertung durchführen:

case "xTier" of
Hund : ;
Pferd : ;
katze : ;
end;

Das ist doch möglich oder?

[hoika]

Nein,

du musst if's verwenden.


Heiko

[xaromz]

Hallo,

Zitat von Klaus Kirchhoff:

Das ist doch möglich oder?

Nein, das ist nicht ohne Weiteres möglich. Es gibt aber eine Funktion, die Dir den Index eines String-Arrays zurückliefert, damit kannst Du dann Dein case bauen. Leider ist mir gerade der Name entfallen.

//Edit: Name gefunden: AnsiIndexStr. Benötigt die Unit StrUtils.

Gruß
xaromz

[GimbaR]

guggst du hier

[Namenloser]

Weiß eigentlich jemand, warum das so ist?

[Klaus01]

Weil String kein Ordinaltyp ist,
hat also nicht einen eindeutigen Vorgänger oder Nachfolger.

Aber es wurde ja schon geschrieben, wie man das Problem umschiffen kann.

Grüße
Klaus

[semo]

erst gestern hatten wir ein thema dazu
guckst du hier

[hanspeter]

Zitat von NamenLozer:

Weiß eigentlich jemand, warum das so ist?

Weil Delphisyntax etwas angestaubt und in die Jahre gekommen ist.
Modernere Compiler wie z.B. Chrome können das.

Gruß Peter

[Namenloser]

Zitat von Klaus01:

Weil String kein Ordinaltyp ist,
hat also nicht einen eindeutigen Vorgänger oder Nachfolger.

Aber es wurde ja schon geschrieben, wie man das Problem umschiffen kann.

Grüße
Klaus

Aber warum funktioniert Case denn nur mit Ordinaltypen?
WIE funktioniert case eigentlich?
Ich hätte eigentlich vermutet, dass delphi ein

Delphi-Quellcode:

Case i of
0: bla;
1: blupp;
2: Quak;
end;

wie ein

Delphi-Quellcode:

if i=0 then bla
else if i=1 then blupp
else if i=2 then Quak;

interpretiert...

Edit: Hätte da nicht ein roter kasten sein müssen o.ô

[Reinhard Kern]

Zitat von NamenLozer:

Aber warum funktioniert Case denn nur mit Ordinaltypen?
WIE funktioniert case eigentlich?

Hallo,

case verwendet ja nicht nur einen einzigen Fall, sondern eine Liste davon:

Delphi-Quellcode:

case i of
  1..9 : UnterZehn := true;
  end;

daher Ordinalzahl. Eine Angabe wie "alles zwischen Edit1.Text und Edit2.Text" ist einfach undefinierbar.

Gruss Reinhard