Queryで取得した項目をComboboxのアイテムに追加するには

解決


komin  2007-06-01 09:53:49  No: 26445  IP: 192.*.*.*

生産管理のアプリケーションです。DelphiはVer.6 Professionalで、PARADOXテーブルを使っています。
  2万レコード位あるテーブルからある項目(ここでは件='kenmei')を重複なく取り出してComboboxのItemに追加したのです。
 Quwry1.SQL.Add('select kenmei from meisai group by kenmei')で取得できるところろまでは解っています。その結果を文字列としてComboboxのItemに追加するコーディングを教えてください。

編集 削除
komn  2007-06-01 09:55:12  No: 26446  IP: 192.*.*.*

> 重複なく取り出してComboboxのItemに追加したのです。

「追加したいのです」の誤りです。

編集 削除
Ru  2007-06-01 10:20:30  No: 26447  IP: 192.*.*.*

TComboBox.ItemsプロパティはTStringList型ですので,
TStringListのヘルプを一度見てはどうでしょう。

TStringList.Add  メソッドのヘルプに例がありますので参考になると思います。

編集 削除
Ru  2007-06-01 10:28:36  No: 26448  IP: 192.*.*.*

Kominさんはここと同一人物?ttp://hpcgi1.nifty.com/MADIA/DelphiBBS/wwwlng.cgi?print+200705/07050043.txt

ここでのソース見る限りコンボボックスに追加はできてそうですね。
てことはTQueryから検索した値を引っ張ることが出来ない??

編集 削除
悩める子羊  2007-06-01 10:51:55  No: 26449  IP: 192.*.*.*

こういうことかぃな?
query.First;
while not query.EOF do begin
  Combobox.Items.Add(query.Fields[0].AsString);
  query.Next;
end;

編集 削除
komin  2007-06-01 11:44:04  No: 26450  IP: 192.*.*.*

Ruさん,それはできています。というか,多用しています。
  悩める子羊さん,ありがとうございました。この方法でうまくいきました。

編集 削除