[Delphi 5] DBGrid, Picklist

Hai Experten,

ich habe ein DBGrid mit einer Picklist in einer Spalte. Wie kann ich einen neuen Eintrag in die Picklist übernehmen, natürlich an der richtigen Stelle (alphabetisch sortiert sozusagen :wink: ). Also praktisch einen selbstlernende Liste.

Hoffe auf Hilfe!

Gruß Silvia

procedure TForm1.Table1AfterPost(DataSet: TDataSet);
var NewEntry: String;
i: Integer;
begin
NewEntry:=Dataset.FieldByName(‚Name‘).AsString;
//willkürlich gewählt
with DBGrid1.Columns[0].PickList do
begin
if IndexOf(NewEntry)= -1 then
begin
i:=0;
while i