Hallo,
eine weitere Möglichkeit wäre die Verwendung einer (lokalen) Hilfsroutine:
Delphi-Quellcode:
procedure AddMissing (const aItem : string);
begin
if (not {SysUtils.}SameText(Customer_Info[1,28,1], aItem)) then
ComboBoxFirmenG.Items.Add(s);
end;
AddMissing ('Klein');
AddMissing ('Mittel');
AddMissing ('Groß');
Gruß Hawkeye