Das Swiss_Knife_OBSAV.ds!

Das multifunktional ausgestattete Skript für das OnBeforeSavingMessage!


Seiteninhalt

Download

Swiss_Kife_OBSAV.ds ist ein multifunktional ausgestattetes Skript, daß zu seiner Anwendung im OnBeforeSavingMessage das Basis_Modul_Include.ds benötigt. Dieses Swiss_Kife_OBSAV.ds - UPDATE beinhaltet neben zahlreichen anderen Funktionen auch die überarbeiteten und verbesserten Funktionen der rechts im Block gelisteten Einzelskripte!

Hinweis 1 Sollte eines oder mehrere der weiter unten beschriebenen Skript - Funktionen bereits als Skript im OnBeforeSavingMessage aktiviert sein, so müssen deren Skript-Namen sowie die dazugehörigen Aufrufroutinen mit ' //' so deakivieren bzw. mit dem gleichnamigen Skript, da nicht mehr benötigt, ganz aus der Skriptverwaltung gelöscht werden.

Hinweis 2 Nach jeder vorgenommenen Änderung oder Anpassung im Skript selbst, muß dieses erneut gespeichert werden und unter Ereignisskripte muß das OnBeforeSavingMessage erneut kompiliert und ausgeführt werden. Das trifft auch für Änderungen und oder Anpassungen innerhalb des O-B-SavingMessage selbst zu!

Das Einbinden der Swiss_Kife_OBSAV.ds erfolgt denkbar einfach via " C&P " innerhalb des Explorer's im Verzeichnis von 40tude Dialog\....\scripte\custom => Eigene Skripte! Wichtig: Dialog muß bei diesem Vorgang geschlossen sein! Nach dem ersten Start (bei einer Neuinstallation) von Dialog Klickt man auf Einstellungen | Skriptverwaltung | Skripte neu laden. Das Swiss_Kife_OBSAV.ds muß noch in das Ereignisskript  OnBeforSavingMessage eingebunden, kompiliert und ausgeführt werden.Die vom Autor zum Download gepackte *.zip beinhaltet alle hierfür notwendigen Informationen.

Hinweis 3 Bei einer Neuinstallation von 40tude Dialog ergeben Swiss_Knife_OBSAV.ds zusammen mit Basis_Modul_Include.ds eine optimale Grundausstattung für das OnBeroreSavingMessage. User die beide Skripte in einen bereits bestehenden 40tude Dialog zusätzlich integrieren möchten, müssen, sofern vorhanden die oben in der Box benannten Skripte durch ein vorrangellten Doppelslash '//' für den Skriptnamen und der jeweiligen Aufrufroutine im OnBeforeSavingMessabe deaktivieren oder diese Skripte in Gänze aus der Skriptverwaltung löschen.


Anwenderspezifische Einstellungen im Swiss_Knife_OBSAV!

  • Das Swiss_Kife_OBSAV.ds enthält zur Zeit die Funktionen aus folgenden Einzelskripte:

 • - References_Header_falten_include: Funktionen aus dem Einzelskript sorgen dafür, daß (MID) References im Header untereinander gefaltet angezeigt werden können!


Ansicht aller References untereinander gefaltet!


  • References: <100307.140015.at.566.75.dlg@my-fqdn.de>
  • <100307.140159.at.567.13.dlg@my-fqdn.de>
  • <100307.140346.at.568.54.dlg@my-fqdn.de>
  • <100307.140529.at.569.69.dlg@my-fqdn.de>

 • - SW_QuoteCorrection_include: Funktionen aus dem Einzelskript sorgen für eine optimale Optik der News - Artikel. Überflüssige Qutezeichen ' > ' & ' >> ' in den Leerzeilen reinkommender Artikel werden automatisch gelöscht. Aber auch verunglückte Smilies werden korrigiert so das z.B. aus   ': -)'   ein   ':-)' wird.

In der Settings.ini, im Dialog Hauptverzeichnis, müssen zunächst folgende Eintragungen gemacht werden, falls nicht schon vorhanden, einfach per C&P unter [General] einfügen, danach Datei speichern und Dialog starten. Dieser Vorgang sollte nicht bei laufender Anwendung vorgenommen werden. Dialog muß, damit Änderungen in der Settings.ini wirksam werden können, geschlossen sein!

[General]
DeleteEmptyQuotedLines=1
DeleteEmptyQuotedLinesKeepEmptyLines=1



Hierzu eine kleine Illustration der Wirkungsweise!


Vorher!
  •  
  •   > Die
  •   >>
  •   >>> Quotezeichen
  •   >>>
  •   >>
  •   >> in den Leerzeilen
  •   >> sind optisch sehr störend
  •   >>
  •   > oder?
