If Anweisungen verkleinern

[jfheins]

In diesem Fall dann halt so:

Delphi-Quellcode:

ComboBoxFirmenG.Text := Customer_Info[1,28];

  if Customer_Info[1,28] = 'Klein' then
    Include(Sizes, ciKlein)
  else if Customer_Info[1,28] = 'Mittel' then
    Include(Sizes, ciMittel)
  else if Customer_Info[1,28] = 'Groß' then
    Include(Sizes, ciGroß);


  if not (ciKlein in Sizes) then
    ComboBoxFirmenG.Items.Add('Klein');
  if not (ciMittel in Sizes) then
    ComboBoxFirmenG.Items.Add('Mittel');
  if not (ciGroß in Sizes) then
    ComboBoxFirmenG.Items.Add('Groß');

Sinnvoller wäre es dennoch, direkt die passenden Typen zu verwenden ...