No Money No Honey

ExportGrid4ToEXCEL(FileName, AGrid, True, True, False);
當FileName為中文時,打開生成的EXCEL文件,會在生成的EXCEL文件中彈出一個對話框,對話顯示內容為"重新命名無效的工作表名稱".

weiliu (2006-07-18 17:36:03)

可以先把中文文件名改成英文，用完了再改回來。

grayback (2006-07-18 17:38:00)

{  ExcelApp := CreateOleObject('Excel.Application');
   try
     WorkBook := ExcelApp.WorkBooks.Open(FileName);
     ExcelApp.Visible := False;
     WorkBook.ActiveSheet.Name := '你好';
   finally
     WorkBook.Close;
     ExcelApp.Quit;
     WorkBook := Null;
     ExcelApp := Null;
     WorkBook := Unassigned;
     ExcelApp := Unassigned;
     FreeAndNil(ExcelApp);
   end; }