名前
題名
▼ Mr.XRAYさん > [ UDPで数値データを送りたいのですが ] > http://madia.world.coocan.jp/cgi-bin/DelphiBBS/wwwlng.cgi?print+201809/18090003.txt > > > aryStr : string absolute aryByte; > > こういうのであれば可能ですね． > > procedure TForm1.Button2Click(Sender: TObject); > const > ArySize = 26; > var > aryByte : array [0..ArySize - 1] of byte; > aryStr : array [0..ArySize - 1] of AnsiChar absolute aryByte; > LIndex : Integer; > begin > //バイト配列にASCII文字バイト値を代入 > //A-Zの文字 > for LIndex := Low(aryByte) to High(aryByte) do begin > aryByte[LIndex] := $41 + Byte(LIndex); > end; > > //absoluteなのでChar配列にバイトデータの文字が入っている > Memo1.Lines.Add(string(aryStr)); > end; > > [参考] > 変数（Delphi）- 絶対アドレス - RAD Studio > http://docwiki.embarcadero.com/RADStudio/Berlin/ja/%E5%A4%89%E6%95%B0%EF%BC%88Delphi%EF%BC%89#.E7.B5.B6.E5.AF.BE.E3.82.A2.E3.83.89.E3.83.AC.E3.82.B9 >
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link