上面的没有写全就发了,不好意思,
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.