如何将DELPHI 的STRING 类型 与CHAR 类型转换
1个回答
展开全部
可以这样啊：
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；
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
