Delphi 二进制转换为十进制.rar

Delphi7.0如何将二进制转换为十进制呢?相信这个实例源码包会帮你大忙,用户输入任意二进制数,单击转换按钮,会立即显示出十进制数据. 　　functionTForm1.BintoOct(L:string):integer; 　　var 　　i,j,t:integer; 　　C:char; 　　begin 　　t:=1; 　　j:=length(L);//提取最后一位 　　j:=0(ord(L[j])-ord('0'))*t; 　　fori:=length(L)-1downto1do//倒循环 　　beg