請問如何取得 DataSet 的指標和 handle 並用 showmessage 顯示其指標和 handle 的值.

引言: 請問如何取得 DataSet 的指標和 handle 並用 showmessage 顯示其指標和 handle 的值.

ufjjc 你好 試試這個 ShowMessage(IntToStr(dataSet.Handle) ' ' IntToStr(Pointer(dataset)));

謝謝 Chance36

改寫成 ShowMessage(IntToStr(DataSource1.dataSet.Handle)+' '+IntToStr(Pointer(DataSource1.DataSet)));    結果出現 [Error] Unit1.pas(159): Undeclared identifier: 'Handle' [Error] Unit1.pas(159): There is no overloaded version of 'IntToStr' that can be called with these arguments 

引言: 結果出現 [Error] Unit1.pas(159): Undeclared identifier: 'Handle' [Error] Unit1.pas(159): There is no overloaded version of 'IntToStr' that can be called with these arguments

ufjjc 你好 只有繼承自TDBDataSet的Dataset才有Handle屬性,其他如TAdoDataSet卻沒有Handle 屬性，TDBDataSet的繼承架構如下 TDataset->TBDEDataSet->TDBDataSet->TQuery．．．其實也只有幾個資料集才有Handle屬性，因此你上述改寫必須加上轉型才行 ShowMessage(IntToStr(TDBDataSet(DataSource1.dataSet).Handle) ' ' IntToStr(Pointer(DataSource1.DataSet)));

再次謝謝 請問 以下的做法可行嗎. 指標 := Pointer(tDBDataSet1.DataSource) ; tDBDataSet2.DataSource = 指標;

引言: 請問 以下的做法可行嗎. 指標 := Pointer(tDBDataSet1.DataSource) ; tDBDataSet2.DataSource = 指標;

ufjjc 你好 原則上是可行，但不建議 TDBDataset.DataSource 並不是TDBDataSet所連結的TDataSource 與TDataSource.DataSet 是否同意義的，要注意(有點含糊) 在Delphi 中物件名稱其實就是指標,但物件化就是要以物件來看待資料而不是以指標來看資料，如上述是真有此需求 tDBDataSet2.DataSource = tDBDataSet1.DataSource; 就可以了，何苦再用指標轉來轉去呢? 發表人 - chance36 於 2004/05/01 01:21:21

謝謝 其實我想 把 EXE1 的 DataSource指標 傳給 EXE2, 故必須將指標變成 字串變數,然後再轉換回來 EXE1 指標 := Pointer(tDBDataSet1.DataSource) ; EXE2 tDBDataSet2.DataSource = EXE 的 指標;

引言: 謝謝 其實我想 把 EXE1 的 DataSource指標 傳給 EXE2, 故必須將指標變成 字串變數,然後再轉換回來 EXE1 指標 := Pointer(tDBDataSet1.DataSource) ; EXE2 tDBDataSet2.DataSource = EXE 的 指標;

TDataSource <--這也是一種指標的型態(VCL元件都是指標的型態) 想買台TPC..TTAB-B12D