Comboboxに関して

解決

吉宗 2004-03-30 20:42:25 No: 8069 IP: [192.*.*.*]

ただいま、ComboboxのＰＧを組んでいるのですが、データ表示の仕方が解りません。

結果を以下の内容にしたいと思います。

AAA        ブランク
BBB    →  AAA
CCC        BBB
           CCC

Combobox1.Items.Clear;
     DM.ADOTable1.Open;
     with DM.ADOTable1 do
begin
     for  LOOP := 0 to RecordCount -1 do
begin
          HEsys:= fieldbyname('名前').asstring;
          Combobox1.Items.Add(HEsys);
          Next;

よろしくお願いします。

編集削除

鳥 2004-03-30 20:47:54 No: 8070 IP: [192.*.*.*]

ループの前に
Combobox1.Items.Clear
で初期化すればブランクは消えると思います。

編集削除

吉宗 2004-03-30 20:54:42 No: 8071 IP: [192.*.*.*]

説明不足ですみません。
一行目にブランクを組み込みたいと思っています

編集削除

たかみちえ URL 2004-03-30 20:58:05 No: 8072 IP: [192.*.*.*]

うーん、ブランクをつけたいという質問だと思うのですが…。それで、よろしいですよね？

コンボボックスにアイテムを追加するのは、ご存じのとおりAdd メソッドを使います。
(ま、AddObjectなどもありますけどね)
ここにはどのような文章も、"たとえ空文字であっても"指定することができます。

編集削除

鳥 2004-03-30 22:09:00 No: 8073 IP: [192.*.*.*]

失礼しました。
ブランクの追加ならば
ループの前に
Combobox1.Items.Add('');
でいいと思います。

編集削除

ふぐちゃん 2004-03-30 22:25:16 No: 8074 IP: [192.*.*.*]

Delphi7でなければ関係ないですが、参考までに。
http://www2.big.or.jp/~osamu/Delphi/Tips/key.cgi?key=0#0344.txt

編集削除

吉宗 2004-03-30 22:33:27 No: 8075 IP: [192.*.*.*]

鳥さん、たかみちさん、ふぐちゃんさん、有難うございました。御三方のご指導していただいたおかげで解決することができました。これからもよろしくお願い致します。

編集削除