ComboBox Fehler?

[thomasvonmuenster1]

Wenn ich einen Eintrag in die ComboBox1 mache wird sie blau!
Aber im Hintergrund lauf alles prima weiter.
Wie kann ich es verhindern das sie blau wird?
Noch eine Frage! die eintäge verdoppeln sich. Es stehen aufeinmal zwei die gleichen suchbegriffe drin. Hat einer von euch einen Rat für mich!

Delphi-Quellcode:

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
timer3.Enabled:=false;
timer3.Enabled:=true;
end;

Delphi-Quellcode:

procedure TForm1.Timer3Timer(Sender: TObject);
begin
timer3.Enabled:=false;
IBQuery5.SQL.Text:='select suchbegriffe from tabelle1 where suchbegriffe like ''%'+ComboBox1.Text+'%''order by suchbegriffe';
IBQuery5.Open;

while IBQuery5.Eof=false
do begin
  ComboBox1.Items.Add(IBQuery5.FieldByName('suchbegriffe').AsString);
  IBQuery5.Next;
end;
label2.caption:= 'Treffer '+IntToStr(IBQuery5.recordcount);
end;

[CenBells]

hallo,

du solltest vor deiner schleife einmal
combobox.items.clear; machen. dann verdoppeln sich die sachen nicht.

Gruß
Ken

[thomasvonmuenster1]

Das die Felder nicht mehr doppelt sind geht jetzt. Dank dir!
Warum wird die ComboBox blau solange der Timer arbeitet?
Kann man bei den Eigenschaften der ComboBox dieses blau unterdrücken?

[Gollum]

Hallo,

was meinst Du mit blau? Der selektierte Eintrag?
Evtl. hilft ComboBox1.ItemIndex:=-1;

[thomasvonmuenster1]

Wenn man etwas in die combobox eintippt wird sie blau. das liegt bestimmt am timer und der suche in der db. nach ein zwei sekunden geht das blau wieder weg. es ist nur in der zeit blau wo er in der db sucht. kann man das unterbinden?