首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > C++ Builder >

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

2012-10-21 
请大家帮我把delphi的运算转换成BCB,edit15.Text:inttostr((strtoint($+copy(edit3.Text,1,2))and strt

请大家帮我把delphi的运算转换成BCB,
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开始

[解决办法]
大概是这个样子

C/C++ code
Edit15->Text = IntToStr((StrToInt("$" + Edit3->Text.SubString(1, 2)) & StrToInt("$1") << 4)+(StrToInt("$" + Edit3->Text.SubString(3, 2)) & StrToInt("$e0") >> 5))
[解决办法]
括弧太多了,看的眼都画了,比较下结果看对比
C/C++ code
Caption =IntToStr(             (StrToInt ("0x"+Edit3->Text.SubString(1,2)) && StrToInt("0x1") << 4)  +             (StrToInt("0x"+(Edit3->Text.SubString(3,2))) && StrToInt("0xe0")>>5 )             ); 

热点排行