COM - For-Each in Delphi, aber wie?

[DeddyH]

Es scheint sich ja um ein Array oder eine TList o.ä. zu handeln. Könnte man nicht einfach mit einer "ganz normalen" For-Schleife durchgehen?

Delphi-Quellcode:

var
  oRecipients: Addresses;
  oRecipient: Address;
  i: integer;
begin
  {...}
  if oMailItem.Recipients.Count > 0 then begin
     oRecipients := oMailItem.Recipients;     
     for i := 0 to Pred(oRecipients.Count) do
     begin
       oRecipient := oRecipients[i] as Address;
       //irgendwas machen  
     end;   
  end;
  {...}

Allerdings übernehme ich keine Haftung , einfach mal ausprobieren.