線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1823
推到 Plurk!
推到 Facebook!

DBGrid如何輸出為Excel或HTML文件?

答題得分者是:ccchen
flyup
資深會員


發表:280
回覆:508
積分:385
註冊:2002-04-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2002-09-25 19:28:03 IP:61.225.xxx.xxx 未訂閱
DBGrid如何輸出為Excel或HTML文件? 資料庫環境為:Paradox資料庫做成。 所使用元件為TTable、DataSource、DBGrid 資料內容:該資料表有1000筆網站資料。
ccchen
版主


發表:61
回覆:940
積分:1394
註冊:2002-04-15

發送簡訊給我
#2 引用回覆 回覆 發表時間:2002-09-26 09:20:02 IP:61.219.xxx.xxx 未訂閱
輸出Excel本站已有太多討論, 用OLE,用ADO均可    輸出HTML文件: 用TQueryTableProducer(或其他類似元件, 在"internet" page) 設query屬性指向你的query, query open後, TQueryTableProducer.content就是你要的html字串. 若要存成檔, 以下給你參考
procedure Tform1.Button1Click(Sender: TObject);
var outstr:widestring;
  fstream:TFileStream;
  StrOut: TStringStream;
begin
  query1.open;
  outstr:= QueryTableProducer1.Content;
  Fstream := TFileStream.Create('c:\test.htm', fmCreate);
  StrOut  := TStringStream.Create(outstr);
  try
    Fstream.CopyFrom(StrOut, 0);
  finally
    fstream.free;
    StrOut.Free;
  end;
end;
flyup
資深會員


發表:280
回覆:508
積分:385
註冊:2002-04-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2002-09-26 17:43:11 IP:61.217.xxx.xxx 未訂閱
輸出HTML文件,測試上述程式碼,有以下疑問: 1.輸出HTML文件:在test.htm檔只能看到20筆資料而已,可否設定輸出範圍? 2.當我的DBGrid資料有更改時,是否能根據現在更動後顯示的資料,做輸出? 3.test.htm檔,若有網址,如何建立文字超連結狀態,而非只是文字顯示而已? 感謝版主指教!
flyup
資深會員


發表:280
回覆:508
積分:385
註冊:2002-04-15

發送簡訊給我
#4 引用回覆 回覆 發表時間:2002-09-26 22:11:27 IP:61.217.xxx.xxx 未訂閱
輸出HTML文件,測試上述程式碼,有以下疑問: 1.輸出HTML文件:在test.htm檔只能看到20筆資料而已,可否設定輸出範圍? 已從QueryTableProducer1元件設定完成。 2.當我的DBGrid資料有更改時,是否能根據現在更動後顯示的資料,做輸出? 詳述:如何將Table1過濾資料後,將取得之資料輸出成HTML檔? 3.test.htm檔,若有網址,如何建立文字超連結狀態,而非只是文字顯示而已? 感謝版主指教!
ccchen
版主


發表:61
回覆:940
積分:1394
註冊:2002-04-15

發送簡訊給我
#5 引用回覆 回覆 發表時間:2002-09-27 11:49:14 IP:61.219.xxx.xxx 未訂閱
1.輸出HTML文件:在test.htm檔只能看到20筆資料而已,可否設定輸出範圍?   已從QueryTableProducer1元件設定完成。 QueryTableProducer.maxrows就是設定輸出筆數. -1代表全部 2.當我的DBGrid資料有更改時,是否能根據現在更動後顯示的資料,做輸出? 詳述:如何將Table1過濾資料後,將取得之資料輸出成HTML檔? 直接將Query或Table用 Filter過濾, 輸出之資料乃過濾後之資料 3.test.htm檔,若有網址,如何建立文字超連結狀態,而非只是文字顯示而已? 你是指Table內之資料含有網址?, 那你必須在onCreateContent中用程式去建立超連結, 若是不夠用, 可以換其他pageProducer [/quote]
flyup
資深會員


發表:280
回覆:508
積分:385
註冊:2002-04-15

發送簡訊給我
#6 引用回覆 回覆 發表時間:2002-09-27 12:56:13 IP:61.217.xxx.xxx 未訂閱
非常謝謝!ccchen版主指教! 原來東西是放在倉庫,我瞭解了!
系統時間:2024-04-29 3:06:38
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!