Hallo,
folgendes Problem:
ich habe die TDBComboBox mit AutoComplete auf meiener Form und möchte nun, dass wenn ich ein Kleinbuchstabe "a" eingebe, dieses zu ABC ergänzt wird, wie es in der
DB steht, es wird aber zu "aBC" ergänzt.
Meine Idee war folgende: Beim Verlassen der Box soll geschaut werden, ob es einen Eintrag in der Box schon gibt, und wenn ja, genau dieser übernommen werden.
Das funktioniert auch, wird aber so nicht in der
DB abgelegt. In meiner DBComboBox wird zwar der Text gesetzt, aber nicht der Eintrag in der
DB aktualisiert.
Delphi-Quellcode:
procedure TForm1.DBComboBox1Exit(Sender: TObject);
begin
if (Sender as TDBComboBox).Items.IndexOf((Sender as TDBComboBox).Text) > -1 then
(Sender as TDBComboBox).Text:= (Sender as TDBComboBox).Items.Strings[
(Sender as TDBComboBox).Items.IndexOf((Sender as TDBComboBox).Text)];
end;
Was könnt ich da machen?
Folgendes funktioniert aber mit einer TDBMemoBox wie gewollt -was ist da der Unterschied?
Delphi-Quellcode:
procedure TForm1.DBMemo1Exit(Sender: TObject);
begin
(Sender as TDBMemo).Text:= StringReplace ((Sender as TDBMemo).Text, '","', ''',''', [rfReplaceAll]);
end;
Danke Tim