如何使用TFileStream 处理可执行文件……(55分)

香

香烟+可乐

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #1

如何使用TFileStream ， 把磁盘可执行文件读入内存（传输到网上）。

为什么: s:=Tfilestream.create(thefilename,0);(只读).

总是返回：“EFOpenError”，不能打开。

那位有关于TFilestream 的代码例子，谢谢！

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #2

来一个简单的例子：

var
MS: TFileStream;
begin
if OpenDialog1.Execute then
begin
MS:=TFileStream.Create(OpenDialog1.FileName, fmOpenRead);
Image1.Picture.Bitmap.LoadFromStream(MS);
MS.Free;
end;
end;

 

香

香烟+可乐

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #3

没错我的代码，就是这个样子的，但是“ MS:=TFileStream.Create(FileName, fmOpenRead);
”，出错！(我的FILENAME是传过来的参数）.
我打开的是*.exe(Must!).

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #4

不可能啊！

我随手写了一个
s:=Tfilestream.create('f:/jcad_yinhua/yinhua.exe',0);

 

D

dadabox

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #5

是不是當前你正在用﹐你搜一下以前的答案﹐有這方面的解釋﹐我忘了。

 

Z

zhoujg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #6

我想可能是你正在用这个应用程序吧

 

香

香烟+可乐

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #7

我是要把filestream 直接做为流通过Tclientsocket传输,但是filestream.create
总是捣乱。我想我的DELPHI编译器我病了，否则，不会如此的。
雪兄还有什么好想法？

 

香

香烟+可乐

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #8

to :zhoujg
to :dadabox
文件没有被使用!
Tfilestream.create ()是不是有什么限制.
注： 我写的东东都是面向对象的，能在窗体上直接创建，必须封装到一个独立功能类中。

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #9

同意楼上几位朋友的看法，你可能是正在运行你的EXE；
先关掉，然后试试，否则会引起异常的！

 

C

ChinaYA

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-09

• #10

"我是要把filestream 直接做为流通过Tclientsocket传输,但是filestream.create
总是捣乱。我想我的DELPHI编译器我病了，否则，不会如此的。
雪兄还有什么好想法？"
问题很简单：filestream.create是 错误 的 应为：Tfilestream.create
明白吗？D：）！
对象是不能：create 的！

 

香

香烟+可乐

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-09

• #11

接受答案了.

 

D

dcsdcs

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-09

• #12

你用fileexist检查过文件么？