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

請問如何使VB的OCX元件[MSHFlexGrid]能接受DataSource來源?

尚未結案
s9054469
一般會員


發表:21
回覆:35
積分:11
註冊:2003-04-21

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-10-30 00:31:52 IP:61.70.xxx.xxx 未訂閱
各位前輩,不好意思請教一下: 在VB中使用MSHFlexGrid時,可以透過Recordset物件, 給MSHFlexGrid1.DataSource就能將Recordset的結果秀在MSHFlexGrid1中, 但在Delphi裏要怎麼做呢? 我目前有試過幾種方式,例如也去create一個Recordset物件, 再丟給MSHFlexGrid1.DataSource,但一樣會因為型態不合出錯, 所以不知在Delphi裏使用這些VB的OCX元件,如果要像在VB中一樣, 指定個DataSource給MSHFlexGrid使用,不知是要使用何種型態的元件, 或者是要如何轉型才能讓MSHFlexGrid1接受? ~做中學,學中做~
------
corn
pgdennis
資深會員


發表:41
回覆:526
積分:443
註冊:2002-05-23

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-10-30 14:11:43 IP:218.163.xxx.xxx 未訂閱
可以這樣做..我連結access,oracle沒問題,可試試,我是用delphi封裝的ADO元件喔,不是原生activeX元件..  
 
procedure TForm1.Button1Click(Sender: TObject);
begin
    adotable1.Open;
    MSHflexgrid1.DefaultInterface.Recordset:=adotable1.Recordset as IRecordset;
end;
永遠追不上技術更新的速度
------
星期一,二...無窮迴圈@@
s9054469
一般會員


發表:21
回覆:35
積分:11
註冊:2003-04-21

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-10-30 16:49:32 IP:210.243.xxx.xxx 未訂閱
引言: 可以這樣做..我連結access,oracle沒問題,可試試,我是用delphi封裝的ADO元件喔,不是原生activeX元件..
 
procedure TForm1.Button1Click(Sender: TObject);
begin
    adotable1.Open;
    MSHflexgrid1.DefaultInterface.Recordset:=adotable1.Recordset as IRecordset;
end;
永遠追不上技術更新的速度
pgdennis 兄,真是非常感謝你,原來還有這種用法,我們還一直在想如何找到符合它的DataSource型態的用法,想不到原來是這樣來接受Recordset,真是非常感謝,還好有你的幫忙,不然我差點要自己寫丟值的功能了,謝謝!! ~做中學,學中做~
------
corn
pgdennis
資深會員


發表:41
回覆:526
積分:443
註冊:2002-05-23

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-10-30 17:06:11 IP:218.163.xxx.xxx 未訂閱
其實我測試了很久..一值想解開這題, >... 永遠追不上技術更新的速度
------
星期一,二...無窮迴圈@@
qq_911228
一般會員


發表:30
回覆:22
積分:10
註冊:2003-09-29

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-12-12 13:05:09 IP:140.127.xxx.xxx 未訂閱
引言:
引言: 可以這樣做..我連結access,oracle沒問題,可試試,我是用delphi封裝的ADO元件喔,不是原生activeX元件..
 
procedure TForm1.Button1Click(Sender: TObject);
begin
    adotable1.Open;
    MSHflexgrid1.DefaultInterface.Recordset:=adotable1.Recordset as IRecordset;
end;
永遠追不上技術更新的速度
pgdennis 兄,真是非常感謝你,原來還有這種用法,我們還一直在想如何找到符合它的DataSource型態的用法,想不到原來是這樣來接受Recordset,真是非常感謝,還好有你的幫忙,不然我差點要自己寫丟值的功能了,謝謝!! ~做中學,學中做~
不好意思~~ 可以請教幾個問題嘛? 1.我要import時,出現如圖的訊息,請問要修改那才可以import? 2.可以post一下你的code讓我參考一下? 3.不知道你已經可以抓到olap server上全部的資料庫了嘛? 謝謝! 發表人 - qq_911228 於 2003/12/12 23:41:28
s9054469
一般會員


