[EMAIL PROTECTED] wrote:
> pls make it a property, so we dont have to mess around in ICS source
> on every new release.

There's an event OnHeaderLine. No need to add a new property.

procedure TMySmtp.SmtpHeaderLine(Sender: TObject;
  Msg: Pointer; Size: Integer);
begin
    if StrLIComp(Msg, 'X-Mailer:', 9) = 0 then
        StrCopy(Msg, PChar('X-Mailer: MyMailer - www.mymailer.de'));
end;

---
Arno Garrels [TeamICS]
http://www.overbyte.be/eng/overbyte/teamics.html


> best regards, retnyg
-- 
To unsubscribe or change your settings for TWSocket mailing list
please goto http://www.elists.org/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be

Reply via email to