Hallo Rolf, ich mach das so
Delphi-Quellcode:
procedure TForm1.fillcb;
var
Progdir: string;
CBList: TStringlist;
begin
ProgDir := ExtractFilePath(ParamStr(0));
CBList := TStringlist.create;
with CBList do
begin
Sorted := True;
Duplicates := dupIgnore;
CBList.LoadFromFile(progdir + 'anrufer.dat');
CBAnrufer.Items.Addstrings(CBList);
end;
CBList.Free
end;
CBAnrufer ist die Combobox,i ch lade die Daten aus der
anrufer.dat, die eine normale editierbare Textdatei ist.
Gruß Schubi