掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
集合型を保存 (ID:16941)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
procedure TForm1.Button1Click(Sender: TObject); type Ta =( aa,bb,cc); //順序型を定義 Tas= set of ta; //集合型を定義 var a:Tas; //集合型変数 v:array[0..31] of byte absolute a; //集合型がとり得る最大値 //32Byteの配列を集合型変数と //同一アドレスに割り当て Ix:integer; //制御変数 begin for Ix:=0 to Sizeof(Tas) -1 do // V[ix] を保存する手続きを定義。V[Ix]はByte型の数値; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.