Comboboxに関して

解決

吉宗 2004-03-30 20:42:25 No: 8069

ただいま、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

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

吉宗 2004-03-30 20:54:42 No: 8071

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

たかみちえ URL 2004-03-30 20:58:05 No: 8072

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

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

鳥 2004-03-30 22:09:00 No: 8073

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

ふぐちゃん 2004-03-30 22:25:16 No: 8074

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

吉宗 2004-03-30 22:33:27 No: 8075

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