| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2023/9/11 14:35:08 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 干活中发现基础不行，请教一个问题。 我从com口接收的字符串是 #$F#$E 我怎么能转换成字符FE，谢谢 ---------------------------------------------- - |
|||||
| 作者： |
|
2023/9/11 14:48:01 | ||||
| 1楼： | 试试ReplaceStr(Source,'#$','') ---------------------------------------------- - |
|||||
| 作者： |
|
2023/9/11 14:58:09 | ||||
| 2楼： | 不行的，#$F是一个位 ---------------------------------------------- - |
|||||
| 作者： |
|
2023/9/11 15:25:27 | ||||
| 3楼： | 三个字节分一组, 每一组取最后一个字母, 合起来即可. ---------------------------------------------- delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行. |
|||||
| 作者： |
|
2023/9/12 9:29:52 | ||||
| 4楼： | #$F#$E转换为FE ReplaceStr(Source,'#$','')这个最简单呀， ---------------------------------------------- 链接：https://pan.baidu.com/s/12jzmECYKhGCsHBxz8tmB6w 提取码：pelr --来自百度网盘超级会员V9的分享 |
|||||
| 作者： |
|
2023/9/12 9:30:30 | ||||
| 5楼： | 还是你的问题没有表达清楚要问什么 ---------------------------------------------- 链接：https://pan.baidu.com/s/12jzmECYKhGCsHBxz8tmB6w 提取码：pelr --来自百度网盘超级会员V9的分享 |
|||||
| 作者： |
|
2023/9/12 10:07:54 | ||||
| 6楼： | If you need have it in a "ARRAY" procedure TForm1.Button1Click(Sender: TObject); var S : string; LArrStr: TArray<string>; // array of String begin S := '#$F#$E'; LArrStr := S.Split(['#'], TStringSplitOptions.ExcludeEmpty); // 2 items = $F, $E // for var V in LArrStr do Memo1.Lines.Add(V); // Memo1.Lines.Add('--------'); Memo1.Lines.AddStrings(LArrStr); end; ---------------------------------------------- The higher the degree, the greater the respect given to the humblest!RAD 11.3 |
|||||
| 作者： |
|
2023/9/12 11:22:40 | ||||
| 7楼： | vsrc:=#$F#$E; result:=inttohex(byte(ord(vsrc[1]) shl 4 +ord(vsrc[2]))); ---------------------------------------------- - |
|||||
| 作者： |
|
2023/9/18 0:36:06 | ||||
| 8楼： | 感谢，已经解决 ---------------------------------------------- - |
|||||
| 作者： |
|
2023/9/18 9:22:12 | ||||
| 9楼： | 问题问的莫名其妙，解决也是莫名其妙。 ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 信息 |
| 登陆以后才能回复 |
