Delphi-Grundkurs Funktionen und Prozeduren

Routinen zum Rechnen - Ordinalwerte

Beispiele für die Behandlung von aufzählbaren Typen

Der Typ der Laufvariablen z. B. einer FOR-Schleife kann außer Integer auch Char sein. Ebenso können an anderen Stellen noch weitere Aufzählungstypen wie z. B. Wochentage oder Monatsnamen benutzt werden. Für all diese Ordinalwerte gibt es bei Object-Pascal vielfältige Funktionen.

Funktion	Bedeutung
`DEC`	Vermindert eine Variable um einen bestimmten Wert
`INC`	Erhöht eine Variable um einen bestimmten Wert
`ODD`	Prüft, ob das Argument eine ungerade Zahl ist
`PRED`	Liefert den Vorgänger des Arguments
`SUCC`	Liefert den Nachfolger des Arguments
`CHR`	Wandelt eine Ordinalzahl in das dazugehöhrige Zeichen um
`HIGH`	Ergibt den höchsten Wert im Bereich des Arguments
`LOW`	Ergibt den niedrigsten Wert im Bereich des Arguments
`ORD`	Wandelt einen ordinalen Typ in die dazugehörige Ordinalzahl um

Beispiel	Ergebnis
`x := 'c'; DEC(x)`	x ist 'b'
`x := 'A'; INC(x)`	x ist 'B'
`x := 10; DEC(x,4)`	x ist 6
`x := 'A'; INC(x,3)`	x ist 'D'
`ODD(x)`	`x := StrToInt(Edit1.Text); if ODD(x) then Label1.Caption := 'ungerade!' else Label1.Caption := 'gerade!'; end;`
`PRED('C')`	'B'
`SUCC(5)`	6
`CHR(65)`	'A'
`ORD('A')`	65