14 lines
920 B
VB.net
14 lines
920 B
VB.net
Namespace Stammbaum.Settings
|
|
Namespace PictureTagger
|
|
Module PictureTagger
|
|
Public Pub_oLoaded_TaggedIMG As New Stammbaum.Classen.PictureTagger.TaggedIMG
|
|
Public Pub_sPath As String 'Pfad des Aktuell Arbeits Verzeichnises
|
|
Public pub_aPfade(0) As String 'Array mit den Photo Pfaden
|
|
Public pub_nPfadeIndex As Long = 0 'IndexNR des aktuell Geladenen Photos aus pub_aPfade
|
|
Public pub_bChangeTagg As Boolean = False 'Wenn ein Tagg geänderd wird:= True bis SaveTagg()
|
|
Public pub_aConfigForm(0) As String 'Array mit FormConfiguration
|
|
Public pub_aSupportedFiles(0) As String 'Speichert die Unterstützten Extentions
|
|
Public nOrdnerTiefe As Integer = 0 'Recursive Ordnertiefe beim Ordnereinlesen
|
|
End Module
|
|
End Namespace
|
|
End Namespace |