BorlandTalk.com

Peter Tickler · Guest

My requirement is to open Excel files from my Delphi 6 application. I have
imported the Excel2000 type library, placed a TExcelApplication object on my
form, and used the following code to open the selected file:

procedure TfmExcel.Open(excelFilename: Olevariant);

var

LCID : Integer;

begin

LCID := LOCALE_USER_DEFAULT;

// showMessage(NewExcelApp.Name);

NewExcelApp := TExcelApplication.Create(Self);

NewExcelApp.Workbooks.Open(ExcelFilename,

EmptyParam,EmptyParam,EmptyParam,

EmptyParam,EmptyParam,EmptyParam,

EmptyParam,EmptyParam,EmptyParam,

EmptyParam, Emptyparam,Emptyparam, LCID);

NewExcelApp.Visible[LCID] := true;

end;

The first time I open an Excel file, it works fine, but if I close it, and
then try and open another one (or the same one again), it starts to open
then locks up.

Any ideas as to how I can get round this?

Peter Tickler

Deborah Pate (TeamB) · Guest

< My requirement is to open Excel files from my Delphi 6
application. I have imported the Excel2000 type library,
placed a TExcelApplication object on my form