Nachher!
  •  
  •   > Die
  •  
  •   >>> Quotezeichen
  •  
  •  
  •   >> in den Leerzeilen
  •   >> sind plötzlich verschwunden
  •  
  •   > na prima! :-)





















Wird die Funktion für Quotecorrection im Swiss_Knife_OBSAV abgeschaltet, kann es zu solchen Quotes wie hier kommen '>  >>', also Leerzeichen zwischen den Quotezeichen, die zu fehlerhaften Darstellungen bei zusammengesetzten Links führt. Deshalb wurde die entsprechende Routine geändert. Funktioniert jetzt auch ohne. //Quotecorrection - gefixt 0112008 - 19:31


 • - LinkKlickbarMachen_Include Funktionen aus dem Einzelskript sorgen dafür, daß unterbrochene Links wieder korrekt und klickbar zusammengesetzt werden, Voraussetzung ist, daß der umbrochene Link in '<>' eingeschlossen ist!


 • - OjeBUG Beim Vorfinden des sogenannten 'OJE BUGs', wird dieser kenntlich und damit unwirksam gemacht.


 • - RemoveHeader_include Hier werden, wenn gewünscht, Header aller Art in reinkommenden Mails und oder News automatisch gelöscht! Außerdem hat der Autor mit diesem Update vom 02.02.09 noch eine zusätzliche Statistik - Funktion der gelöschten X-Header integriert. Im Dialog Hauptverzeichnis wird vom Skript automatisch die Datei *RemovedHeadersStat.dat* angelegt und gepflegt. In ihr werden die Header, die entfernt wurden, in alphabetischer Reihenfolge eingetragen. Hinter dem Header Namen sieht man die Zahl der durchgeführten Löschungen. Je nach eingetragen Header Namen kann der Inhalt der Datei, wie im unteren Beispiel gezeigt, aussehen.

Hinweis 4 Dieser Vorgang wird durch das Skript immer automatisch aktualisiert!

Hinweis 5 Damit mehr Header gelöscht werden können als es durch die Begrenzung der max. Stringlänge der im Skript unter *Header.CommaText :=* eingetragenen Header möglich war, wurde die Liste der zu löschenden Header, mit einem weiteren Update von 09.02.09 aus dem Kopf des Skripts in eine Datei *HEadersToRemove.Dat*, die in das Dialog Hauptverzeichnis kopieren werden muß, ausgelagert. In dieser Datei kann man nun beliebig viele Header untereinander, immer ein Header Name pro Zeile, eintragen. In der Zip ist das geänderte Skript und eine vorgefertigte Datei mit ein paar Beipiel - Einträgen enthalten.



RemovedHeadersStat.dat!
Statistik der gelöschten Header!
  • Cancel-Lock:=4
  • X-Antivirus:=1
  • X-Comment-To:=5
  • X-CustomScript:=1
  • X-KorrNews:=2
  • X-PGP-Hash:=1
  • X-PGP-Sig:=2
  • X-Windows-Version:=2
HEadersToRemove.Dat!
Header die gelöscht werden sollen!
  • Organization:
  • X-Anonymous:
  • X-Antivirus-Status:
  • X-Complaints-Italiano:
  • X-Complaints-Language:
  • X-Post-Message-ID:
  • X-Sig-Permission:
  • X-WBNR-Posting-Host:






















 • - Verfügbarkeit:



// Hier können einzelne Programmteile zu- oder abgeschaltet werden.
     Procedure SK_Init(Var QuoteCorrection, RefHeaderFalten, OjeBUG:Boolean);
      Begin 
// True schaltet Funktion an - False schaltet Funktion ab
           QuoteCorrection       := True;
           RefHeaderFalten       := True; 
           OjeBUG                := True;
           LinkKlickbarMachen    := True;
           Headerentfernen       := True;
	End;

Hinweis 6 Das Swiss_Knife_OBSAV.ds benötigt das jeweils neueste Basis_Module_Include.ds - UPDATE!

Hinweis 7 In den Eigenschaften der (Desktop) Verknüpfung, über die Dialog aufgerufen wird, bei'Ausführen in:' muß der Pfad zum 40tude Dialog Verzeichnis mit abschliessendem Backslash '\' eingegeben werden. Ist im Pfadnamen ein Leerzeichen vorhanden, so muss der Pfadname, in Anführungszeichen angegeben werden. Bei einer Neuinstallation von Dialog, wird der Eintrag in 'Ausführen in:' leider nicht automatisch eingetragen, er muß also daher ggf manuell, z.B.: "N:\Programme\40tude Dialog\", nachgeholt werden! Bei eventuellen Problemen empfehle ich sich vertrauensvoll an die immer hilfsbereite de.comm.software.40tude-dialog zur Lösung des jeweiligen Problems zu wenden.


nach oben

border=0    border=0    border=0

This document maintained by Copyright © Karl-Heinz Rademacher        Contact Raady