请大家帮我把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开始
[解决办法]
大概是这个样子
Edit15->Text = IntToStr((StrToInt("$" + Edit3->Text.SubString(1, 2)) & StrToInt("$1") << 4)+(StrToInt("$" + Edit3->Text.SubString(3, 2)) & StrToInt("$e0") >> 5))
[解决办法]
括弧太多了,看的眼都画了,比较下结果看对比
Caption =IntToStr( (StrToInt ("0x"+Edit3->Text.SubString(1,2)) && StrToInt("0x1") << 4) + (StrToInt("0x"+(Edit3->Text.SubString(3,2))) && StrToInt("0xe0")>>5 ) );