B bbcock Unregistered / Unconfirmed GUEST, unregistred user! 2005-10-14 #1 文件中有4个字节分别为01,df,5e,76,不知道如何才能把这4个字节转换成3.14159*e+7,哪位知道该怎么读取这样的数?
B bbcock Unregistered / Unconfirmed GUEST, unregistred user! 2005-10-14 #2 文件中有4个字节分别为01,df,5e,76,不知道如何才能把这4个字节转换成3.14159*e+7,哪位知道该怎么读取这样的数?
A ahhlian Unregistered / Unconfirmed GUEST, unregistred user! 2005-10-14 #3 procedure TForm1.Button7Click(Sender: TObject); var tmp:longword ; begin tmp:= $01df5e76 ; //edit1.Text:= inttostr(tmp) ; edit1.Text:=formatfloat('0.00000*E+00',tmp); end;
procedure TForm1.Button7Click(Sender: TObject); var tmp:longword ; begin tmp:= $01df5e76 ; //edit1.Text:= inttostr(tmp) ; edit1.Text:=formatfloat('0.00000*E+00',tmp); end;
D delphilxh Unregistered / Unconfirmed GUEST, unregistred user! 2005-10-14 #4 Var v:Single; Begin Fileread(FileHandle,v,4);//文件打开和定位的代码你自己加 End;