Registriert seit: 20. Mai 2003
63 Beiträge
Delphi 7 Professional
|
Delphi 7 und MS Excel
23. Aug 2005, 16:06
Ich habe ein problem und zwar bekomme ich einen fehler wenn ich mein excel sheet aufmachen will was ist da falsch bzw wie mach ich es richtiger ???
Delphi-Quellcode:
if OpenDialog.Execute then
begin
fileName:= OpenDialog.Filename;
ExcelApplication.Connect;
if fileName > '' then
begin
ExcelApplication.Workbooks.Open(fileName,EmptyParam, EmptyParam,
EmptyParam, EmptyParam, EmptyParam,
EmptyParam, EmptyParam, EmptyParam,
EmptyParam, EmptyParam, EmptyParam,
EmptyParam, EmptyParam, EmptyParam,0);
ExcelWorkbook.ConnectTo(ExcelApplication.Workbooks.Open(fileName, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, 0));
end
else
ExcelApplication.Workbooks.Add(fileName,0);
ExcelWorksheet.Disconnect;
end;
Edit*** FehlerCode: OLE-Fehler 8000A03EC ***Edit Ende
mfg im voraus !ColdFire
[edit=alcaeus]Kraftausdruck im Titel entfernt. Mfg, alcaeus[/edit]
thx
|
|
Zitat
|