Queryで取得した項目をComboboxのアイテムに追加するには
解決生産管理のアプリケーションです。DelphiはVer.6 Professionalで、PARADOXテーブルを使っています。
２万レコード位あるテーブルからある項目（ここでは件='kenmei'）を重複なく取り出してComboboxのItemに追加したのです。
Quwry1.SQL.Add('select kenmei from meisai group by kenmei')で取得できるところろまでは解っています。その結果を文字列としてComboboxのItemに追加するコーディングを教えてください。
> 重複なく取り出してComboboxのItemに追加したのです。
「追加したいのです」の誤りです。
TComboBox.ItemsプロパティはTStringList型ですので，
TStringListのヘルプを一度見てはどうでしょう。
TStringList.Add メソッドのヘルプに例がありますので参考になると思います。
Kominさんはここと同一人物？ttp://hpcgi1.nifty.com/MADIA/DelphiBBS/wwwlng.cgi?print+200705/07050043.txt
ここでのソース見る限りコンボボックスに追加はできてそうですね。
てことはTQueryから検索した値を引っ張ることが出来ない？？
こういうことかぃな？
query.First;
while not query.EOF do begin
Combobox.Items.Add(query.Fields[0].AsString);
query.Next;
end;
Ruさん，それはできています。というか，多用しています。
悩める子羊さん，ありがとうございました。この方法でうまくいきました。
| ツイート |  |