全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1274
推到 Plurk!
推到 Facebook!

Record宣告問題

尚未結案
cyl
中階會員


發表:163
回覆:171
積分:66
註冊:2002-07-11

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-01-16 15:21:50 IP:61.218.xxx.xxx 未訂閱
請問我在formb 宣告一個record type Tmydata =record key1,key2:string; end; mydata :Tmydata; 然後有一個function 傳回Tmydata; 我在formb call此function mydata := form.GetF1Value; 但是一直出現[Error] CustFrm.pas(279): Incompatible types: 'CustFrm.Tmydata' and 'DataFrm.Tmydata' 我在forma也宣告了 mydata但是為什麼一直不過????
william
版主


發表:66
回覆:2535
積分:3048
註冊:2002-07-11

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-01-16 15:34:12 IP:147.8.xxx.xxx 未訂閱
引言: 請問我在formb 宣告一個record type Tmydata =record key1,key2:string; end; mydata :Tmydata; 然後有一個function 傳回Tmydata; 我在formb call此function mydata := form.GetF1Value; 但是一直出現[Error] CustFrm.pas(279): Incompatible types: 'CustFrm.Tmydata' and 'DataFrm.Tmydata' 我在forma宣告了 mydata但是為什麼一直不過????
This is the main point... In FormA TMyData = FormA.TMyData, in form B TMyData = FormB.TMyData. Although their definitions are the same, they are considered to be two different types. You may 'uses FormB' in FormA before using the record type. A better approach is to use another unit for the record type definition and 'uses' the new unit in both form A & B.
ccchen
版主


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

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-01-16 15:41:58 IP:61.219.xxx.xxx 未訂閱
我在forma也宣告了 mydata但是為什麼一直不過???? Global參數兩邊都宣告? 還是type之定義兩邊都做? 看不到你宣告的位置, 顯然是位置不對 大致應如此 FormB之unit type Tmydata =record key1,key2:string; end; TFormB=class(TForm) ... end; var formb:TFormb; mydata:TMyData; //----------------------------------------- //------------------------------------- FormA之unit uses ...unita 發表人 - ccchen 於 2003/01/16 15:47:47
系統時間:2024-04-20 4:46:07
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!