Optionale Parameter

[Borschti]

Hallo,

sorry das ich den alten Thread wieder ausgrabe aber mein Problem bezieht sich auf das oben genannte Overload, sprich überladen von Methoden.

Ich habe es so versucht:

Delphi-Quellcode:

procedure TOutlookPro.SendEmail(body : String; slAttPaths : TStringlist); overload;
var
  outlookApp : TOutlookApplication;
  mailItem : Variant;
  i : Integer;
begin
  outlookApp := TOutlookApplication.Create(Self);

  mailItem := OutlookApp.CreateItem(olMailItem);
  mailItem.Recipients.Add('[e-mail]');
  mailItem.Subject := 'Supportanfrage bsMIO';
  mailItem.Body := body;

  for i := 0 to slAttPaths.Count do
    begin
      mailItem.Attachments.Add(slAttPaths[i]);
    end;
    
  mailItem.Send;
end;

procedure TOutlookPro.SendEmail(body : String); overload;
var
  outlookApp : TOutlookApplication;
  mailItem : Variant;
begin
  outlookApp := TOutlookApplication.Create(Self);

  mailItem := OutlookApp.CreateItem(olMailItem);
  mailItem.Recipients.Add('[e-mail]');
  mailItem.Subject := 'Supportanfrage bsMIO';
  mailItem.Body := body;
  mailItem.Send;
end;

Ich bekomme aber jetzt die Meldung: E1030 Ungültige Compileranweisung: 'OVERLOAD'
Woran liegt das und wie bekomme ich die Meldung weg?

VG Alex