5,386
社区成员
发帖
与我相关
我的任务
分享急求，hextobin用法，谢谢
我有一个16进制串，想用hextobin求到它的二进制串后，转换成二进制数求补码，再转换成10进制，不知有哪些函数可以操作，也不知可不可行，很急，谢谢各位。
...全文
请发表友善的回复…
发表回复
saien 2003-11-07
- 打赏
- 举报
方法可行，也不难
lxhong1980 2003-11-07
- 打赏
- 举报
求得二进制数Bin
procedure TForm1.Button1Click(Sender: TObject);
var
Len:integer;
S:PChar;
Bin : array[0..555] of char ;
begin
s:='333333';
Len:=Length(s);
hextobin(s, Bin ,Len) ;
EDIT1.Text:= Bin;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
Len:integer;
S:PChar;
Bin : array[0..555] of char ;
begin
s:='333333';
Len:=Length(s);
hextobin(s, Bin ,Len) ;
EDIT1.Text:= Bin;
end;
aiirii 2003-11-07
- 打赏
- 举报
你將這些用 integer 表示, 處理, 必要時, 再直接轉為對應進制格式, 這樣比較方便!!!
aiirii 2003-11-07
- 打赏
- 举报
謝謝!!!
http://expert.csdn.net/Expert/topic/2437/2437114.xml?temp=.984585
http://expert.csdn.net/Expert/topic/2437/2437114.xml?temp=.984585
hzsagile 2003-11-07
- 打赏
- 举报
请aiirii(ari)再领20分
hzsagile 2003-11-07
- 打赏
- 举报
二进制串如何转成二进制数呢？
windindance 2003-11-07
- 打赏
- 举报
自己编一个也不难呀？
