doppelte Einträge verhindern beim öffnen mit OpenDialog

[marabu]

Dann tritt slTmp an die Stelle von OpenDialog.Files:

Delphi-Quellcode:

with ListBox do
begin
  Items.BeginUpdate;
  for i := 0 to Pred(slTmp.Count) do
    if Items.IndexOf(slTmp[i]) < 0 then
      Items.Add(slTmp[i]);
  Items.EndUpdate;
end;

Gute Nacht

marabu