文件打开问题(100分)

  • 主题发起人 主题发起人 xiaotao
  • 开始时间 开始时间
X

xiaotao

Unregistered / Unconfirmed
GUEST, unregistred user!
请问如何将不同的文件类型以二进制方式打开,如文本,图像,WORD等以二进制类型方式打开
 
TMemoryStream.LoadFromFile(Const FileName : String)
 
啊,为了拿分再举个例子!(拿TXT举例)
Var
ss : TMemoryStream;
//////////////////////
begin
ss := TMemoryStream.Create;
ss.LoadFromFile('d:/bb.txt');
RichEdit1.Lines.LoadFromStream(ss);
ss.free;
end;
行不?
 
用TStream吧,它可以以二进制方式打开和保存不同的文件
TStream.LoadFromFile(Const FileName : String)
TStream.SaveToFile(Const FileName : String)

 
Sando,好象不怎么行啊,能不能给个例子,分数全部奉上
 
txt的很容易,能不能给个图像的,还要打开后还能保存为原来的图像文件哦
 
>>xiaotao
老哥,不可能啊,行的呀!
我的贴子是试过了再贴上来的呀!是我的例子出什么错了?
给出错信息好吗?
顺便问一下,你要完成什么功能呀!
 
SanDao
var
ams:tmemorystream;
begin
ams:=tmemorystream.Create ;
if OpenDialog1.Execute then
ams.LoadFromFile(OpenDialog1.FileName);
//image1.Picture.Bitmap.LoadFromStream(ams);
memo1.Lines.LoadFromStream(ams);
end;
但是MEMO1显示的只有 '邢唷?' (我打开的是WORD文件);
 
一样的呀!
Var
ss : TMemoryStream;
//--------------------
begin
ss := TMemoryStream.Create;
ss.LoadFromFile('d:/0004.BMP');
Image1.Picture.Bitmap.LoadFromStream(ss);
ss.Free;
end;
 
后退
顶部