如何将DELPHI 的STRING 类型 与CHAR 类型转换
推荐于2016-04-21 · 知道合伙人数码行家
huanglenzhi
知道合伙人数码行家
采纳数：117538
获赞数：517165
长期从事计算机组装，维护，网络组建及管理。对计算机硬件、操作系统安装、典型网络设备具有详细认知。
向TA提问 私信TA
关注
![]()
展开全部
可以这样啊：
A：CHAR；
S：STRING；
I，J，SUM：INTEGER；
FOR J：=1 TO LENGTH（S）DO BEGIN
{A：=？（COPY（S，I，1）；} //去掉这一句
A:=Ord(S[j]);
I：=ORD（A）；
SUM：=SUM+I；
END；
A：CHAR；
S：STRING；
I，J，SUM：INTEGER；
FOR J：=1 TO LENGTH（S）DO BEGIN
{A：=？（COPY（S，I，1）；} //去掉这一句
A:=Ord(S[j]);
I：=ORD（A）；
SUM：=SUM+I；
END；
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
