Delphi：qry結果を使用してドロップダウンボックスを作成する最も簡単な方法は何ですか？

Question

[OK]をので、私はCOUNTRYNAME列Iは、ドロップダウンボックスの項目のオプションに、これらすべての国の名前を入れてしまう方法

SELECT CountryName FROM Counties 

返すデータベースクエリ、持っている（それらをループせずに？）

Answer 1

TDBLookupComboBoxのようなものを使用します。フォームに1つをドロップし、このようなプロパティを設定します。

DataSource = srcCustomers 
    DataField = 'country_id' 

    ListSource = srcCountries 
    ListField = 'NAME' 
    KeyField = 'ID' 

このコードは、国名をフォームに表示し、国IDをdb Customers.country_idに配置します。

srcで始まる2つのコントロールは、TADODataSetsに接続されたTDataSourcesです。データソースは、さまざまなデータアクセスコントロールに接続できます。

Answer 2

マイデルファイ少しさびているが、あなたはの線に沿って何かを持っている必要があります - >あなたはそれの上にあなたの結果、ループを取ると、他のWindowsフレームワークのような問題に対処することができます

comboBox.Items //A list so you can just add to it. 

。 TADOQuery（または使用しているもの）を検索して結果を取得します。 Delphiは非常に簡単で、オブジェクトを検査すると、おそらくソリューションが実現することがわかります。

Answer 3

使用のようなもの：CountryListは、すべての国の名前を含むTStringListインスタンスです

ComboBox.Items.Assign(CountryList); 

。

これは、TComboBoxを実装する最も速い方法です。