DBcombox連資料庫時, 如何把Item的字串轉換成長度為1的代嗎 |
答題得分者是:terrychen
|
kaisheng
一般會員 發表:26 回覆:47 積分:14 註冊:2003-11-17 發送簡訊給我 |
|
Fishman
尊榮會員 發表:120 回覆:1949 積分:2163 註冊:2006-10-28 發送簡訊給我 |
Hi: 請參考
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=42407
與
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=42418
--------------------------------
小弟才疏學淺,若有謬誤請不吝指教
--------------------------------
------
Fishman |
ying0515
中階會員 發表:90 回覆:168 積分:81 註冊:2003-01-04 發送簡訊給我 |
|
terrychen
尊榮會員 發表:90 回覆:794 積分:501 註冊:2003-05-01 發送簡訊給我 |
|
kaisheng
一般會員 發表:26 回覆:47 積分:14 註冊:2003-11-17 發送簡訊給我 |
|
terrychen
尊榮會員 發表:90 回覆:794 積分:501 註冊:2003-05-01 發送簡訊給我 |
|
kaisheng
一般會員 發表:26 回覆:47 積分:14 註冊:2003-11-17 發送簡訊給我 |
引言: 您好: 首先妳需要再拉一ㄍ查詢元件如ADOQUERY1 select 妳想要秀的欄位(要秀的資料及要存的代碼) DBlookupcombobox的設定主要有3ㄍ地方 1.datasource(原來的查詢元件)、datafield 這是妳要存的那ㄍ欄位 2.listsource(ADOQUERY1)、listfield 這是妳要秀的資料 3.kieldfield 這是妳要存的代碼欄位 這樣不知你是否瞭解,若有問題再發問您好! 您說kieldfield是我要存代碼的欄位, 可是我只有找到keyfield的屬性 若是keyfield其Datasource要設那一個 要和listsource的Datasource一樣嗎? 新竹的小凱
------
Number One |
terrychen
尊榮會員 發表:90 回覆:794 積分:501 註冊:2003-05-01 發送簡訊給我 |
|
kaisheng
一般會員 發表:26 回覆:47 積分:14 註冊:2003-11-17 發送簡訊給我 |
|
terrychen
尊榮會員 發表:90 回覆:794 積分:501 註冊:2003-05-01 發送簡訊給我 |
|
kaisheng
一般會員 發表:26 回覆:47 積分:14 註冊:2003-11-17 發送簡訊給我 |
|
kaisheng
一般會員 發表:26 回覆:47 積分:14 註冊:2003-11-17 發送簡訊給我 |
引言:這兩個是不能用同一個source的? 我將其修改了一下, 我發現Run起來時其下拉的選項在選的時候有問題 有的選項可以選有可不行 新竹的小凱引言: 您好: 沒錯阿!因為keyfield沒得指定datasource 所以在選定時會發現與listfield是同一ㄍdatasource 方便的話上傳圖片來看看Sorry! 我搞錯了 DBlookupcombobox中有一個datasource和一個listsource 第兩個要如何設, 是不是不能設同一個datasource? 新竹的小凱
------
Number One |
terrychen
尊榮會員 發表:90 回覆:794 積分:501 註冊:2003-05-01 發送簡訊給我 |
|
ying0515
中階會員 發表:90 回覆:168 積分:81 註冊:2003-01-04 發送簡訊給我 |
請問你TDBCombox的Item有關聯到另一資料表嗎? 如果沒有試試這個方法看看,會不會較簡單! 在TDBCombox.item設'1_正常訂單' '2_銷售庫存' '3_客戶所樣' 並在TDBCombox對應的TDataSet.Field裡的onGetText事件處理 procedure Tform1.kindGetText(Sender: TField; var Text: string; DisplayText: Boolean); begin Text := Sender.AsString; if (Sender.Value = '') or (Sender.value = null) then Text := ' _無資料'; if (Sender.value = '1') then Text := '1_正常訂單'; if (Sender.value = '2') then Text := '2_銷售庫存'; if (Sender.value = '3') then Text := '3_客戶所樣'; end;Delphi follower 發表人 - ying0515 於 2004/01/05 21:59:22
------
Delphi |
kaisheng
一般會員 發表:26 回覆:47 積分:14 註冊:2003-11-17 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |