Hier eine mögliche Vorgehensweise:
Delphi-Quellcode:
procedure TForm1.TableAfterPost(DataSet: TDataSet);
begin
with DBComboBox do
if Items.IndexOf(Field.AsString) < 0 then
Items.Add(Field.AsString);
end;
Die Eigenschaft Sorted der ComboBox sollte dabei TRUE sein.
marabu