Fehler bei SQL und Combobox.Items.Add

[Avax2k]

hallo habe folgenden Code..der auch super beim ERSTEN MAL funktioniert!!

Delphi-Quellcode:

procedure TForm1.FillComboBox2 (aCB : TspSkinComboBox);
begin
  try
    ADOQuery7.Close;
    ADOQuery7.SQL.Text := 'SELECT * FROM Test WHERE ID = 7 ORDER BY ID ASC';
    ADOQuery7.Open;
    while not (ADOQuery7.Eof) do
    begin
      aCB.Items.Add(ADOQuery7.FieldByName('ID').AsString);
      ADOQuery7.Next;
    end;
  finally
    ADOQuery7.Free;
  end;
end;

soweit so gut..NUR wenn ich ein zweites Mal die Funktion aufrufe (ist auf einen Button gelegt) dann bekomme ich Fehler : EAccessviolation at address 0048A992 read of address: 00000000.

was ist denn das und wieso kommt da ein Fehler sollte doch problemlos funktionieren und eben bei jedem Druck auf den Knopf alles anzeigen?!

ach ja der Knopf ist so
FillComboBox2(ComboBox1);