Mit diesem Script kannst du dir die References im Header übersichtlich gefaltet darstellen lassen.
z.B.:
Name und Funktion
Include | : | {$I _i_OBSavM_FoldReferences} |
Funktion | : | FoldReferences (Message); |
Einbindung
Generelle Infos zur Einbindung von INCLUDE-Files findest du hier.
Program OnBeforeSavingMessage; {$I _i_OBSavM_FoldReferences} Procedure OnBeforeSavingMessage ( Var Message : TStringlist; Const Servername : String; Const IsEmail : Boolean ); Begin If Message.Count = 0 Then Exit; FoldReferences (Message); End; Begin End.
Download
FoldReferences v.3.0.0 | ||
Dietmar Vollmeier Homepage 10.12.2008 1.37 KB 3330 |