發表:21
回覆:35
積分:11
註冊:2003-04-21

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-12-18 15:24:25 IP:210.243.xxx.xxx 未訂閱
引言: 不好意思~~ 可以請教幾個問題嘛? 1.我要import時,出現如圖的訊息,請問要修改那才可以import? 2.可以post一下你的code讓我參考一下? 3.不知道你已經可以抓到olap server上全部的資料庫了嘛? 謝謝! 發表人 - qq_911228 於 2003/12/12 23:41:28
1.將 _SetOleVariantProp 的 _ 拿掉,存檔再試一次 就可以import進來了. 2.不知你是要那一段的code? 3.目前我們已經沒有在試這部份了,因為使用olap來做,還有很長的一段路要走, 而我們專題時間剩不多,所以我們已停止這部份的研究了; 不過我確定的是使用VB來做是抓得到,所以Delphi應該也抓得到, 你可以研究一下OLAP Server附的那個Sample程式. ~做中學,學中做~
------
corn
qq_911228
一般會員


發表:30
回覆:22
積分:10
註冊:2003-09-29

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-12-18 16:07:20 IP:218.164.xxx.xxx 未訂閱
引言:
引言: 不好意思~~ 可以請教幾個問題嘛? 1.我要import時,出現如圖的訊息,請問要修改那才可以import? 2.可以post一下你的code讓我參考一下? 3.不知道你已經可以抓到olap server上全部的資料庫了嘛? 謝謝! 發表人 - qq_911228 於 2003/12/12 23:41:28
1.將 _SetOleVariantProp 的 _ 拿掉,存檔再試一次 就可以import進來了. 2.不知你是要那一段的code? 3.目前我們已經沒有在試這部份了,因為使用olap來做,還有很長的一段路要走, 而我們專題時間剩不多,所以我們已停止這部份的研究了; 不過我確定的是使用VB來做是抓得到,所以Delphi應該也抓得到, 你可以研究一下OLAP Server附的那個Sample程式. ~做中學,學中做~
你好~~很謝謝撥冗指教~~ 以下的這段CODE我無知道要如何連結OLAP SERVER的CONNECTIONSTRIN 所以我想請問你是如何指定它連到OLAP SERVER, 還有就是如果指定好了~~那以下面的CODE就可以將抓出來的資料秀在MSHFLEXGRID了嘛? 還是要有另外的修改~~~? 不好意思~~~又麻煩你~~ procedure TForm1.Button1Click(Sender: TObject); begin adotable1.Open; MSHflexgrid1.DefaultInterface.Recordset:=adotable1.Recordset as IRecordset; end;
s9054469
一般會員


發表:21
回覆:35
積分:11
註冊:2003-04-21

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-12-18 18:10:25 IP:210.243.xxx.xxx 未訂閱
引言: 你好~~很謝謝撥冗指教~~ 以下的這段CODE我無知道要如何連結OLAP SERVER的CONNECTIONSTRIN 所以我想請問你是如何指定它連到OLAP SERVER, 還有就是如果指定好了~~那以下面的CODE就可以將抓出來的資料秀在MSHFLEXGRID了嘛? 還是要有另外的修改~~~? 不好意思~~~又麻煩你~~ procedure TForm1.Button1Click(Sender: TObject); begin adotable1.Open; MSHflexgrid1.DefaultInterface.Recordset:=adotable1.Recordset as IRecordset; end;
1.如何設連接OLAP Server 的CONNECTIONSTRIN: 從ADOConnection1.ConnectionString 或 ADOQuery.ConnectionString 的...進入設定介面,在[資料連結內容]的[提供者]選擇 Microfsoft OLEDB Provider of OLAP Server,下一步進入[連線] 這的設定就跟使用SQL Server一樣設囉; 然後你就可以利用ADOQuery.SQL去下MDX語法. 再做 MSHflexgrid1.DefaultInterface.Recordset:=ADOQuery1.Recordset as IRecordset; 將資料來源指定給MSHflexgrid1, 就會將結果秀在MSHflexgrid1上了,你試一下吧! ~做中學,學中做~
------
corn
qq_911228
一般會員


