vclskin使用中的问题!我的QQ是:190304962(10分)

工程project1.exe检测到错误类eaccessviolation,错误信息:'入口违规地址:00000000.读对于地址00000000'.进程中止!
在生成execl文件时出现!没加vclskin使用时很正常!
大家帮我想想是什么问题?下面是生成文件的代码:
var
eclapp,workbook:variant;
xlsfilename:string;
inti:integer;
begin
//if StringGrid.RowCount <=1 then
// exit;
table1.FindFirst;
if not SaveDialog1.Execute then
exit;
xlsfilename:=SaveDialog1.FileName;

try
eclapp:=createoleobject('excel.application');
workbook:=createoleobject('excel.sheet');
except
messagebox(handle,'你的计算机没装有Excel ！','提示',MB_OK+MB_ICONINFORMATION);
exit;
end;

try
workbook:=eclapp.workbooks.add;

for inti:=0 to table1.recordcount-1 do
begin
eclapp.cells(inti+1,1):=table1['类别'];
eclapp.cells(inti+1,2):=table1['名称'];
eclapp.cells(inti+1,3):=table1['单位'];
eclapp.cells(inti+1,4):=table1['数量'];
eclapp.cells(inti+1,5):=table1['经手人'];
eclapp.cells(inti+1,6):=datetostr(table1['入库日期']);
table1.findnext;
end;
workbook.saveas(xlsfilename);

// cl:=FindWindowEx(wnd,0,'XLMAIN',nil)
workbook.close;
except
eclapp.quit;
exit;
end;

xlsfilename:='你的文件保存在 '+xlsfilename;
messagebox(handle,pchar(xlsfilename),'提示',MB_OK+MB_ICONINFORMATION);

end;

具体在哪一句呢？

你好,我的QQ是:190304962,加我我给你说

是系统的问题还是机子,我换个机子就好了!

我来了，谢谢

呵呵!!