a protected variable of the object would suffice, so experienced users
could do a hack typecast to access it, if for some reason somebody
dont wont the value to be easily accessible.
rgn> good to know but thats not the clean way.
rgn> and needs some additional cpu cycles on every headerline of course.
rgn> best regards, retnyg
AG>> [EMAIL PROTECTED] wrote:
>>> pls make it a property, so we dont have to mess around in ICS source
>>> on every new release.
AG>> There's an event OnHeaderLine. No need to add a new property.
AG>> procedure TMySmtp.SmtpHeaderLine(Sender: TObject;
AG>> Msg: Pointer; Size: Integer);
AG>> begin
AG>> if StrLIComp(Msg, 'X-Mailer:', 9) = 0 then
AG>> StrCopy(Msg, PChar('X-Mailer: MyMailer - www.mymailer.de'));
AG>> end;
AG>> ---
AG>> Arno Garrels [TeamICS]
AG>> 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
