[NEU] AddSupersedeWarning

27/12/2008 - 13:27 von Dietmar Vollmeier | Report spam
SUPERSEDE! - Dieses Posting ersetzt
<news:271208.132533.dcs4-d.612@news.vollmeier.at>

Servus allerseits!

Habe ein Script geschrieben was bei entsprechenden Postings einen
Supersede-Hinweis einfügt.

Hoppala, Link vergessen[tm] ;-)

Wer sowas benötigt, findet das Script hier:
http://4d.vollmeier.at/scripte/ereignisscripte/onbeforesendingmessage/addsupersedewarning.html


und tschüss,
Didi
"Flugzeuge sind interessant, haben aber keinerlei militàrischen Wert."
 

Lesen sie die antworten

#1 Hermann Hippen
27/12/2008 - 13:58 | Warnen spam
Hallo Dietmar,

Dietmar Vollmeier schrieb in d.c.s.4-d:

Habe ein Script geschrieben was bei entsprechenden Postings einen
Supersede-Hinweis einfügt.



Hübsch :-) Wenn du nichts dagegen hast, möchte ich das gerne, in
abgespeckter Form:

8<->8
Procedure SuperSedesHinweis(Msg:TStringList);
Var SS_Header:String;
Begin
SS_Header := BW_GetHeader(Msg.Text,'Supersedes:');
If SS_Header > '' Then
Begin
Msg.Insert(Msg.IndexOf('') + 1,'SUPERSEDE! - Dieses Posting ersetzt' + #13#10 +
SS_Header + #13#10);
End;
End;
8<->8

in das Swiss_Knife einbinden.


Cu,
Hermann Hippen.
ž' š°º€ø?žžžžž?ø€º°š 'ž
ø€º° '<http://4ds.siteboard.eu>' °º€ø
'ž '40tude-Dialog Scriptwerkstatt' ž'
ø€º°' ž ž ø€º°ššššššš°º€øšž ž '°º€ø

Ähnliche fragen