Dieses Script überprüft ausgehenden Nachrichten auf selber verursachte

• verschobene Unterstreichungen bei ganzen Wörtern

und korrigiert diese.

 

Name und Funktion

Include	:	{$I _i_MULTI_QuoteCorrection}
Funktionen	:	QuoteCorrection (Message); PCorrection (Message);

 

Einbindung

Generelle Infos zur Einbindung von INCLUDE-Files findest du hier.

Program OnBeforeSendingMessage;

{$I _i_MULTI_QuoteCorrection}

Function OnBeforeSendingMessage(
  Var   Message    : TStringlist;
  Const Servername : String;
  Const IsEmail    : Boolean
) : Boolean;

Begin

   PCorrection (Message);

End;  // Function OnBeforeSendingMessage()

Begin
End.

 

Download

QuoteCorrection v.2.0.2
18.01.2009  1.3 KB   4099