TComboBox資料增加問題 |
|
尚未結案
|
|
sword185
一般會員   發表：36 回覆：81 積分：23 註冊：2002-06-05 發送簡訊給我 |
|
|
turboted
版主  發表：95 回覆：754 積分：452 註冊：2002-07-23 發送簡訊給我 |
chih 兄，感謝您的幫忙
是我的不查，沒注意到是delphi 的
我也自已改正了一下，順便提供了另外一種的save/load方法
1.
if ComboBox1.Items.IndexOf(ComboBox1.Text) = -1 then
ComboBox1.Items.Add(ComboBox1.Text); 記錄
ComboBox1.Items.SaveToFile('CBList.txt');
ComboBox1.Items.LoadFromFile('CBList.txt'); 2.
if ComboBox1.Items.IndexOf(ComboBox1.Text) <> -1 then
ShowMessage (ComboBox1.Text);
發表人 - turboted 於 2003/06/03 13:37:02
|
|
sword185
一般會員 發表：36 回覆：81 積分：23 註冊：2002-06-05 發送簡訊給我 |
|
|
chih
版主 發表：48 回覆：1186 積分：639 註冊：2002-04-02 發送簡訊給我 |
|
|
sword185
一般會員 發表：36 回覆：81 積分：23 註冊：2002-06-05 發送簡訊給我 |
|
|
chih
版主 發表：48 回覆：1186 積分：639 註冊：2002-04-02 發送簡訊給我 |
|
|
turboted
版主 發表：95 回覆：754 積分：452 註冊：2002-07-23 發送簡訊給我 |
|
|
sword185
一般會員 發表：36 回覆：81 積分：23 註冊：2002-06-05 發送簡訊給我 |
小弟我非常愚庸...
是出來的結果：若直接點選下拉式的方式，無法選擇數值
我的程式碼如下:
procedure TForm1.FormActivate(Sender: TObject);
begin
ComboBox1.Items.LoadFromFile('CBList.txt');
end; procedure TForm1.ComboBox1Exit(Sender: TObject);
begin
if ComboBox1.Items.IndexOf(ComboBox1.Text) <> -1 then
begin
ShowMessage ('【' ComboBox1.Text '】 欄位已有資料');
end
else
begin
ComboBox1.Items.Add(ComboBox1.Text);
ComboBox1.Items.SaveToFile('CBList.txt');
ComboBox1.Items.LoadFromFile('CBList.txt');
end;
end; 不知如何更改
|
|
chih
版主 發表：48 回覆：1186 積分：639 註冊：2002-04-02 發送簡訊給我 |
|
|
sword185
一般會員 發表：36 回覆：81 積分：23 註冊：2002-06-05 發送簡訊給我 |
|
|
chih
版主 發表：48 回覆：1186 積分：639 註冊：2002-04-02 發送簡訊給我 |
|
|
turboted
版主 發表：95 回覆：754 積分：452 註冊：2002-07-23 發送簡訊給我 |
|
|
sword185
一般會員 發表：36 回覆：81 積分：23 註冊：2002-06-05 發送簡訊給我 |
|
|
turboted
版主 發表：95 回覆：754 積分：452 註冊：2002-07-23 發送簡訊給我 |
把判斷放在
OnKeyPress 裏面
並判斷有沒有按下'/r' enter 鍵
如果有，再做判斷
if ComboBox1.Items.IndexOf(ComboBox1.Text) = -1 then
ComboBox1.Items.Add(ComboBox1.Text);
if ComboBox1.Items.IndexOf(ComboBox1.Text) <> -1 then
ShowMessage (ComboBox1.Text);
如果沒有，就不用判斷，當他是正常的選數值
就沒問題了
|
發表時間：2003-06-03 11:55:19
IP:61.64.xxx.xxx 未訂閱
系統時間：2024-05-17 3:43:38
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |