in Comboboxen datensätze einfügen

[arcon]

ich habe jetzt folgenden kompletten code ...

Delphi-Quellcode:

procedure TForm1.ComboBox1onclick(Sender: TObject);
var

adoConn          : TAdoConnection;
SQL              : String;
ADOQuery         : TADOQuery;
  begin

  adoConn := TADOConnection.Create(Self);
  adoConn.ConnectionString  := 'Provider=SQLOLEDB.1;Integrated .....';
  try
    if (not adoConn.Connected) then
    adoConn.Open;

 SQL := 'Select Description From Watch_Settings';
    ADOQuery.SQL.Text := SQL;
    ADOQuery.Open;
    while not AdoQuery.eof do
begin
    Combobox1.Items.Add(AdoQuery.FieldByName('Description').AsString);
    AdoQuery.Next;
end;

    adoConn.Execute(SQL);

    if (adoConn.Connected) then
    adoConn.Close;
  finally
    if Assigned(adoConn) then
      FreeAndNil(adoConn);

  end;
end;

aber nun bringt er mir eine zugriffsverletzung .. weiß jemand rein zufällig, woran es liegen könnte ?