Hat mir ja keine Ruhe gelassen.
Für den Anfrang mal ein mini Templategenerator.
Datei Compilieren und speichern
Ausführbare Datei in PB unter Werkzeuge einbinden und mit beliebiger Tastenkombination verknüpfen
Nach Aufruf der Tastenkombination mit Strg+V das Template an aktuellen Cursorposition einfügen
Code: Alles auswählen
; ====================================
; Comment Addon
; Author : menschmarkus
; Date : 24.07.2019
; PB : PB 5.70 LTS (x86)
; Licence: zur freien Verwendung
; ohne Gewährleistung auf Funktion
; ====================================
Procedure CommentAddon()
Protected Query.s, found.i=0, addondir.s, filelen.i
;{ ===== Temporäres Verzeichnis ermitteln, ggf. erzeugen =====
If ExamineEnvironmentVariables()
While NextEnvironmentVariable()
If EnvironmentVariableName() = "TEMP"
Query = EnvironmentVariableValue()
found = 1
Break
EndIf
Wend
EndIf
If found = 0
MessageRequester("Fehler","Konnte temporäres Verzeichnis nicht finden",#MB_ICONERROR)
End
EndIf
;}
;{ ===== Addon Verzeichnis ermitteln, ggf. erzeugen =====
found = 0
addondir = Query
SetCurrentDirectory(addondir)
If ExamineDirectory(0,addondir,"")
While NextDirectoryEntry(0)
Select DirectoryEntryType(0)
Case 2
If DirectoryEntryName(0) = "PB_Addon"
found = 1
addondir + "\PB_Addon"
SetCurrentDirectory(addondir)
Break
EndIf
EndSelect
Wend
EndIf
FinishDirectory(0)
;}
;{ ===== Addon Verzeichnis erzeugen falls nicht vorhanden.
; Falls nicht vorhanden, Basisdatei erstellen.
; Falls vorhanden, Basisdatei einlesen =====
If found = 0
addondir + "\PB_Addon"
If CreateDirectory(addondir)
SetCurrentDirectory(addondir)
If CreateFile(0,"comment.addon")
WriteStringN(0,";<comment>")
WriteStringN(0,"; <summary></summary>")
WriteStringN(0,"; <param></param>")
WriteStringN(0,"; <return></return>")
WriteStringN(0,"; <example></example>")
WriteStringN(0,";</comment>")
CloseFile(0)
EndIf
EndIf
Else
ReadFile(0,addondir + "\comment.addon")
filelen = Lof(0)
SetClipboardText(ReadString(0,#PB_File_IgnoreEOL,filelen))
CloseFile(0)
EndIf
;}
EndProcedure
CommentAddon()
Ach ja, im Temp Verzeichnis kann die Datei "comment,addon" auch manuell nach eigenem Ermessen nachträglich editiert werden
Viel Vergnügen damit