有關資料庫轉EXCEL在D5上沒問題..但轉到D6卻不行..不知道有沒有人遇過ㄋ???

發文回覆瀏覽次數：1170

推到 Plurk!

推到 Facebook!

有關資料庫轉EXCEL在D5上沒問題..但轉到D6卻不行..不知道有沒有人遇過ㄋ???

chih
版主

發表：48
回覆：1186
積分：639
註冊：2002-04-02

發送簡訊給我

#1 引用回覆回覆

發表時間：2002-07-30 08:40:08

IP:211.74.xxx.xxx 未訂閱

as Title.. 程式碼如下..是否有人可以幫我看看ㄋ?? thanks..

procedure TCSTR001_M01.Button3Click(Sender: TObject);
var
ws :olevariant;
i:integer;
begin
   try
     //啟動Excel 97 , 且加入活頁簿
     lcid:=GetUserDefaultLCID;
     ExcelApplication1.Connect;
     ExcelApplication1.visible[lcid]:=True;
     workbook1:=ExcelApplication1.workbooks.add(EmptyParam,lcid);//在D6上面 Compiler到EmptyParam就過不去了...>_<...
   except
     showmessage('無法啟動Excel');
     exit;
   end;

發表人 - chih 於 2002/08/04 20:12:45

領航天使
站長

發表：12216
回覆：4186
積分：4084
註冊：2001-07-25

發送簡訊給我

#2 引用回覆回覆

發表時間：2002-08-08 08:51:50

IP:192.168.xxx.xxx 未訂閱

引言: as Title.. 程式碼如下..是否有人可以幫我看看ㄋ?? thanks..

procedure TCSTR001_M01.Button3Click(Sender: TObject);
var
ws :olevariant;
i:integer;
begin
   try
     //啟動Excel 97 , 且加入活頁簿
     lcid:=GetUserDefaultLCID;
     ExcelApplication1.Connect;
     ExcelApplication1.visible[lcid]:=True;
     workbook1:=ExcelApplication1.workbooks.add(EmptyParam,lcid);//在D6上面 Compiler到EmptyParam就過不去了...>_<...
   except
     showmessage('無法啟動Excel');
     exit;
   end;

發表人 - chih 於 2002/08/04 20:12:45

EmptyParam在unit Variants;中要先Uses Variants; ～～～Delphi K.Top討論區站長～～～

------
～～～Delphi K.Top討論區站長～～～

系統時間：2024-05-02 13:18:53

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！