G
gdtkd
Unregistered / Unconfirmed
GUEST, unregistred user!
大家好，我有一個MIDI的音樂文檔，我要將它轉成一個二進制字元串，輸出到STRING類型的變數或MEMO中，請問應該怎樣寫，可否給出算法！THX
Q
QSmile
Unregistered / Unconfirmed
GUEST, unregistred user!
用 TFileStream 读就是了
与所有的 Stream 用法一样
与所有的 Stream 用法一样
G
gdtkd
Unregistered / Unconfirmed
GUEST, unregistred user!
有沒有例子！謝謝了！
T
ty123
Unregistered / Unconfirmed
GUEST, unregistred user!
给你一个例子[
]
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2302053
]http://www.delphibbs.com/delphibbs/dispq.asp?lid=2302053
G
gdtkd
Unregistered / Unconfirmed
GUEST, unregistred user!
不行啊！一個只讀出MTRH之後就什麽也沒有，另一個就出錯！
G
gdtkd
Unregistered / Unconfirmed
GUEST, unregistred user!
为什么用以上的方法只能读出一个MThd出来，这后的呢。我只想将*.mid的内容以0和1的二进制形式读出来！
Q
qince
Unregistered / Unconfirmed
GUEST, unregistred user!
我也给你一个例子
http://www.delphibbs.com/delphibbs/dispq.asp?lid=515889
http://www.delphibbs.com/delphibbs/dispq.asp?lid=515889
S
Strangre
Unregistered / Unconfirmed
GUEST, unregistred user!
用TFileStream读取，然后自编一个类似于IntToStr或IntToHex的IntToBinary函数（这个很难吗？）。
G
gdtkd
Unregistered / Unconfirmed
GUEST, unregistred user!
TO:Strangre
我对文件流真的不悉，要不是我就不用问了，请教一下吧！谢谢！
我对文件流真的不悉，要不是我就不用问了，请教一下吧！谢谢！
S
Strangre
Unregistered / Unconfirmed
GUEST, unregistred user!
我们目前经常会遇到的文件处理可分为两类（除了数据库），一类就是文本文件，这种用传统的从Turbo Pascal就有的文件处理函数都很方便；另一类就是二进制文件，下面是一个简单的例子：
hh : TFileStream;
bb : array[0..255] of Byte;
ss : String;
ss := 'abcd.bin';
hh := TFileStream.Create(ss, fmOpenRead);
hh.Seek(0, soFromBeginning);
hh.Read(bb, 256);
hh.Free;
从abcd.bin文件中读取256个字节到bb缓冲区。
hh : TFileStream;
bb : array[0..255] of Byte;
ss : String;
ss := 'abcd.bin';
hh := TFileStream.Create(ss, fmOpenRead);
hh.Seek(0, soFromBeginning);
hh.Read(bb, 256);
hh.Free;
从abcd.bin文件中读取256个字节到bb缓冲区。
G
gdtkd
Unregistered / Unconfirmed
GUEST, unregistred user!
請可否給我一個二進帛讀取MID音樂文件的算法，並輸出到字符串STR中去，如果可以的話我再加200給幫我的人！謝謝！
J
johnkan
Unregistered / Unconfirmed
GUEST, unregistred user!
算了，还是结束了！
G
gdtkd
Unregistered / Unconfirmed
GUEST, unregistred user!
THX