Thema: Delphi Autovervollständigung.

Einzelnen Beitrag anzeigen

Akut-Programming

Registriert seit: 18. Aug 2003
648 Beiträge
 
#11

Re: Autovervollständigung.

  Alt 21. Apr 2004, 13:33
Mit diesem Code werden alle Einträge eine Spalte in eine normale ComboBox, keine DBComboBox geladen.
Delphi-Quellcode:
Query1.Active:=false;
 Query1.SQL.Clear;
 Query1.SQL.Add('SELECT suchbegriffe from tabelle1 WHERE UPPER (suchbegriffe) LIKE UPPER (''%'+Edit2.Text+'%'')');
 Query1.ExecSQL();
 Query1.Active:=true;

ComboBox1.Items.Clear;
Query1.First;

while Query1.Eof=false
do begin
  ComboBox1.Items.Add(Query1.FieldByName('suchbegriffe').AsString);
  Query1.Next;
end;
Gruß,
Akut-Programming
be cool, be hot ... just be
  Mit Zitat antworten Zitat