發表:30
回覆:22
積分:10
註冊:2003-09-29

發送簡訊給我
#9 引用回覆 回覆 發表時間:2003-12-19 14:00:30 IP:218.164.xxx.xxx 未訂閱
引言:
引言: 你好~~很謝謝撥冗指教~~ 以下的這段CODE我無知道要如何連結OLAP SERVER的CONNECTIONSTRIN 所以我想請問你是如何指定它連到OLAP SERVER, 還有就是如果指定好了~~那以下面的CODE就可以將抓出來的資料秀在MSHFLEXGRID了嘛? 還是要有另外的修改~~~? 不好意思~~~又麻煩你~~ procedure TForm1.Button1Click(Sender: TObject); begin adotable1.Open; MSHflexgrid1.DefaultInterface.Recordset:=adotable1.Recordset as IRecordset; end;
1.如何設連接OLAP Server 的CONNECTIONSTRIN: 從ADOConnection1.ConnectionString 或 ADOQuery.ConnectionString 的...進入設定介面,在[資料連結內容]的[提供者]選擇 Microfsoft OLEDB Provider of OLAP Server,下一步進入[連線] 這的設定就跟使用SQL Server一樣設囉; 然後你就可以利用ADOQuery.SQL去下MDX語法. 再做 MSHflexgrid1.DefaultInterface.Recordset:=ADOQuery1.Recordset as IRecordset; 將資料來源指定給MSHflexgrid1, 就會將結果秀在MSHflexgrid1上了,你試一下吧! ~做中學,學中做~
thanks~~~真的很謝謝你~~ 不知道你們專題是作有關olap那方面的應用~~? 純屬個人好奇~~~
qq_911228
一般會員


發表:30
回覆:22
積分:10
註冊:2003-09-29

發送簡訊給我
#10 引用回覆 回覆 發表時間:2003-12-22 13:07:03 IP:140.127.xxx.xxx 未訂閱
引言: [quote] [quote] 你好~~很謝謝撥冗指教~~ 以下的這段CODE我無知道要如何連結OLAP SERVER的CONNECTIONSTRIN 所以我想請問你是如何指定它連到OLAP SERVER, 還有就是如果指定好了~~那以下面的CODE就可以將抓出來的資料秀在MSHFLEXGRID了嘛? 還是要有另外的修改~~~? 不好意思~~~又麻煩你~~ procedure TForm1.Button1Click(Sender: TObject); begin adotable1.Open; MSHflexgrid1.DefaultInterface.Recordset:=adotable1.Recordset as IRecordset; end;
1.如何設連接OLAP Server 的CONNECTIONSTRIN: 從ADOConnection1.ConnectionString 或 ADOQuery.ConnectionString 的...進入設定介面,在[資料連結內容]的[提供者]選擇 Microfsoft OLEDB Provider of OLAP Server,下一步進入[連線] 這的設定就跟使用SQL Server一樣設囉; 然後你就可以利用ADOQuery.SQL去下MDX語法. 再做 MSHflexgrid1.DefaultInterface.Recordset:=ADOQuery1.Recordset as IRecordset; 將資料來源指定給MSHflexgrid1, 就會將結果秀在MSHflexgrid1上了,你試一下吧! ~做中學,學中做~ 你好~~ 我根據上述的步驟,結果產生如下圖 但正確的結果應該是如下圖才對, 不知道你是否有修改,可以post給我參考嘛? 謝謝! 發表人 - qq_911228 於 2003/12/22 13:34:48
系統時間:2024-07-01 3:42:55
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!