请大家帮我把delphi的运算转换成BCB,

风子啊啊 2012-09-17 02:54:35
edit15.Text:=inttostr( (strtoint('$'+copy(edit3.Text,1,2))and strtoint('$1')shl 4)
+ (strtoint('$'+copy(edit3.Text,3,2))and strtoint('$e0')shr 5))

另问,DelPhi字符串索引是从0开始还是1开始
...全文
86 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
风子啊啊 2012-09-25
  • 打赏
  • 举报
回复
忘结贴了。。。谢谢两位大湿
缘中人 2012-09-17
  • 打赏
  • 举报
回复
哦,这里&& 应该是& 与位运算
缘中人 2012-09-17
  • 打赏
  • 举报
回复
括弧太多了,看的眼都画了,比较下结果看对比

Caption =IntToStr(
(StrToInt ("0x"+Edit3->Text.SubString(1,2)) && StrToInt("0x1") << 4) +
(StrToInt("0x"+(Edit3->Text.SubString(3,2))) && StrToInt("0xe0")>>5 )
);
风子啊啊 2012-09-17
  • 打赏
  • 举报
回复
谢谢,,妖哥。。。我先试试
ccrun.com 2012-09-17
  • 打赏
  • 举报
回复
大概是这个样子
Edit15->Text = IntToStr(
(StrToInt("$" + Edit3->Text.SubString(1, 2)) & StrToInt("$1") << 4)
+
(StrToInt("$" + Edit3->Text.SubString(3, 2)) & StrToInt("$e0") >> 5)
)

13,825

社区成员

发帖
与我相关
我的任务
社区描述
C++ Builder相关内容讨论区
社区管理员
  • 基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