(1)setwindowtext<br>(2)<br>Fexcel := CreateOleObject(Curexcel);<br> Fexcel.DisplayAlerts := False;<br> Fexcel.workbooks.Open(ExtractFilePath(Application.EXEName)+'Chinese Turnover Tax Macro Model (On 1997 Data).xls');<br> Fexcel.caption:='中国流转税宏观模型';<br> Fexcel.Visible := True;<br> Result := True;<br> <br><br>