저도 이런식으로 사용했습니다만.. 그냥 참고하세요.

if(ADOQuery1->Active) ADOQuery1->Close();

AnsiString strQry = "SELECT * FROM Table1 ORDER BY ID ASC";    //ASC, DESC
ADOQuery1->SQL->Text = strQry;
ADOQuery1->Open();
ADOQuery1->First();
while(!ADOQuery1->Eof){
    cboTestModel->Items->Add(ADOQuery1->FieldByName("Model")->AsString);
    ADOQuery1->Next();
}