title: Getting results of a ADOQuery to a Combobox
body: <p>I have a database and would like to fill up a combobox with partnumbers where TYPE = RKE
  But When i run this code it gives errors </p>
  
  <p>Parameter xxx has no default value.</p>
  
  <pre><code>    procedure TFMain.ComboTypeClick(Sender: TObject);
  var
    Qry:TADOQuery;
  begin
      Qry:=TADOQuery.Create(self);
    try
      Qry.Connection:=PronetConnection;  //pronet is adoconnection
      Qry.SQL.Clear;
      Qry.SQL.Add('Select PartNumber FROM PNet WHERE Type = RKE');
      Qry.Open;
      with Qry do
      begin
        First;
        ComboType.Items.Clear;
        while not eof do
        begin
          ComboNumber.Items.Add(FieldByName('PartNumber').AsString);
          Next;
        end;
      end;
    finally
      Qry.Active:=False;
      Qry.Free;
    end;
  end;
  </code></pre>