文件名称：UDP十六进制数据传输
文件大小：261KB
文件格式：ZIP
更新时间：2020-11-30 07:24:37
UDP十六进制
if chkHexReceive.Checked then begin strLength := length(ss); for i := 1 to strlength do begin byteTemp := byte((ss[i])); hexOffset := (inttohex(byteTemp, 2)); //肮奻珨曆硒俴眈肮腔髡夔˙ strTemp := strTemp + hexOffset + ' '; end; intcount := length(strtemp); hexint := 0; while intcount <> 0 do begin strFirst := leftstr(strtemp, 48); strtemp := rightstr(strtemp, intcount - 48); intcount := length(strtemp); hexOffset := inttohex(hexint, 4); mmRcv.Lines.Add('0x' + hexOffset + ': ' + trim(strFirst)); hexint := hexint + 16; end; end
【文件预览】：
Project1.dof
Unit1.dcu
Project1.exe
Unit2.~pas
Unit1.dfm
Project1.cfg
Project1.dpr
Unit1.~dfm
Unit1.pas
Project1.res
Unit2.pas
Unit2.dcu
Unit1.ddp
Project1.~dpr
Unit1.~pas
Unit1.~ddp