怎么样把收到的数据以2进制的形式存到文件当中？(100分)

D

daileking

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-28

• #1

procedure TForm1.Comm1ReceiveData(Sender: TObject; Buffer: Pointer;
BufferLength: Word);
我有个串口接受程序，要把收到的数据存到文件中。（全是二进制）
我用
fstream1:=TFileStream.Create('c:/mc.txt',fmCreate);
fstream1.Seek(0,soFromEnd);
fstream1.WriteBuffer(PByte(Buffer),BufferLength);
我打开保存下来的文件，全是乱码！Why？？？

 

B

bubble

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-28

• #2

你试试看用UltraEdit打开

 

D

daileking

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-28

• #3

不行，我接收到的内容，不是我发送的内容。
我用其他的串口接收程序接收的内容是对的，

 

A

armyjiang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-28

• #4

发送和接收的串口设置相同吗？

 

D

daileking

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-28

• #5

设置是相同的，我用一个RichEdit显示出来的结果是正确的。
但是，我想把Buffer中的内容存到文件当中。

 

A

armyjiang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-28

• #6

>>不行，我接收到的内容，不是我发送的内容。
这是你的回答？
>>设置是相同的，我用一个RichEdit显示出来的结果是正确的。
这也是你的回答？

RichEdit中显示的内容都是正确的，你保存到文件中还有问题？

 

轻

轻松虎

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-28

• #7

fstream1:=TFileStream.Create('c:/mc.rtf',fmCreate);
fstream1.Seek(0,soFromEnd);
fstream1.WriteBuffer(PByte(Buffer),BufferLength);