哪位能讲一讲F1book用简单用法,帮助都是formula one 的,讲的一点也不清楚我只需要1。从一个流或一个excel文件把它的内容读到f1book中 2。让f1book只能看,不能写,只读功能现在就这两点功能就够了,其它来不及看了,先把项目做完,以后再说吧,急死啦
procedure TForm1.Button8Click(Sender: TObject); var filetype: smallint; begin f1book1.Read('C:\sunbrige\demo\6.xls', filetype); end;
上面的没有写全就发了,不好意思, procedure TForm1.Button8Click(Sender: TObject); var filetype: smallint; begin f1book1.Read('C:\sunbrige\demo\6.xls', filetype); end; 这段代码不正确吗,运行时出现错误框: project1.exe raised exception class EOleException with message 'Unable to open file'.Process stopped. Use step or Run to continue.
或许对你有帮助
=========
声明
不是作广告!
不过那本书很零散
不过楼住那么多的条件不会
文件保存在数据库中,但根据权限有的人可以看这个文件但不能保存到本地硬盘上,所以如果调用word或excel把它打开,这个人就可以把这个文件的保存下来了,只可看,不可存的谁有办法呀,我看过有人用vc作过这样的东西,不知道他是怎么搞的
2。让f1book只能看,不能写,只读功能现在就这两点功能就够了,其它来不及看了,先把项目做完,以后再说吧,急死啦
var
filetype: smallint;
begin f1book1.Read('C:\sunbrige\demo\6.xls', filetype);
end;
procedure TForm1.Button8Click(Sender: TObject);
var
filetype: smallint;
begin f1book1.Read('C:\sunbrige\demo\6.xls', filetype);
end;
这段代码不正确吗,运行时出现错误框:
project1.exe raised exception class EOleException with message 'Unable to open file'.Process stopped. Use step or Run to continue.
f1book1.read(ExtractFileDir(paramstr(0))+'\f1book1.xls',F1FileExcel5);但是提示说不能找开文件,,
不知道为什么,
但我去了也下不了,
我现在是用delphi7自己带的才3.01版本的