BorlandTalk.com

Alton Chinn · Guest

Why is that code that compiles generate errors such as:

Old format or invalid type library?

This code is compiled in Delphi 5 on a Windows2000 desktop (no
apparent Win95 issues):

procedure TfrmMain.Export_it(in_dataset: TDataset);
var rangestart, rangeend, varfilename: olevariant;
vartemplate: olevariant;
myworkbook: TExcelWorkbook;

begin
rangestart := 'A1';
rangeend := 'A1';
varfilename := 'c:temptest.xls';
MyExcel.Connect;
MyExcel.Workbooks.Add(emptyparam,1); //generates "old format" error
here
MyExcel.range[rangestart, rangeend].Value := 'Account No.';
MyExcel.ActiveWorkbook.SaveAs(varfilename,EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,1);

MyExcel.Disconnect;
end;

Alton in San Francisco