typeについて教えてください。
type THoge = ( hoge1,hoge2,hoge3,hoge4);
Fuse :THoge;
などとかいて
Fuse:= hoge1; や
if Fuse = hoge2 then
などに利用しています。
そこで質問ですが、hoge1〜hoge4は文字列でも数値でもないため、扱いが難しいです。
実は
if Fuse=hoge3 then
Fuse:= hoge3 -1; ※1
見たいなhoge3の一個前の状態に戻すようなことをしたいと考えています。
※1の所でFuse:=hoge2としてしまえばよいという話ですが、色々な意味で使用したいのであくまでも「hoge3 -1」というやり方でやりたいです。
何か良い方法教えてください。
よろしくお願いします。
typeと言ってしまうと表す幅が広いので……そういうのは順序型の一種で「列挙型」と言います。
順序型で一つ前や後ろの値を取り出すのはPredとSuccですね。（状況によってはIncやDecも使えますが）
if Fuse = hoge3 then Fuse = Pred(hoge3);
または
if Fuse = hoge3 then Dec(Fuse);
列挙型ですね…。
Predというのを使えばよいのですね。
わかりましたtttさんありがとうございます。