掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
変数a の値によって、型を変えるには? (ID:9950)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ふたスジ : 「オレ、免許とったで〜」 ひとスジ : 「いまごろ若葉マークか〜?」 ふたスジ : 「フン、おまえのは三輪車免許やないか」 ひとスジ : 「フン、おまえの自転車免許も補助輪付き限定やん。いっしょや」 var aryBYTE : array[0..15] of Byte = (0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15); aryWORD : array[0.. 7] of Word absolute aryBYTE; aryDWORD: array[0.. 3] of DWord absolute aryBYTE; procedure TForm1.Button1Click(Sender: TObject); var a : Integer; begin for a:=1 to 4 do begin case a of 1: Memo1.Lines.Add(IntToHex(aryBYTE [1], 2)); 2: Memo1.Lines.Add(IntToHex(aryWORD [1], 4)); 4: Memo1.Lines.Add(IntToHex(aryDWORD[1], 8)); end; end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.