Merge branch 'master' of http://dd-vmp07-com04:3000/SchreiberM/GlobalIndexer
This commit is contained in:
commit
bcade3f031
@ -104,6 +104,9 @@ Public Class ClassControls
|
||||
If ClassPatterns.HasComplexPatterns(oSql) Then
|
||||
LOGGER.Debug(" >>sql enthält Platzhalter und wird erst während der Laufzeit gefüllt!", False)
|
||||
Else
|
||||
oSql = ClassPatterns.ReplaceInternalValues(oSql)
|
||||
oSql = ClassPatterns.ReplaceUserValues(oSql, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_LANGUAGE, USER_EMAIL, USER_ID, CURRENT_DOKART_ID)
|
||||
|
||||
Dim oDatatable = ClassDatabase.Return_Datatable_Combined(oSql, oConnectionString, False)
|
||||
oControl.DataSource = oDatatable
|
||||
End If
|
||||
@ -416,7 +419,6 @@ Public Class ClassControls
|
||||
oControlSql = ClassPatterns.ReplaceInternalValues(oControlSql)
|
||||
oControlSql = ClassPatterns.ReplaceControlValues(oControlSql, Panel)
|
||||
|
||||
|
||||
LOGGER.Debug("SQL After Preparing: [{0}]", oControlSql)
|
||||
LOGGER.Debug("Setting new value for [{0}]", oControlName)
|
||||
SetDependingControlResult(oControlName, oControlSql, oConnectionId)
|
||||
|
||||
@ -1,341 +0,0 @@
|
||||
Imports System.IO
|
||||
Imports System.Text
|
||||
|
||||
Public Class ClassHotkey_Windream
|
||||
Private Declare Function GetForegroundWindow Lib "user32" Alias "GetForegroundWindow" () As IntPtr
|
||||
Private Declare Auto Function GetWindowText Lib "user32" (ByVal hWnd As System.IntPtr, ByVal lpString As System.Text.StringBuilder, ByVal cch As Integer) As Integer
|
||||
|
||||
Private Declare Function ShowWindow Lib "user32" (ByVal handle As IntPtr, ByVal nCmdShow As Integer) As Integer
|
||||
Private Declare Function SetForeGroundWindow Lib "user32" (ByVal Hwnd As IntPtr) As Integer
|
||||
|
||||
Private makel As String
|
||||
Public Shared Function GetCaption() As String
|
||||
Dim Caption As New System.Text.StringBuilder(256)
|
||||
Dim hWnd As IntPtr = GetForegroundWindow()
|
||||
GetWindowText(hWnd, Caption, Caption.Capacity)
|
||||
Return Caption.ToString()
|
||||
End Function
|
||||
|
||||
Private Shared fileContents As String
|
||||
Private Shared Function IsRelevantWindow(windowname As String, myControlNo As Integer, Value As String)
|
||||
Try
|
||||
Dim Control_Sequence As Integer = 0
|
||||
Dim enumerator1 As New ClassWindowAPI
|
||||
'Jedes Formularwindow durchlaufen
|
||||
For Each top As ClassWindowAPI.ApiWindow In enumerator1.GetTopLevelWindows()
|
||||
LOGGER.Info(" ... top-window Name: " & top.MainWindowTitle)
|
||||
If top.MainWindowTitle.Contains(windowname) Or top.MainWindowTitle.ToLower = windowname.ToLower Then
|
||||
Control_Sequence = 0
|
||||
For Each vControl As ClassWindowAPI.ApiWindow In enumerator1.GetChildWindows(top.hWnd)
|
||||
|
||||
If vControl.MainWindowTitle <> "" Then
|
||||
If Control_Sequence = myControlNo Then
|
||||
If Value.ToUpper = vControl.MainWindowTitle.ToUpper Then
|
||||
Return True
|
||||
Else
|
||||
LOGGER.Info(" ... Control-Sequence: " & myControlNo.ToString & " entspricht nicht dem Matchvalue.")
|
||||
Return False
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
Control_Sequence += 1
|
||||
Next vControl
|
||||
Return False
|
||||
End If
|
||||
Next top
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in IsRelevantWindowt:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
LOGGER.Info(">> Error in IsRelevantWindow:" & ex.Message)
|
||||
Return False
|
||||
End Try
|
||||
End Function
|
||||
Private Shared Function Get_windowContent(windowname As String, myControlID As Integer)
|
||||
Try
|
||||
Dim Control_Sequence As Integer = 0
|
||||
Dim enumerator1 As New ClassWindowAPI
|
||||
'Jedes Formularwindow durchlaufen
|
||||
For Each top As ClassWindowAPI.ApiWindow In enumerator1.GetTopLevelWindows()
|
||||
If top.MainWindowTitle.Contains(windowname) Or top.MainWindowTitle.ToLower = windowname.ToLower Then
|
||||
Control_Sequence = 0
|
||||
For Each vControl As ClassWindowAPI.ApiWindow In enumerator1.GetChildWindows(top.hWnd)
|
||||
If vControl.MainWindowTitle <> "" Then
|
||||
If Control_Sequence = myControlID Then
|
||||
LOGGER.Info(" ... Control-Sequence: " & myControlID.ToString & " - Gelesener Wert: " & vControl.MainWindowTitle)
|
||||
Return vControl.MainWindowTitle.ToString
|
||||
End If
|
||||
End If
|
||||
Control_Sequence += 1
|
||||
Next vControl
|
||||
Return Nothing
|
||||
End If
|
||||
Next top
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Get_windowContent:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
LOGGER.Info(">> Error in Get_windowContent:" & ex.Message)
|
||||
Return Nothing
|
||||
End Try
|
||||
End Function
|
||||
'Fenster position ermitteln/auslesen
|
||||
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Integer
|
||||
Private Declare Function GetWindowRect Lib "user32.dll" (ByVal hWnd As IntPtr, ByRef lpRect As RECT) As Int32
|
||||
Private Structure RECT
|
||||
Dim Left As Integer
|
||||
Dim Top As Integer
|
||||
Dim Right As Integer
|
||||
Dim Bottom As Integer
|
||||
End Structure
|
||||
Private Shared Sub GetWindowClientSize(ByVal hWnd As Long)
|
||||
Dim rc As RECT
|
||||
GetWindowRect(hWnd, rc)
|
||||
'Left = rc.Right - rc.Left
|
||||
'Height = rc.Bottom - rc.Top
|
||||
End Sub
|
||||
Public Shared Function RUN_WD_SEARCH(HK_USR_PROFILE_ID As Integer)
|
||||
Try
|
||||
LOGGER.Info(" ...RUN_WD_SEARCH with HK_USR_PROFILE_ID '" & HK_USR_PROFILE_ID & "'")
|
||||
Dim DTWD As DataTable
|
||||
Dim Objecttype As String
|
||||
Dim windowname As String
|
||||
Dim HKPROFILE_ID As Integer
|
||||
Dim type As String
|
||||
|
||||
|
||||
Dim _sql = "SELECT WD_SEARCH,HKPROFILE_ID FROM TBHOTKEY_USER_PROFILE WHERE GUID = " & HK_USR_PROFILE_ID
|
||||
DTWD = ClassDatabase.Return_Datatable(_sql)
|
||||
If DTWD.Rows.Count = 0 Then
|
||||
LOGGER.Info(" ...KEINE USER_PROFILES hinterlegt")
|
||||
Return "Uncexpected Error in Hotkey - Check Log for Hotkey"
|
||||
End If
|
||||
If DTWD.Rows.Count > 1 Then
|
||||
LOGGER.Info("Das Ergebnis von '" & _sql & "' liefert mehr als eine Zeile zurück!")
|
||||
Return "Uncexpected Error in Hotkey - Check Log for Hotkey"
|
||||
End If
|
||||
If DTWD.Rows(0).Item(0) = "" Then
|
||||
LOGGER.Info(">> KEINE Windream-Suche hinterlegt!")
|
||||
Return "Error in Hotkey - KEINE Windream-Suche hinterlegt - Check Logkey"
|
||||
End If
|
||||
Dim BaseSearch = DTWD.Rows(0).Item(0)
|
||||
Dim extension = Path.GetExtension(BaseSearch)
|
||||
HKPROFILE_ID = DTWD.Rows(0).Item("HKPROFILE_ID")
|
||||
Dim windream_temp_search As String = ""
|
||||
If IO.File.Exists(BaseSearch) = False Then
|
||||
LOGGER.Info("Die Windream-Suche existiert nicht oder ist nicht zugreifbar!")
|
||||
|
||||
If USER_LANGUAGE = "de-DE" Then
|
||||
MsgBox("Die Windream-Suche existiert nicht oder ist nicht zugreifbar!", MsgBoxStyle.Critical)
|
||||
Else
|
||||
MsgBox("Windream-Search does not exist or is not accessible", MsgBoxStyle.Critical)
|
||||
End If
|
||||
|
||||
Return Nothing
|
||||
End If
|
||||
windowname = ClassDatabase.Execute_Scalar("SELECT WINDOW_NAME FROM TBHOTKEY_PROFILE WHERE GUID = " & HKPROFILE_ID, MyConnectionString, True)
|
||||
type = ClassDatabase.Execute_Scalar("SELECT OBJECTTYPE FROM TBHOTKEY_PROFILE WHERE GUID = " & HKPROFILE_ID, MyConnectionString, True)
|
||||
fileContents = ""
|
||||
|
||||
'Eine tempfile generieren
|
||||
Dim tempFilename1 = My.Computer.FileSystem.GetTempFileName()
|
||||
'Nur den Filenamen ohne Erweiterung
|
||||
Dim tempName = Path.GetFileNameWithoutExtension(tempFilename1)
|
||||
'tempfile löschen
|
||||
If My.Computer.FileSystem.FileExists(tempFilename1) Then
|
||||
My.Computer.FileSystem.DeleteFile(tempFilename1)
|
||||
End If
|
||||
|
||||
Dim temppath = Path.GetTempPath
|
||||
|
||||
Dim EncodingFormat As Encoding
|
||||
Dim WDUnicode = ClassDatabase.Execute_Scalar("SELECT WD_UNICODE FROM TBGI_CONFIGURATION WHERE GUID = 1", MyConnectionString, True)
|
||||
If WDUnicode = True Then
|
||||
EncodingFormat = Encoding.GetEncoding(1252) '1252
|
||||
LOGGER.Info(" ...Unicode is used (Encoding.GetEncoding(1252))")
|
||||
Else
|
||||
LOGGER.Info(" ...UTF8 (Encoding.GetEncoding(65001))")
|
||||
EncodingFormat = Encoding.GetEncoding(65001)
|
||||
End If
|
||||
|
||||
Dim DT_HOOKS As DataTable = ClassDatabase.Return_Datatable("select * from TBHOTKEY_WINDOW_HOOK where HKPROFILE_ID = " & HKPROFILE_ID, True)
|
||||
If DT_HOOKS.Rows.Count > 0 Then
|
||||
Dim RelevantWindow As Boolean = False
|
||||
For Each row As DataRow In DT_HOOKS.Rows
|
||||
RelevantWindow = IsRelevantWindow(windowname, row.Item("SEQUENCE_NUMBER"), row.Item("CONTROL_VALUE"))
|
||||
If RelevantWindow = False Then
|
||||
LOGGER.Info(" ...Not the relevant window")
|
||||
Return "Not the Relevant window......"
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
|
||||
|
||||
LOGGER.Info(" ...ReadAlltext: " & BaseSearch)
|
||||
fileContents = My.Computer.FileSystem.ReadAllText(BaseSearch, EncodingFormat) ', System.Text.Encoding.Unicode
|
||||
LOGGER.Info(" ...fileContents geladen")
|
||||
fileContents = fileContents.Replace("Í", "Ö")
|
||||
'Das Array für die PAtterns anpassen
|
||||
_sql = "select * from TBHOTKEY_PATTERNS WHERE HKPROFILE_ID = " & HKPROFILE_ID
|
||||
Dim DT_PATTERNS As DataTable = ClassDatabase.Return_Datatable(_sql, True)
|
||||
If DT_PATTERNS.Rows.Count > 0 Then
|
||||
Dim i As Integer = 0
|
||||
For Each row As DataRow In DT_PATTERNS.Rows
|
||||
If type = "COPYPASTE" Then
|
||||
_sql = "select window_control from TBHOTKEY_PATTERNS where HKPROFILE_ID = " & HKPROFILE_ID
|
||||
Dim copytype = ClassDatabase.Execute_Scalar(_sql, MyConnectionString, True)
|
||||
Dim clipbrd
|
||||
Dim theHandle As IntPtr = FindWindow(Nothing, CURRENT_FOCUSES_WINDOWNAME)
|
||||
If theHandle <> IntPtr.Zero Then
|
||||
Dim theForegroundWindow As Boolean = SetForeGroundWindow(theHandle)
|
||||
If theForegroundWindow = True Then
|
||||
Select Case copytype
|
||||
Case "strgC"
|
||||
' SetForeGroundWindow(HWND)
|
||||
SendKeys.Send("^{c}") 'for Ctrl-C
|
||||
|
||||
Case "strA and strgC"
|
||||
SendKeys.Send("^{A}")
|
||||
'AppActivate(CURRENT_FOCUSES_WINDOWNAME)
|
||||
SendKeys.Send("^{c}") 'for Ctrl-C
|
||||
End Select
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
|
||||
clipbrd = Clipboard.GetText
|
||||
Console.WriteLine(clipbrd.ToString)
|
||||
If Not clipbrd Is Nothing Then
|
||||
If clipbrd <> "" Then
|
||||
_sql = "select PATTERN_WDSEARCH from TBHOTKEY_PATTERNS where HKPROFILE_ID = " & HKPROFILE_ID
|
||||
Dim _pattern = ClassDatabase.Execute_Scalar(_sql, MyConnectionString, True)
|
||||
fileContents = fileContents.Replace(_pattern, clipbrd.ToString)
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
Else
|
||||
LOGGER.Info(" ...Get Value for Control# '" & row.Item("SEQUENCE_NUMBER").ToString & "'")
|
||||
Dim foundresult = Get_windowContent(windowname, row.Item("SEQUENCE_NUMBER").ToString)
|
||||
If Not IsNothing(foundresult) Then
|
||||
'Die Nachbearbeitungsschritte laden
|
||||
Dim DTNB As DataTable = ClassDatabase.Return_Datatable("SELECT * FROM TBHOTKEY_PATTERNS_REWORK WHERE HKPATTERN_ID = " & row.Item("GUID") & " ORDER BY SEQUENCE")
|
||||
If DTNB Is Nothing = False Then
|
||||
If DTNB.Rows.Count > 0 Then
|
||||
foundresult = ClassPostprocessing.Get_Nachbearbeitung_Wert(foundresult, DTNB)
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
If Not IsNothing(foundresult) Then
|
||||
If foundresult.ToString = "<" Or foundresult.ToString = ">" Then
|
||||
LOGGER.Info(">> Hot Key received an irregular value.")
|
||||
Return "Hotkey konnte nur einen irregulären Wert auswerten."
|
||||
End If
|
||||
LOGGER.Info(" ...fileContents.length: " & fileContents.Length)
|
||||
LOGGER.Info(" ...Replace pattern '" & row.Item(2).ToString & "' with '" & foundresult & "'")
|
||||
fileContents = fileContents.Replace(row.Item(2).ToString, foundresult)
|
||||
LOGGER.Info(" ...fileContents.length: " & fileContents.Length)
|
||||
Else
|
||||
LOGGER.Info(">> Hot Key could not read any value.")
|
||||
Return "Hotkey konnte keinen Wert auswerten - Evtl. ist das konfigurierte Fenster nicht geöffnet?"
|
||||
End If
|
||||
End If
|
||||
|
||||
Next
|
||||
End If
|
||||
Try
|
||||
'Die windream File zusammensetzen
|
||||
windream_temp_search = temppath & tempName & extension
|
||||
Try
|
||||
'Die File schreiben
|
||||
My.Computer.FileSystem.WriteAllText(windream_temp_search, fileContents, False, EncodingFormat)
|
||||
LOGGER.Info(" ...wrote Text to windream_temp_search: " & windream_temp_search)
|
||||
' XML-Datei öffnen und laden
|
||||
Dim Stream As New IO.StreamReader(CStr(windream_temp_search), EncodingFormat)
|
||||
Dim Reader As New System.Xml.XmlTextReader(Stream)
|
||||
|
||||
' XML-Datei initialisieren
|
||||
Dim xml As New System.Xml.XmlDocument()
|
||||
' XML-Datei öffnen und laden
|
||||
xml.Load(Reader)
|
||||
Reader.Close()
|
||||
xml.Save(windream_temp_search)
|
||||
LOGGER.Info(" ...Xml Generiert: " & windream_temp_search)
|
||||
Catch ex As Exception
|
||||
LOGGER.Info("TempFile could not be created: " & ex.Message)
|
||||
LOGGER.Error(ex.Message)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected Error in Write XmlSearch:")
|
||||
End Try
|
||||
|
||||
CURRENT_WD_TEMPSEARCH = windream_temp_search
|
||||
TEMP_FILES.Add(CURRENT_WD_TEMPSEARCH)
|
||||
Try
|
||||
Dim myhWnd As IntPtr
|
||||
Dim p As New Process()
|
||||
p.StartInfo.FileName = windream_temp_search
|
||||
|
||||
If CONFIG.Config.WindreamSearchMaximized Then
|
||||
p.StartInfo.WindowStyle = ProcessWindowStyle.Maximized
|
||||
Else
|
||||
p.StartInfo.WindowStyle = ProcessWindowStyle.Normal
|
||||
End If
|
||||
p.Start()
|
||||
|
||||
myhWnd = p.MainWindowHandle
|
||||
Threading.Thread.Sleep(1000)
|
||||
Dim rctMain As RECT
|
||||
GetWindowRect(p.MainWindowHandle, rctMain)
|
||||
If LogErrorsOnly = False Then
|
||||
LOGGER.Info(" ...Top-Position: " & rctMain.Top.ToString)
|
||||
LOGGER.Info(" ...Left-Position: " & rctMain.Left.ToString)
|
||||
LOGGER.Info(" ...Right-Position: " & rctMain.Right.ToString)
|
||||
LOGGER.Info(" ...Bottom-Position: " & rctMain.Bottom.ToString)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error while executing windream-Search:")
|
||||
LOGGER.Info("Unexpected error while executing search: " & ex.Message)
|
||||
Return "Unexpected error while executing search"
|
||||
End Try
|
||||
Dim psList() As Process
|
||||
Try
|
||||
psList = Process.GetProcesses()
|
||||
|
||||
For Each p As Process In psList
|
||||
Console.WriteLine(p.Id.ToString() + " " + p.ProcessName)
|
||||
If p.ProcessName.Contains("indream.Find") Then
|
||||
AppActivate(p.Id)
|
||||
If CONFIG.Config.WindreamSearchMaximized = False Then
|
||||
Dim rctMain As RECT
|
||||
GetWindowRect(p.MainWindowHandle, rctMain)
|
||||
If rctMain.Left = 0 Or rctMain.Right = 0 Then
|
||||
ShowWindow(p.MainWindowHandle, 3) ' SW_MAXIMIZE
|
||||
End If
|
||||
End If
|
||||
' SetForeGroundWindow( p.MainWindowHandle)
|
||||
End If
|
||||
|
||||
Next p
|
||||
|
||||
Catch ex As Exception
|
||||
LOGGER.Info("Unexpected error while Setting foreground: " & ex.Message)
|
||||
LOGGER.Error(ex.Message)
|
||||
End Try
|
||||
Return ""
|
||||
Catch ex As Exception
|
||||
LOGGER.Info("Unexpected error in Create Search: " & ex.Message)
|
||||
LOGGER.Error(ex.Message)
|
||||
MsgBox("Error in Create Search:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Return "Unexpected error in Create Search"
|
||||
End Try
|
||||
|
||||
Catch ex As Exception
|
||||
LOGGER.Info("Unexpected error in RUN_WD_SEARCH: " & ex.Message)
|
||||
LOGGER.Error(ex.message)
|
||||
MsgBox("Error in RUN_WD_SEARCH:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Return "Unerwarteter Unexpected error in RUN_WD_SEARCH"
|
||||
End Try
|
||||
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
|
||||
End Class
|
||||
@ -13,6 +13,8 @@
|
||||
<MyType>WindowsForms</MyType>
|
||||
<TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
|
||||
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
|
||||
<IsWebBootstrapper>false</IsWebBootstrapper>
|
||||
<TargetFrameworkProfile />
|
||||
<PublishUrl>publish\</PublishUrl>
|
||||
<Install>true</Install>
|
||||
<InstallFrom>Disk</InstallFrom>
|
||||
@ -25,10 +27,8 @@
|
||||
<MapFileExtensions>true</MapFileExtensions>
|
||||
<ApplicationRevision>0</ApplicationRevision>
|
||||
<ApplicationVersion>1.0.0.%2a</ApplicationVersion>
|
||||
<IsWebBootstrapper>false</IsWebBootstrapper>
|
||||
<UseApplicationTrust>false</UseApplicationTrust>
|
||||
<BootstrapperEnabled>true</BootstrapperEnabled>
|
||||
<TargetFrameworkProfile />
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||
@ -63,7 +63,7 @@
|
||||
<OptionInfer>On</OptionInfer>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ApplicationIcon>DD_Icons_ICO_GLOBIX_128.ico</ApplicationIcon>
|
||||
<ApplicationIcon>Resources\DD_Icons_ICO_GLOBIX_128.ico</ApplicationIcon>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ApplicationManifest>My Project\app.manifest</ApplicationManifest>
|
||||
@ -246,7 +246,6 @@
|
||||
<Compile Include="ClassFolderWatcher.vb" />
|
||||
<Compile Include="ClassFormFunctions.vb" />
|
||||
<Compile Include="ClassHelper.vb" />
|
||||
<Compile Include="ClassHotkey_Windream.vb" />
|
||||
<Compile Include="ClassIDBData.vb" />
|
||||
<Compile Include="ClassIndexFunctions.vb" />
|
||||
<Compile Include="ClassInit.vb" />
|
||||
@ -289,18 +288,6 @@
|
||||
<Compile Include="frmHistory.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmHotKey_Add.Designer.vb">
|
||||
<DependentUpon>frmHotKey_Add.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="frmHotKey_Add.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmHotkey_User.Designer.vb">
|
||||
<DependentUpon>frmHotkey_User.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="frmHotkey_User.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmIndex.designer.vb">
|
||||
<DependentUpon>frmIndex.vb</DependentUpon>
|
||||
</Compile>
|
||||
@ -457,15 +444,6 @@
|
||||
<EmbeddedResource Include="frmHistory.resx">
|
||||
<DependentUpon>frmHistory.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmHotKey_Add.resx">
|
||||
<DependentUpon>frmHotKey_Add.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmHotkey_User.en-US.resx">
|
||||
<DependentUpon>frmHotkey_User.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmHotkey_User.resx">
|
||||
<DependentUpon>frmHotkey_User.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmIndex.en-US.resx">
|
||||
<DependentUpon>frmIndex.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
|
||||
@ -33,7 +33,7 @@ Imports System.Runtime.InteropServices
|
||||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("2.2.0.1")>
|
||||
<Assembly: AssemblyVersion("2.3.0.3")>
|
||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||
|
||||
<Assembly: NeutralResourcesLanguageAttribute("")>
|
||||
6919
Global_Indexer/MyDataset.Designer.vb
generated
6919
Global_Indexer/MyDataset.Designer.vb
generated
File diff suppressed because it is too large
Load Diff
@ -247,81 +247,6 @@
|
||||
</ColumnUISetting>
|
||||
</ColumnUISettings>
|
||||
</TableUISetting>
|
||||
<TableUISetting Name="TBHOTKEY_PROFILE">
|
||||
<ColumnUISettings>
|
||||
<ColumnUISetting Name="HOTKEY1">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
<ColumnUISetting Name="HOTKEY2">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
<ColumnUISetting Name="CHANGED_WHEN">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
</ColumnUISettings>
|
||||
</TableUISetting>
|
||||
<TableUISetting Name="TBHOTKEY_PATTERNS">
|
||||
<ColumnUISettings>
|
||||
<ColumnUISetting Name="ADDED_WHEN">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
<ColumnUISetting Name="CHANGED_WHEN">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
</ColumnUISettings>
|
||||
</TableUISetting>
|
||||
<TableUISetting Name="TBHOTKEY_USER_PROFILE">
|
||||
<ColumnUISettings>
|
||||
<ColumnUISetting Name="HOTKEY1">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
<ColumnUISetting Name="ADDED_WHEN">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
<ColumnUISetting Name="CHANGED_WHEN">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
</ColumnUISettings>
|
||||
</TableUISetting>
|
||||
<TableUISetting Name="TBHOTKEY_PATTERNS_REWORK">
|
||||
<ColumnUISettings>
|
||||
<ColumnUISetting Name="TYPE">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
<ColumnUISetting Name="CHANGED_WHEN">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
</ColumnUISettings>
|
||||
</TableUISetting>
|
||||
<TableUISetting Name="TBHOTKEY_WINDOW_HOOK">
|
||||
<ColumnUISettings>
|
||||
<ColumnUISetting Name="ADDED_WHEN">
|
||||
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
</ControlSetting></ControlSettings>
|
||||
</ColumnUISetting>
|
||||
</ColumnUISettings>
|
||||
</TableUISetting>
|
||||
<TableUISetting Name="TBGI_REGEX_DOCTYPE">
|
||||
<ColumnUISettings>
|
||||
<ColumnUISetting Name="DOCTYPE_ID">
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@ -4,39 +4,33 @@
|
||||
Changes to this file may cause incorrect behavior and will be lost if
|
||||
the code is regenerated.
|
||||
</autogenerated>-->
|
||||
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-22" ViewPortY="208" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
|
||||
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-10" ViewPortY="-11" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
|
||||
<Shapes>
|
||||
<Shape ID="DesignTable:TBDD_USER" ZOrder="8" X="765" Y="247" Height="305" Width="213" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
|
||||
<Shape ID="DesignTable:TBDD_DOKUMENTART" ZOrder="10" X="119" Y="308" Height="381" Width="278" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="275" />
|
||||
<Shape ID="DesignTable:TBDD_EINGANGSARTEN" ZOrder="28" X="431" Y="313" Height="210" Width="286" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
|
||||
<Shape ID="DesignTable:TBDD_DOKART_MODULE" ZOrder="42" X="1381" Y="161" Height="134" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
|
||||
<Shape ID="DesignTable:TBDD_MODULES" ZOrder="41" X="1096" Y="325" Height="115" Width="242" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
|
||||
<Shape ID="DesignTable:TBDD_INDEX_MAN" ZOrder="2" X="456" Y="638" Height="360" Width="244" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="292" />
|
||||
<Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="40" X="433" Y="81" Height="305" Width="264" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:VWDDINDEX_MAN" ZOrder="6" X="1040" Y="444" Height="381" Width="256" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="313" />
|
||||
<Shape ID="DesignTable:VWDDINDEX_AUTOM" ZOrder="38" X="1361" Y="319" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBDD_INDEX_AUTOM" ZOrder="7" X="668" Y="605" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBGI_CONFIGURATION" ZOrder="35" X="1071" Y="621" Height="229" Width="279" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
|
||||
<Shape ID="DesignTable:TBGI_OBJECTTYPE_EMAIL_INDEX" ZOrder="29" X="117" Y="665" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
|
||||
<Shape ID="DesignTable:TBDD_INDEX_MAN_POSTPROCESSING" ZOrder="1" X="743" Y="69" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBWHDD_INDEX_MAN" ZOrder="32" X="133" Y="112" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBDD_GROUPS_USER" ZOrder="5" X="1014" Y="-1" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
|
||||
<Shape ID="DesignTable:VWGI_USER_GROUPS_RELATION" ZOrder="9" X="845" Y="494" Height="248" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
|
||||
<Shape ID="DesignTable:TBHOTKEY_PROFILE" ZOrder="17" X="-12" Y="311" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBHOTKEY_PATTERNS" ZOrder="16" X="221" Y="-36" Height="320" Width="196" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="252" />
|
||||
<Shape ID="DesignTable:TBMYHOTKEYS" ZOrder="20" X="25" Y="-1" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBHOTKEY_USER_PROFILE" ZOrder="21" X="30" Y="178" Height="90" Width="227" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBHOTKEY_PATTERNS_REWORK" ZOrder="19" X="415" Y="-3" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="39" />
|
||||
<Shape ID="DesignTable:TBHOTKEY_WINDOW_HOOK" ZOrder="15" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBDD_USER" ZOrder="10" X="765" Y="247" Height="305" Width="213" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
|
||||
<Shape ID="DesignTable:TBDD_DOKUMENTART" ZOrder="12" X="119" Y="308" Height="381" Width="278" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="275" />
|
||||
<Shape ID="DesignTable:TBDD_EINGANGSARTEN" ZOrder="16" X="431" Y="313" Height="210" Width="286" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
|
||||
<Shape ID="DesignTable:TBDD_DOKART_MODULE" ZOrder="29" X="1381" Y="161" Height="134" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
|
||||
<Shape ID="DesignTable:TBDD_MODULES" ZOrder="28" X="1096" Y="325" Height="115" Width="242" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
|
||||
<Shape ID="DesignTable:TBDD_INDEX_MAN" ZOrder="5" X="456" Y="638" Height="360" Width="244" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="292" />
|
||||
<Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="27" X="433" Y="81" Height="305" Width="264" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:VWDDINDEX_MAN" ZOrder="8" X="1040" Y="444" Height="381" Width="256" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="313" />
|
||||
<Shape ID="DesignTable:VWDDINDEX_AUTOM" ZOrder="25" X="1361" Y="319" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBDD_INDEX_AUTOM" ZOrder="9" X="668" Y="605" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBGI_CONFIGURATION" ZOrder="22" X="1071" Y="621" Height="229" Width="279" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
|
||||
<Shape ID="DesignTable:TBGI_OBJECTTYPE_EMAIL_INDEX" ZOrder="17" X="117" Y="665" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
|
||||
<Shape ID="DesignTable:TBDD_INDEX_MAN_POSTPROCESSING" ZOrder="3" X="719" Y="25" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBWHDD_INDEX_MAN" ZOrder="2" X="135" Y="27" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBDD_GROUPS_USER" ZOrder="4" X="1040" Y="71" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
|
||||
<Shape ID="DesignTable:VWGI_USER_GROUPS_RELATION" ZOrder="11" X="845" Y="494" Height="248" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
|
||||
<Shape ID="DesignTable:TBGI_FILES_USER" ZOrder="14" X="1181" Y="7" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBGI_HISTORY" ZOrder="12" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBGI_REGEX_DOCTYPE" ZOrder="4" X="1027" Y="881" Height="210" Width="276" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
|
||||
<Shape ID="DesignTable:TBTempFiles2Index" ZOrder="36" X="915" Y="82" Height="106" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
|
||||
<Shape ID="DesignTable:TBTEMP_INDEXRESULTS" ZOrder="31" X="639" Y="943" Height="67" Width="208" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
|
||||
<Shape ID="DesignTable:TBAD_Users" ZOrder="11" X="1363" Y="639" Height="143" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="86" />
|
||||
<Shape ID="DesignTable:TBGI_HISTORY" ZOrder="1" X="120" Y="153" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBGI_REGEX_DOCTYPE" ZOrder="7" X="1027" Y="881" Height="210" Width="276" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
|
||||
<Shape ID="DesignTable:TBTempFiles2Index" ZOrder="23" X="915" Y="82" Height="106" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
|
||||
<Shape ID="DesignTable:TBTEMP_INDEXRESULTS" ZOrder="19" X="639" Y="943" Height="67" Width="208" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
|
||||
<Shape ID="DesignTable:TBAD_Users" ZOrder="13" X="1363" Y="639" Height="143" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="86" />
|
||||
</Shapes>
|
||||
<Connectors>
|
||||
<Connector ID="DesignRelation:FK_TBDD_DOKUMENTART_EINGID" ZOrder="43" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBDD_DOKUMENTART_EINGID" ZOrder="30" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>431</X>
|
||||
@ -48,7 +42,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBDD_INDEX_MAN_CID" ZOrder="39" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBDD_INDEX_MAN_CID" ZOrder="26" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>535</X>
|
||||
@ -60,7 +54,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBDD_INDEX_AUTOM_DOCID" ZOrder="37" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBDD_INDEX_AUTOM_DOCID" ZOrder="24" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>397</X>
|
||||
@ -72,7 +66,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" ZOrder="34" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" ZOrder="21" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>597</X>
|
||||
@ -80,43 +74,39 @@
|
||||
</Point>
|
||||
<Point>
|
||||
<X>597</X>
|
||||
<Y>148</Y>
|
||||
<Y>104</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>743</X>
|
||||
<Y>148</Y>
|
||||
<X>719</X>
|
||||
<Y>104</Y>
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" ZOrder="33" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" ZOrder="20" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>959</X>
|
||||
<Y>682</Y>
|
||||
<X>293</X>
|
||||
<Y>72</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>959</X>
|
||||
<Y>374</Y>
|
||||
<X>719</X>
|
||||
<Y>72</Y>
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBDD_GROUPS_USER_USER_ID" ZOrder="30" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBDD_GROUPS_USER_USER_ID" ZOrder="18" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>951</X>
|
||||
<Y>247</Y>
|
||||
<X>978</X>
|
||||
<Y>273</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>951</X>
|
||||
<Y>211</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>1014</X>
|
||||
<Y>211</Y>
|
||||
<X>1040</X>
|
||||
<Y>273</Y>
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBDD_INDEX_MAN_DAID" ZOrder="27" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBDD_INDEX_MAN_DAID" ZOrder="15" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>397</X>
|
||||
@ -128,131 +118,7 @@
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_PROFILE_ID" ZOrder="26" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>129</X>
|
||||
<Y>311</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>129</X>
|
||||
<Y>86</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>221</X>
|
||||
<Y>86</Y>
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_PROFILE_ID1" ZOrder="25" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>183</X>
|
||||
<Y>25</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>221</X>
|
||||
<Y>25</Y>
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_PROFILE_ID" ZOrder="24" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>88</X>
|
||||
<Y>311</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>88</X>
|
||||
<Y>-22</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>88</X>
|
||||
<Y>-30</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>88</X>
|
||||
<Y>178</Y>
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_PROFILE_ID1" ZOrder="23" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>117</X>
|
||||
<Y>-1</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>117</X>
|
||||
<Y>-22</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>117</X>
|
||||
<Y>-30</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>117</X>
|
||||
<Y>178</Y>
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_USER_PROFILE_USER_ID" ZOrder="22" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>765</X>
|
||||
<Y>285</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>240</X>
|
||||
<Y>285</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>240</X>
|
||||
<Y>268</Y>
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_PATTERNS_REWORK_HKPATTERN_ID" ZOrder="18" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>409</X>
|
||||
<Y>-36</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>409</X>
|
||||
<Y>-66</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>425</X>
|
||||
<Y>-66</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>425</X>
|
||||
<Y>-3</Y>
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBHOTKEY_WINDOW_HOOK_PROFILE_ID" ZOrder="13" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>38</X>
|
||||
<Y>0</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>38</X>
|
||||
<Y>-30</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>38</X>
|
||||
<Y>-30</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
<X>38</X>
|
||||
<Y>0</Y>
|
||||
</Point>
|
||||
</RoutePoints>
|
||||
</Connector>
|
||||
<Connector ID="DesignRelation:FK_TBGI_REGEX_DOCTYPE_DTID" ZOrder="3" LineWidth="11">
|
||||
<Connector ID="DesignRelation:FK_TBGI_REGEX_DOCTYPE_DTID" ZOrder="6" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>380</X>
|
||||
|
||||
5
Global_Indexer/frmAdministration.Designer.vb
generated
5
Global_Indexer/frmAdministration.Designer.vb
generated
@ -2500,11 +2500,6 @@ Partial Class frmAdministration
|
||||
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_REGEX_DOCTYPETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_USER_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_WINDOW_HOOKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.UpdateOrder = Global_Indexer.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'TBDD_EINGANGSARTENTableAdapter
|
||||
|
||||
@ -9,6 +9,8 @@ Public Class frmAdministration
|
||||
Private SourceAttributes As List(Of String)
|
||||
Private SourceObjectTypes As List(Of String)
|
||||
|
||||
Private Current_ObjectType As String = ""
|
||||
|
||||
Private GroupToDelete As Integer = Nothing
|
||||
Private IsInsert As Boolean = False
|
||||
Dim frmloaded As Boolean = False
|
||||
@ -300,6 +302,8 @@ Public Class frmAdministration
|
||||
Private Sub OBJEKTTYPComboBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles OBJEKTTYPComboBox.SelectedIndexChanged
|
||||
If WINDREAM_DIRECTCheckBox.Checked = True Then
|
||||
load_WDIndices()
|
||||
|
||||
Current_ObjectType = OBJEKTTYPComboBox.Text
|
||||
End If
|
||||
End Sub
|
||||
Sub load_WDIndices()
|
||||
@ -309,14 +313,14 @@ Public Class frmAdministration
|
||||
Me.WD_INDEXComboBox.Items.Add("")
|
||||
Me.INDEXNAME_AutoIndexCMB.Items.Clear()
|
||||
|
||||
If SourceAttributes Is Nothing Then
|
||||
If SourceAttributes Is Nothing Or Current_ObjectType <> OBJEKTTYPComboBox.Text Then
|
||||
SourceAttributes = WINDREAM.GetIndiciesByObjecttype(OBJEKTTYPComboBox.Text)
|
||||
End If
|
||||
|
||||
If SourceAttributes IsNot Nothing Then
|
||||
For Each index As String In SourceAttributes
|
||||
Me.WD_INDEXComboBox.Items.Add(index)
|
||||
INDEXNAME_AutoIndexCMB.Items.Add(index)
|
||||
For Each oIndex As String In SourceAttributes
|
||||
Me.WD_INDEXComboBox.Items.Add(oIndex)
|
||||
INDEXNAME_AutoIndexCMB.Items.Add(oIndex)
|
||||
Next
|
||||
End If
|
||||
End If
|
||||
@ -787,25 +791,6 @@ Public Class frmAdministration
|
||||
Case 7 : value = "$Usercode"
|
||||
End Select
|
||||
|
||||
'Select Case lbFileparameter.SelectedItem.ToString.ToUpper
|
||||
' Case "Dateiname (mit Endung)".ToUpper
|
||||
' value = "$filename_ext"
|
||||
' Case "Dateiname (ohne Endung)".ToUpper
|
||||
' value = "$filename"
|
||||
' Case "Dateiendung".ToUpper
|
||||
' value = "$extension"
|
||||
' Case "Datei Erstelldatum".ToUpper
|
||||
' value = "$FileCreateDate"
|
||||
' Case "Datei Erstellt wer".ToUpper
|
||||
' value = "$FileCreatedWho"
|
||||
' Case "Aktuelles Datum (DD.MM.YYYY)".ToUpper
|
||||
' value = "$DateDDMMYYY"
|
||||
' Case "Username"
|
||||
' value = "$Username"
|
||||
' Case "Usercode"
|
||||
' value = "$Usercode"
|
||||
'End Select
|
||||
|
||||
If value <> "" Then
|
||||
VALUETextBox.Text = value
|
||||
Save_IndexAuto()
|
||||
|
||||
5
Global_Indexer/frmConnections.Designer.vb
generated
5
Global_Indexer/frmConnections.Designer.vb
generated
@ -150,11 +150,6 @@ Partial Class frmConnections
|
||||
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_REGEX_DOCTYPETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_USER_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_WINDOW_HOOKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.UpdateOrder = Global_Indexer.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'BEZEICHNUNGTextBox
|
||||
|
||||
5
Global_Indexer/frmEmailIndexing.Designer.vb
generated
5
Global_Indexer/frmEmailIndexing.Designer.vb
generated
@ -502,11 +502,6 @@ Partial Class frmEmailIndexing
|
||||
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Me.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter
|
||||
Me.TableAdapterManager.TBGI_REGEX_DOCTYPETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_USER_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_WINDOW_HOOKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.UpdateOrder = Global_Indexer.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'TBDD_DOKUMENTARTTableAdapter
|
||||
|
||||
5
Global_Indexer/frmHistory.Designer.vb
generated
5
Global_Indexer/frmHistory.Designer.vb
generated
@ -167,11 +167,6 @@ Partial Class frmHistory
|
||||
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_USER_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_WINDOW_HOOKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.UpdateOrder = Global_Indexer.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'GridControl1
|
||||
|
||||
2023
Global_Indexer/frmHotKey_Add.Designer.vb
generated
2023
Global_Indexer/frmHotKey_Add.Designer.vb
generated
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@ -1,825 +0,0 @@
|
||||
Public Class frmHotKey_Add
|
||||
Dim Form_loaded As Boolean = False
|
||||
Private Control_Sequence As Integer
|
||||
Private Sub ObjektTypenEintragen()
|
||||
Try
|
||||
' Combobox leeren
|
||||
Me.cmbObjekttyp.Items.Clear()
|
||||
' alle Objekttypen durchlaufen
|
||||
For Each otype As String In WINDREAM.ObjectTypes
|
||||
' und in die Combobox eintragen
|
||||
Me.cmbObjekttyp.Items.Add(otype)
|
||||
Next
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Eintragen der Objekttypen")
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
Private Sub btnpnlStart_weiter_Click(sender As Object, e As EventArgs) Handles btnpnlStart_weiter.Click
|
||||
If ListBox_FormTitles.SelectedIndex <> -1 Then
|
||||
GroupBox2_Controls.Visible = True
|
||||
List_Controls(ListBox_FormTitles.SelectedItem, 1)
|
||||
Else
|
||||
GroupBox2_Controls.Visible = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub frmHotKey_Add_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
|
||||
Me.TBDD_USERTableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
Me.TBHOTKEY_PATTERNSTableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
Me.TBHOTKEY_PROFILETableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
Me.TBHOTKEY_USER_PROFILETableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
Me.TBHOTKEY_PATTERNS_REWORKTableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
Me.TBHOTKEY_WINDOW_HOOKTableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
TabControlDetails.SelectedIndex = 0
|
||||
TabControl1.SelectedIndex = 0
|
||||
Load_Profiles()
|
||||
load_users()
|
||||
GroupBox1.Visible = True
|
||||
GroupBox2_Controls.Visible = False
|
||||
GroupBoxMainWindow.Visible = False
|
||||
If IDB_ACTIVE = False Then
|
||||
ObjektTypenEintragen()
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
Sub load_users()
|
||||
Try
|
||||
Me.TBDD_USERTableAdapter.Fill(Me.MyDataset.TBDD_USER)
|
||||
chklbUser.Items.Clear()
|
||||
For Each row As DataRow In MyDataset.TBDD_USER.Rows
|
||||
chklbUser.Items.Add(row.Item("USERNAME"))
|
||||
Next
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error in Load_Users:")
|
||||
End Try
|
||||
End Sub
|
||||
Sub Load_Profiles()
|
||||
Try
|
||||
Me.TBHOTKEY_PROFILETableAdapter.Fill(MyDataset.TBHOTKEY_PROFILE)
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error in Load_Profiles:")
|
||||
End Try
|
||||
End Sub
|
||||
Sub List_FormTitles(Tabindex As Integer)
|
||||
|
||||
Try
|
||||
Select Case Tabindex
|
||||
Case 1
|
||||
ListBox_FormTitles.Items.Clear()
|
||||
Case 2
|
||||
ListBox_MainWindows_Test.Items.Clear()
|
||||
ListViewControls_Test.Items.Clear()
|
||||
End Select
|
||||
Dim enumerator As New ClassWindowAPI
|
||||
For Each top As ClassWindowAPI.ApiWindow In enumerator.GetTopLevelWindows()
|
||||
If top.MainWindowTitle <> "" And top.MainWindowTitle <> "Global Indexer" And top.MainWindowTitle <> "Hot Key - Administration" Then
|
||||
Select Case Tabindex
|
||||
Case 1
|
||||
ListBox_FormTitles.Items.Add(top.MainWindowTitle)
|
||||
Case 2
|
||||
ListBox_MainWindows_Test.Items.Add(top.MainWindowTitle)
|
||||
End Select
|
||||
End If
|
||||
Next top
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in List_FormTitles: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
Private Function CheckFormTitle_isOpen(windowname As String)
|
||||
Dim isopen As Boolean = False
|
||||
Try
|
||||
Dim enumerator As New ClassWindowAPI
|
||||
For Each top As ClassWindowAPI.ApiWindow In enumerator.GetTopLevelWindows()
|
||||
If top.MainWindowTitle <> "" And top.MainWindowTitle <> "Global Indexer" And top.MainWindowTitle <> "Hot Key - Administration" Then
|
||||
If top.MainWindowTitle = windowname Then
|
||||
Return True
|
||||
End If
|
||||
End If
|
||||
Next top
|
||||
Return False
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in CheckFormTitle_isOpen: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Return False
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Sub List_Controls(Title As String, Tabindex As Integer)
|
||||
' Try
|
||||
Select Case Tabindex
|
||||
Case 1
|
||||
If GroupBox2_Controls.Visible = False Then
|
||||
GroupBox2_Controls.Visible = True
|
||||
End If
|
||||
ListViewControls.Items.Clear()
|
||||
txtControl.Text = ""
|
||||
Case 2
|
||||
ListViewControls_Test.Items.Clear()
|
||||
End Select
|
||||
|
||||
Dim enumerator As New ClassWindowAPI
|
||||
'Jedes Fenster durchlaufen
|
||||
For Each top As ClassWindowAPI.ApiWindow In enumerator.GetTopLevelWindows()
|
||||
If top.MainWindowTitle.Contains(Title) Or top.MainWindowTitle.ToLower = Title.ToLower Then
|
||||
Dim anz As Integer = 0
|
||||
Control_Sequence = 0
|
||||
'Jedes Control durchlaufen
|
||||
For Each child As ClassWindowAPI.ApiWindow In enumerator.GetChildWindows(top.hWnd)
|
||||
Select Case Tabindex
|
||||
Case 1
|
||||
If chkboxshowfilledControlsOnly.Checked Then
|
||||
If child.MainWindowTitle <> "" Then
|
||||
ListViewControls.Items.Add(Control_Sequence)
|
||||
ListViewControls.Items(anz).SubItems.Add(child.hWnd.ToString)
|
||||
ListViewControls.Items(anz).SubItems.Add(child.MainWindowTitle)
|
||||
anz += 1
|
||||
End If
|
||||
Else
|
||||
ListViewControls.Items.Add(Control_Sequence)
|
||||
ListViewControls.Items(anz).SubItems.Add(child.hWnd.ToString)
|
||||
ListViewControls.Items(anz).SubItems.Add(child.MainWindowTitle)
|
||||
anz += 1
|
||||
End If
|
||||
Case 2
|
||||
If chkboxshowfilledControlsOnly_Test.Checked Then
|
||||
If child.MainWindowTitle <> "" Then
|
||||
ListViewControls_Test.Items.Add(Control_Sequence)
|
||||
ListViewControls_Test.Items(anz).SubItems.Add(child.hWnd.ToString)
|
||||
ListViewControls_Test.Items(anz).SubItems.Add(child.MainWindowTitle)
|
||||
anz += 1
|
||||
End If
|
||||
Else
|
||||
ListViewControls_Test.Items.Add(Control_Sequence)
|
||||
ListViewControls_Test.Items(anz).SubItems.Add(child.hWnd.ToString)
|
||||
ListViewControls_Test.Items(anz).SubItems.Add(child.MainWindowTitle)
|
||||
anz += 1
|
||||
End If
|
||||
'ListBox_Controls_Test.Items.Add("ID: " & child.hWnd.ToString & " || Aktueller Wert: " & child.MainWindowTitle)
|
||||
End Select
|
||||
Control_Sequence += 1
|
||||
Next child
|
||||
End If
|
||||
Next top
|
||||
'Catch ex As Exception
|
||||
' MsgBox("Error in List_Controls: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
'End Try
|
||||
End Sub
|
||||
|
||||
Private Sub ListBox_FormTitles_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox_FormTitles.SelectedIndexChanged
|
||||
If ListBox_FormTitles.SelectedIndex <> -1 And GroupBox2_Controls.Visible = True Then
|
||||
List_Controls(ListBox_FormTitles.SelectedItem, 1)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub txtKey_KeyDown(sender As Object, e As KeyEventArgs) Handles txtKey.KeyDown
|
||||
txtKey.Text = ""
|
||||
End Sub
|
||||
|
||||
Private Sub btnGB1_Click(sender As Object, e As EventArgs) Handles btnGB1.Click
|
||||
If txtProfilname.Text <> "" And txtWDSearch.Text <> "" And txtKey.Text <> "" And cmbFunktionstaste.Text <> "" Then
|
||||
Me.GroupBoxMainWindow.Visible = True
|
||||
List_FormTitles(1)
|
||||
Else
|
||||
MsgBox("Eingabe fehlt!", MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub TBHOTKEY_PROFILEBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs)
|
||||
Me.Validate()
|
||||
Me.TBHOTKEY_PROFILEBindingSource.EndEdit()
|
||||
Me.TableAdapterManager.UpdateAll(Me.MyDataset)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnadd_Pattern.Click
|
||||
Try
|
||||
lblLinkadd.Visible = False
|
||||
If txtPattern.Text = "" Then
|
||||
Exit Sub
|
||||
End If
|
||||
Dim sql As String = "select max(guid) from tbhotkey_Profile where upper(name) = Upper('" & txtProfilname.Text & "')"
|
||||
Dim kopf = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True)
|
||||
If IsDBNull(kopf) Then
|
||||
TBHOTKEY_PROFILETableAdapter.Insert(txtProfilname.Text, "NONE", txtWDSearch.Text, cmbFunktionstaste.Text, txtKey.Text.ToUpper, ListBox_FormTitles.SelectedItem, Environment.UserName)
|
||||
Else
|
||||
TBHOTKEY_PROFILETableAdapter.cmdUpdate(txtProfilname.Text, "NONE", txtWDSearch.Text, cmbFunktionstaste.Text, txtKey.Text.ToUpper, ListBox_FormTitles.SelectedItem, Environment.UserName, kopf)
|
||||
End If
|
||||
lblSaveHotkey.Visible = True
|
||||
sql = "select max(guid) from tbhotkey_Profile where upper(name) = Upper('" & txtProfilname.Text & "')"
|
||||
Dim id = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True)
|
||||
If id > 0 Then
|
||||
TBHOTKEY_PATTERNSTableAdapter.Insert(id, txtPattern.Text, Control_ID, Environment.UserName, txtControl.Text)
|
||||
lblLinkadd.Text = "Pattern-Link " & txtControl.Text & " || " & txtPattern.Text & " erfolgreich angelegt"
|
||||
lblLinkadd.Visible = True
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in Add Pattern or Profile:")
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub txtPattern_TextChanged(sender As Object, e As EventArgs) Handles txtPattern.TextChanged
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
If Not Me.txtWDSearch.Text = "" Then
|
||||
Me.OFDWindreamsuche.FileName = Me.txtWDSearch.Text
|
||||
End If
|
||||
|
||||
If Me.OFDWindreamsuche.ShowDialog = Windows.Forms.DialogResult.OK Then
|
||||
Me.txtWDSearch.Text = Me.OFDWindreamsuche.FileName
|
||||
End If
|
||||
End Sub
|
||||
Private Sub TabControl1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles TabControlMain.SelectedIndexChanged
|
||||
Select Case TabControlMain.SelectedIndex
|
||||
|
||||
Case 0
|
||||
TabControl1.SelectedIndex = 0
|
||||
TabControlDetails.SelectedIndex = 0
|
||||
Load_Profiles()
|
||||
Case 1
|
||||
If NAMETextBox.Text <> "" And CheckFormTitle_isOpen(WINDOW_NAMETextBox.Text) = True Then
|
||||
btnnewProfile.Visible = True
|
||||
txtProfilname.Text = NAMETextBox.Text
|
||||
txtWDSearch.Text = WD_SEARCHTextBox.Text
|
||||
cmbFunktionstaste.SelectedIndex = cmbFunktionstaste.FindStringExact(HOTKEY1ComboBox.Text)
|
||||
txtKey.Text = HOTKEY2TextBox.Text
|
||||
Me.GroupBoxMainWindow.Visible = True
|
||||
List_FormTitles(1)
|
||||
ListBox_FormTitles.SelectedIndex = ListBox_FormTitles.FindStringExact(WINDOW_NAMETextBox.Text)
|
||||
ListBox_FormTitles.SetSelected(ListBox_FormTitles.SelectedIndex, True)
|
||||
GroupBox2_Controls.Visible = True
|
||||
If Not IsNothing(ListBox_FormTitles.SelectedItem) Then
|
||||
List_Controls(ListBox_FormTitles.SelectedItem, 1)
|
||||
End If
|
||||
Else
|
||||
btnnewProfile.Visible = False
|
||||
Me.GroupBoxMainWindow.Visible = False
|
||||
GroupBox2_Controls.Visible = False
|
||||
txtProfilname.Text = ""
|
||||
txtWDSearch.Text = ""
|
||||
cmbFunktionstaste.SelectedIndex = -1
|
||||
txtKey.Text = ""
|
||||
End If
|
||||
Case 2
|
||||
List_FormTitles(2)
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
|
||||
List_FormTitles(2)
|
||||
End Sub
|
||||
|
||||
Private Sub ListBox_MainWindows_Test_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox_MainWindows_Test.SelectedIndexChanged
|
||||
If ListBox_MainWindows_Test.SelectedIndex <> -1 Then
|
||||
List_Controls(ListBox_MainWindows_Test.SelectedItem, 2)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btndelete_Click(sender As Object, e As EventArgs) Handles btndelete.Click
|
||||
Dim ID
|
||||
Try
|
||||
ID = GridView1.GetFocusedRowCellValue(GridView1.Columns("GUID"))
|
||||
Catch ex As Exception
|
||||
ID = 0
|
||||
End Try
|
||||
If ID > 1 Then
|
||||
Dim result As MsgBoxResult
|
||||
result = MessageBox.Show("Sind Sie sicher dass Sie dieses Hotkeyprofil löschen wollen?", "Bestätigung erforderlich:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
If result = MsgBoxResult.Yes Then
|
||||
Try
|
||||
|
||||
Dim del As String = "DELETE FROM TBHOTKEY_USER_PROFILE WHERE HKPROFILE_ID = " & ID
|
||||
If ClassDatabase.Execute_non_Query(del, True) = True Then
|
||||
del = "DELETE FROM TBHOTKEY_PATTERNS_REWORK WHERE HKPATTERN_ID IN (SELECT GUID FROM TBHOTKEY_PATTERNS WHERE HKPROFILE_ID = " & ID & ")"
|
||||
If ClassDatabase.Execute_non_Query(del, True) = True Then
|
||||
del = "DELETE FROM TBHOTKEY_PATTERNS WHERE HKPROFILE_ID = " & ID
|
||||
If ClassDatabase.Execute_non_Query(del, True) = True Then
|
||||
del = "DELETE FROM TBHOTKEY_WINDOW_HOOK WHERE HKPROFILE_ID = " & ID
|
||||
If ClassDatabase.Execute_non_Query(del, True) = True Then
|
||||
del = "DELETE FROM TBHOTKEY_PROFILE WHERE GUID = " & ID
|
||||
If ClassDatabase.Execute_non_Query(del, True) = True Then
|
||||
LOGGER.Info(">> Hotkey-Profil: " & ID & " wurde gelöscht!")
|
||||
Load_Profiles()
|
||||
Load_UserForProfiles()
|
||||
MsgBox("Profil wurde erfolgreich gelöscht!", MsgBoxStyle.Information, "Erfolgsmeldung")
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in Delete Profiles: ")
|
||||
End Try
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnUserAdd_Profile_Click(sender As Object, e As EventArgs) Handles btnUserAdd_Profile.Click
|
||||
Try
|
||||
Dim added As Integer = 0
|
||||
Dim items As CheckedListBox.CheckedItemCollection = chklbUser.CheckedItems
|
||||
Dim ID
|
||||
Try
|
||||
ID = GridView1.GetFocusedRowCellValue(GridView1.Columns("GUID"))
|
||||
Catch ex As Exception
|
||||
ID = 0
|
||||
End Try
|
||||
If ID > 1 And items.Count > 0 Then
|
||||
For Each item In items
|
||||
Dim SQL
|
||||
SQL = "SELECT GUID FROM TBDD_USER WHERE USERNAME = '" & item.ToString & "'"
|
||||
Dim userid = ClassDatabase.Execute_Scalar(SQL, MyConnectionString, True)
|
||||
|
||||
SQL = "SELECT COUNT(*) FROM TBHOTKEY_USER_PROFILE WHERE USER_ID = " & userid & " and HKPROFILE_ID = " & ID
|
||||
Dim exists = ClassDatabase.Execute_Scalar(SQL, MyConnectionString, True)
|
||||
If exists = 0 Then
|
||||
TBHOTKEY_USER_PROFILETableAdapter.cmdInsert(userid, ID)
|
||||
added += 1
|
||||
End If
|
||||
|
||||
Next
|
||||
|
||||
Else
|
||||
MsgBox("Keine Benutzer und/oder kein Profil ausgewählt")
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If added >= 1 Then
|
||||
MsgBox(added & " neue Profil/User-Verknüpfungen angelegt!", MsgBoxStyle.Information)
|
||||
Load_UserForProfiles()
|
||||
Else
|
||||
MsgBox("Keine Verknüpfungen angelegt!", MsgBoxStyle.Information)
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Add MyHotkey: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub AlleAuswählenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AlleAuswählenToolStripMenuItem.Click
|
||||
If TabControl1.SelectedIndex = 1 Then
|
||||
For i = 0 To chklbUser.Items.Count - 1
|
||||
chklbUser.SetItemChecked(i, True)
|
||||
Next
|
||||
ElseIf TabControl1.SelectedIndex = 2 Then
|
||||
For i = 0 To chklbUserProfile.Items.Count - 1
|
||||
chklbUserProfile.SetItemChecked(i, True)
|
||||
Next
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub KeineAuswählenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles KeineAuswählenToolStripMenuItem.Click
|
||||
If TabControl1.SelectedIndex = 1 Then
|
||||
For i = 0 To chklbUser.Items.Count - 1
|
||||
chklbUser.SetItemChecked(i, False)
|
||||
Next
|
||||
ElseIf TabControl1.SelectedIndex = 2 Then
|
||||
For i = 0 To chklbUserProfile.Items.Count - 1
|
||||
chklbUserProfile.SetItemChecked(i, False)
|
||||
Next
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub TabControl2_SelectedIndexChanged(sender As Object, e As EventArgs) Handles TabControl1.SelectedIndexChanged
|
||||
GroupBoxPatterns.Visible = False
|
||||
Select Case TabControl1.SelectedIndex
|
||||
Case 0
|
||||
GroupBoxPatterns.Visible = True
|
||||
Case 2
|
||||
Load_UserForProfiles()
|
||||
End Select
|
||||
End Sub
|
||||
Sub Load_UserForProfiles()
|
||||
Try
|
||||
Dim ID
|
||||
Try
|
||||
ID = GridView1.GetFocusedRowCellValue(GridView1.Columns("GUID"))
|
||||
Catch ex As Exception
|
||||
ID = 0
|
||||
End Try
|
||||
If ID > 1 Then
|
||||
chklbUserProfile.Items.Clear()
|
||||
Dim SQL = "SELECT T.USERNAME FROM TBHOTKEY_USER_PROFILE T1, TBDD_USER T WHERE T.GUID = T1.USER_ID and T1.HKPROFILE_ID = " & ID
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(SQL, True)
|
||||
If Not IsNothing(DT) Then
|
||||
For Each dr As DataRow In DT.Rows
|
||||
chklbUserProfile.Items.Add(dr.Item(0))
|
||||
Next
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in LoadUserForProfiles: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub ListBox_Profiles_SelectedIndexChanged(sender As Object, e As EventArgs)
|
||||
Dim ID
|
||||
Try
|
||||
ID = GridView1.GetFocusedRowCellValue(GridView1.Columns("GUID"))
|
||||
Catch ex As Exception
|
||||
ID = 0
|
||||
End Try
|
||||
If ID > 0 Then
|
||||
Select Case TabControl1.SelectedIndex
|
||||
Case 1
|
||||
'Try
|
||||
' TBHOTKEY_PROFILETableAdapter.FillByID(MyDataset.TBHOTKEY_PROFILE, ListBox_Profiles.SelectedValue)
|
||||
'Catch ex As Exception
|
||||
' MsgBox("Error in Fillby Profile-ID: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
'End Try
|
||||
Load_Patterns()
|
||||
Load_MatchPatterns()
|
||||
Case 2
|
||||
Load_UserForProfiles()
|
||||
End Select
|
||||
lblSave.Visible = False
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
Sub Load_Patterns()
|
||||
Try
|
||||
TBHOTKEY_PATTERNSTableAdapter.Fill(MyDataset.TBHOTKEY_PATTERNS, GUIDTextBox.Text)
|
||||
tslbl_Hotkeywindow.Text = WINDOW_NAMETextBox.Text
|
||||
tslbl_HotkeySequence.Text = SEQUENCE_NUMBERTextBox.Text
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Fill Patterns: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
Sub Load_MatchPatterns()
|
||||
Try
|
||||
TBHOTKEY_WINDOW_HOOKTableAdapter.Fill(MyDataset.TBHOTKEY_WINDOW_HOOK, GUIDTextBox.Text)
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Fill Match-Patterns: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
Private Sub btndeleteUserProfile_Click(sender As Object, e As EventArgs) Handles btndeleteUserProfile.Click
|
||||
Try
|
||||
Dim deleted As Integer = 0
|
||||
Dim items As CheckedListBox.CheckedItemCollection = chklbUserProfile.CheckedItems
|
||||
Dim ID
|
||||
Try
|
||||
ID = GridView1.GetFocusedRowCellValue(GridView1.Columns("GUID"))
|
||||
Catch ex As Exception
|
||||
ID = 0
|
||||
End Try
|
||||
If ID > 1 And items.Count > 0 Then
|
||||
For Each item In items
|
||||
Dim SQL
|
||||
SQL = "SELECT GUID FROM TBDD_USER WHERE USERNAME = '" & item.ToString & "'"
|
||||
Dim userid = ClassDatabase.Execute_Scalar(SQL, MyConnectionString, True)
|
||||
If IsNothing(userid) Then
|
||||
MsgBox("Unerwarteter Unexpected error inm Holen der User-ID!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
SQL = "SELECT GUID FROM TBHOTKEY_USER_PROFILE WHERE USER_ID = " & userid & " and HKPROFILE_ID = " & ID
|
||||
Dim ID1 = ClassDatabase.Execute_Scalar(SQL, MyConnectionString, True)
|
||||
If ID1 > 0 Then
|
||||
TBHOTKEY_USER_PROFILETableAdapter.Delete(ID1)
|
||||
deleted += 1
|
||||
End If
|
||||
Next
|
||||
|
||||
Else
|
||||
MsgBox("Keine Benutzer und/oder kein Profil ausgewählt")
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If deleted >= 1 Then
|
||||
MsgBox(deleted & " Profilbeziehungen wurden gelöscht!", MsgBoxStyle.Information)
|
||||
Load_UserForProfiles()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Delete Profile for Users: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub btnsave_Click(sender As Object, e As EventArgs) Handles btnsave.Click
|
||||
Try
|
||||
TBHOTKEY_PROFILEBindingSource.EndEdit()
|
||||
If Me.MyDataset.TBHOTKEY_PROFILE.GetChanges Is Nothing = False Then
|
||||
Me.CHANGED_WHOTextBox.Text = Environment.UserName
|
||||
TBHOTKEY_PROFILEBindingSource.EndEdit()
|
||||
TBHOTKEY_PROFILETableAdapter.Update(MyDataset.TBHOTKEY_PROFILE)
|
||||
Me.lblSave.Visible = True
|
||||
Dim result As MsgBoxResult
|
||||
If USER_LANGUAGE = "de-DE" Then
|
||||
result = MessageBox.Show("Wollen Sie die Änderungen im Hotkey-Profil auch in den Userprofilen vornehmen?", "Bestätigung erforderlich:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
Else
|
||||
result = MessageBox.Show("Dow You want to update the userprofiles also with the changes in the profile?", "Confirmation required:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
End If
|
||||
If result = MsgBoxResult.Yes Then
|
||||
Try
|
||||
Dim update = "UPDATE TBHOTKEY_USER_PROFILE SET WD_SEARCH = '" & WD_SEARCHTextBox.Text & "', HOTKEY1 = '" & HOTKEY1ComboBox.Text & "', HOTKEY2 = '" & HOTKEY2TextBox.Text & "' WHERE HKPROFILE_ID = " & GUIDTextBox.Text
|
||||
If ClassDatabase.Execute_non_Query(update, True) Then
|
||||
If USER_LANGUAGE = "de-DE" Then
|
||||
MsgBox("User-Profile erfolgreich aktualisiert!", MsgBoxStyle.Information)
|
||||
Else
|
||||
MsgBox("Userprofiles successfull updated!", MsgBoxStyle.Information)
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Refresh Userprofiles: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End If
|
||||
Else
|
||||
Me.lblSave.Visible = False
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Save My Profile: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
|
||||
If Not Me.WD_SEARCHTextBox.Text = "" Then
|
||||
Me.OFDWindreamsuche.FileName = Me.WD_SEARCHTextBox.Text
|
||||
End If
|
||||
|
||||
If Me.OFDWindreamsuche.ShowDialog = Windows.Forms.DialogResult.OK Then
|
||||
Me.WD_SEARCHTextBox.Text = Me.OFDWindreamsuche.FileName
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub Fill_Rework(PATT_ID As Integer)
|
||||
Try
|
||||
Me.TBHOTKEY_PATTERNS_REWORKTableAdapter.Fill(Me.MyDataset.TBHOTKEY_PATTERNS_REWORK, PATT_ID)
|
||||
Catch ex As System.Exception
|
||||
MsgBox("Error in Load Rework-Step:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub ListBoxPatterns_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBoxPatterns.SelectedIndexChanged
|
||||
If ListBoxPatterns.SelectedIndex <> -1 Then
|
||||
Fill_Rework(ListBoxPatterns.SelectedValue)
|
||||
tslbl_Hotkeywindow.Text = WINDOW_NAMETextBox.Text
|
||||
tslbl_HotkeySequence.Text = SEQUENCE_NUMBERTextBox.Text
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
|
||||
Try
|
||||
TBHOTKEY_PATTERNS_REWORKBindingSource.EndEdit()
|
||||
If Me.MyDataset.TBHOTKEY_PATTERNS_REWORK.GetChanges Is Nothing = False Then
|
||||
Me.CHANGED_WHOTextBox1.Text = Environment.UserName
|
||||
TBHOTKEY_PATTERNS_REWORKBindingSource.EndEdit()
|
||||
TBHOTKEY_PATTERNS_REWORKTableAdapter.Update(MyDataset.TBHOTKEY_PATTERNS_REWORK)
|
||||
Me.lblsavePatternsRework.Visible = True
|
||||
Else
|
||||
Me.lblsavePatternsRework.Visible = False
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Save Reowrk Patterns: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub TBHOTKEY_PATTERNSBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBHOTKEY_PATTERNSBindingSource.AddingNew
|
||||
MyDataset.TBHOTKEY_PATTERNS_REWORK.ADDED_WHOColumn.DefaultValue = Environment.UserName
|
||||
End Sub
|
||||
Private Sub TYPEComboBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles TYPEComboBox.SelectedIndexChanged
|
||||
If TYPEComboBox.SelectedIndex <> -1 Then
|
||||
Me.TEXT1TextBox.Visible = True
|
||||
Me.Text1Label.Visible = True
|
||||
Me.TEXT2TextBox.Visible = True
|
||||
Me.Text2Label.Visible = True
|
||||
Me.btnRegexTest.Visible = False
|
||||
|
||||
TEXT1TextBox.Size = New Size(50, 22)
|
||||
lblHinweisRework1.Visible = False
|
||||
|
||||
Me.FUNCTION1TextBox.Visible = False
|
||||
Me.FUNCTION2TextBox.Visible = False
|
||||
Me.Function1Label.Visible = False
|
||||
Me.Function2Label.Visible = False
|
||||
FUNCTION1TextBox.Size = New Size(111, 22)
|
||||
|
||||
Select Case TYPEComboBox.Text
|
||||
Case "VBREPLACE"
|
||||
Me.Text1Label.Text = "Old Value:"
|
||||
Me.Text2Label.Text = "New Value:"
|
||||
|
||||
Case "VBSPLIT"
|
||||
Me.Text1Label.Text = "Split-Zeichen:"
|
||||
lblHinweisRework1.Text = "(Zahl) - Achtung Nullbasierend: Erstes Vorkommen = '0'"
|
||||
lblHinweisRework1.Visible = True
|
||||
Me.Text2Label.Text = "Vorkommen:"
|
||||
Case "Regular Expression"
|
||||
Me.Text1Label.Text = "Regular Expression:"
|
||||
TEXT1TextBox.Size = New Size(400, 22)
|
||||
Me.Text2Label.Visible = False
|
||||
Me.TEXT2TextBox.Visible = False
|
||||
|
||||
Me.Function1Label.Text = "Test-String Regex:"
|
||||
Me.FUNCTION1TextBox.Text = ""
|
||||
FUNCTION1TextBox.Size = New Size(138, 22)
|
||||
Me.FUNCTION1TextBox.Visible = True
|
||||
Me.Function1Label.Visible = True
|
||||
Me.btnRegexTest.Visible = True
|
||||
End Select
|
||||
End If
|
||||
End Sub
|
||||
Private Sub TBHOTKEY_PATTERNS_REWORKBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBHOTKEY_PATTERNS_REWORKBindingSource.AddingNew
|
||||
If ListBoxPatterns.SelectedIndex <> -1 Then
|
||||
MyDataset.TBHOTKEY_PATTERNS_REWORK.ADDED_WHOColumn.DefaultValue = Environment.UserName
|
||||
MyDataset.TBHOTKEY_PATTERNS_REWORK.HKPATTERN_IDColumn.DefaultValue = ListBoxPatterns.SelectedValue
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub GUIDTextBox_TextChanged(sender As Object, e As EventArgs) Handles GUIDTextBox.TextChanged
|
||||
If GUIDTextBox.Text <> "" Then
|
||||
Load_Patterns()
|
||||
Load_MatchPatterns()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub GUIDTextBox2_TextChanged(sender As Object, e As EventArgs) Handles GUIDTextBox2.TextChanged
|
||||
If GUIDTextBox2.Text <> "" Then
|
||||
Fill_Rework(GUIDTextBox2.Text)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnRegexTest_Click(sender As Object, e As EventArgs) Handles btnRegexTest.Click
|
||||
If Me.TEXT1TextBox.Text <> "" And FUNCTION1TextBox.Text <> "" Then
|
||||
Dim RegexList As New List(Of System.Text.RegularExpressions.Regex)
|
||||
Dim Regex As New System.Text.RegularExpressions.Regex(Me.TEXT1TextBox.Text, System.Text.RegularExpressions.RegexOptions.IgnoreCase)
|
||||
|
||||
RegexList.Add(Regex)
|
||||
|
||||
' Email Absender und Empfänger
|
||||
Dim result = ClassPostprocessing.extractFromStringviaRE(FUNCTION1TextBox.Text, RegexList)
|
||||
If Not IsNothing(result) Then
|
||||
MsgBox("Das Ergebnis der Regular-Expression: '" & result.ToString & "'!", MsgBoxStyle.Information)
|
||||
Else
|
||||
MsgBox("Es konnte kein Ergebnis ermittelt werden!", MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
Dim Control_ID As String
|
||||
Private Sub ListViewControls_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListViewControls.SelectedIndexChanged
|
||||
If Me.ListViewControls.SelectedItems.Count > 0 Then
|
||||
Control_ID = Me.ListViewControls.SelectedItems(0).SubItems(1).Text
|
||||
txtControl.Text = ListViewControls.SelectedItems(0).Text
|
||||
txtControl_Match.Text = ListViewControls.SelectedItems(0).Text
|
||||
txtValueMatch.Text = Me.ListViewControls.SelectedItems(0).SubItems(2).Text
|
||||
txtPattern.Text = ""
|
||||
If lblLinkadd.Visible Then
|
||||
ListBox_FormTitles.Enabled = False
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub chkboxshowfilledControlsOnly_Test_CheckedChanged(sender As Object, e As EventArgs) Handles chkboxshowfilledControlsOnly_Test.CheckedChanged
|
||||
If ListBox_MainWindows_Test.SelectedIndex <> -1 Then
|
||||
List_Controls(ListBox_MainWindows_Test.SelectedItem, 2)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub chkboxshowfilledControlsOnly_CheckedChanged(sender As Object, e As EventArgs) Handles chkboxshowfilledControlsOnly.CheckedChanged
|
||||
If ListBox_FormTitles.SelectedIndex <> -1 Then
|
||||
List_Controls(ListBox_FormTitles.SelectedItem, 1)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnadd_WindowMatch_Click(sender As Object, e As EventArgs) Handles btnadd_WindowMatch.Click
|
||||
Try
|
||||
Dim sql As String = "select max(guid) from tbhotkey_Profile where upper(name) = Upper('" & txtProfilname.Text & "')"
|
||||
Dim kopf = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True)
|
||||
If IsDBNull(kopf) Then
|
||||
TBHOTKEY_PROFILETableAdapter.Insert(txtProfilname.Text, "NONE", txtWDSearch.Text, cmbFunktionstaste.Text, txtKey.Text.ToUpper, ListBox_FormTitles.SelectedItem, Environment.UserName)
|
||||
Else
|
||||
TBHOTKEY_PROFILETableAdapter.cmdUpdate(txtProfilname.Text, "NONE", txtWDSearch.Text, cmbFunktionstaste.Text, txtKey.Text.ToUpper, ListBox_FormTitles.SelectedItem, Environment.UserName, kopf)
|
||||
End If
|
||||
lblSaveHotkey.Visible = True
|
||||
sql = "select max(guid) from tbhotkey_Profile where upper(name) = Upper('" & txtProfilname.Text & "')"
|
||||
Dim id = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True)
|
||||
If id > 0 Then
|
||||
TBHOTKEY_WINDOW_HOOKTableAdapter.Insert(id, txtControl_Match.Text, txtValueMatch.Text, Environment.UserName)
|
||||
lblMatchadd.Text = "Control-Matching " & txtControl_Match.Text & " || " & txtValueMatch.Text & " erfolgreich angelegt"
|
||||
lblMatchadd.Visible = True
|
||||
lblLinkadd.Visible = False
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in Add Control-Match:")
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub tsbtnsave_pattern_Click(sender As Object, e As EventArgs) Handles tsbtnsave_pattern.Click
|
||||
Try
|
||||
TBHOTKEY_PATTERNSBindingSource.EndEdit()
|
||||
If Me.MyDataset.TBHOTKEY_PATTERNS.GetChanges Is Nothing = False Then
|
||||
Me.CHANGED_WHOTextBox2.Text = Environment.UserName
|
||||
TBHOTKEY_PATTERNSBindingSource.EndEdit()
|
||||
TBHOTKEY_PATTERNSTableAdapter.Update(MyDataset.TBHOTKEY_PATTERNS)
|
||||
Me.lblSavePAttern.Visible = True
|
||||
Else
|
||||
Me.lblSavePAttern.Visible = False
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Save Patterns: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click
|
||||
Dim result As MsgBoxResult
|
||||
result = MessageBox.Show("Sind Sie sicher dass Sie diesen Control-Match löschen wollen?", "Bestätigung erforderlich:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
If result = MsgBoxResult.Yes Then
|
||||
Try
|
||||
TBHOTKEY_WINDOW_HOOKTableAdapter.Delete(GUIDTextBox3.Text)
|
||||
Load_MatchPatterns()
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Delete Control-Match: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles btnnewProfile.Click
|
||||
txtProfilname.Text = ""
|
||||
txtWDSearch.Text = ""
|
||||
cmbFunktionstaste.SelectedIndex = -1
|
||||
txtKey.Text = ""
|
||||
GroupBoxMainWindow.Visible = False
|
||||
GroupBox2_Controls.Visible = False
|
||||
ListBox_FormTitles.Enabled = True
|
||||
btnAddCopypasteConfig.Enabled = True
|
||||
End Sub
|
||||
|
||||
Private Sub TEXT1TextBox_TextChanged(sender As Object, e As EventArgs) Handles TEXT1TextBox.TextChanged
|
||||
If TEXT1TextBox.Text = " " Then
|
||||
TEXT1TextBox.SelectAll()
|
||||
TEXT1TextBox.BackColor = Color.DarkOrange
|
||||
TEXT1TextBox.ForeColor = Color.White
|
||||
Else
|
||||
TEXT1TextBox.BackColor = Color.White
|
||||
TEXT1TextBox.ForeColor = Color.Black
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub frmHotKey_Add_Shown(sender As Object, e As EventArgs) Handles Me.Shown
|
||||
Form_loaded = True
|
||||
If GUIDTextBox.Text <> String.Empty Then
|
||||
GroupBoxPatterns.Visible = True
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub chklbUser_MouseEnter(sender As Object, e As EventArgs) Handles chklbUser.MouseEnter
|
||||
ToolTipController1.ShowHint("Rechtsklick für weitere Funktionen", "Hinweis:", DevExpress.Utils.ToolTipLocation.RightCenter)
|
||||
End Sub
|
||||
Private Sub chklbUser_MouseLeave(sender As Object, e As EventArgs) Handles chklbUser.MouseLeave
|
||||
ToolTipController1.HideHint()
|
||||
End Sub
|
||||
|
||||
Private Sub btnAddCopypasteConfig_Click(sender As Object, e As EventArgs) Handles btnAddCopypasteConfig.Click
|
||||
Try
|
||||
lblLinkCopyPaste.Visible = False
|
||||
If txtcopypastePatter.Text = "" Then
|
||||
Exit Sub
|
||||
End If
|
||||
Dim sql As String = "select max(guid) from tbhotkey_Profile where upper(name) = Upper('" & txtProfilname.Text & "')"
|
||||
Dim kopfid = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True)
|
||||
If IsDBNull(kopfid) Then
|
||||
TBHOTKEY_PROFILETableAdapter.Insert(txtProfilname.Text, "COPYPASTE", txtWDSearch.Text, cmbFunktionstaste.Text, txtKey.Text.ToUpper, ListBox_FormTitles.SelectedItem, Environment.UserName)
|
||||
Else
|
||||
TBHOTKEY_PROFILETableAdapter.cmdUpdate(txtProfilname.Text, "COPYPASTE", txtWDSearch.Text, cmbFunktionstaste.Text, txtKey.Text.ToUpper, ListBox_FormTitles.SelectedItem, Environment.UserName, kopfid)
|
||||
End If
|
||||
lblSaveHotkey.Visible = True
|
||||
sql = "select max(guid) from tbhotkey_Profile where upper(name) = Upper('" & txtProfilname.Text & "')"
|
||||
Dim id = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True)
|
||||
If id > 0 Then
|
||||
TBHOTKEY_PATTERNSTableAdapter.Insert(id, txtcopypastePatter.Text, cmbCopyPasteFunction.Text, Environment.UserName, txtControl.Text)
|
||||
lblLinkCopyPaste.Text = "Pattern-Link " & cmbCopyPasteFunction.Text & " || " & txtcopypastePatter.Text & " erfolgreich angelegt"
|
||||
lblLinkCopyPaste.Visible = True
|
||||
btnAddCopypasteConfig.Enabled = False
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in CopyPaste Add Pattern or Profile:")
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub cmbCopyPasteFunction_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbCopyPasteFunction.SelectedIndexChanged
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub chklbUserProfile_MouseEnter(sender As Object, e As EventArgs) Handles chklbUserProfile.MouseEnter
|
||||
ToolTipController1.ShowHint("Rechtsklick für weitere Funktionen", "Hinweis:", DevExpress.Utils.ToolTipLocation.RightCenter)
|
||||
End Sub
|
||||
|
||||
Private Sub chklbUserProfile_MouseLeave(sender As Object, e As EventArgs) Handles chklbUserProfile.MouseLeave
|
||||
ToolTipController1.HideHint()
|
||||
End Sub
|
||||
End Class
|
||||
343
Global_Indexer/frmHotkey_User.Designer.vb
generated
343
Global_Indexer/frmHotkey_User.Designer.vb
generated
@ -1,343 +0,0 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmHotkey_User
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim WD_SEARCHLabel As System.Windows.Forms.Label
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmHotkey_User))
|
||||
Dim HOTKEY2Label As System.Windows.Forms.Label
|
||||
Dim ADDED_WHENLabel As System.Windows.Forms.Label
|
||||
Dim CHANGED_WHOLabel As System.Windows.Forms.Label
|
||||
Dim CHANGED_WHENLabel As System.Windows.Forms.Label
|
||||
Dim HOTKEY1Label As System.Windows.Forms.Label
|
||||
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.MyDataset = New Global_Indexer.MyDataset()
|
||||
Me.TBHOTKEY_PROFILEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.TBHOTKEY_PROFILETableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBHOTKEY_PROFILETableAdapter()
|
||||
Me.TableAdapterManager = New Global_Indexer.MyDatasetTableAdapters.TableAdapterManager()
|
||||
Me.ListBox1 = New System.Windows.Forms.ListBox()
|
||||
Me.ListBoxMyHK = New System.Windows.Forms.ListBox()
|
||||
Me.TBMYHOTKEYSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.lblmeinehotkeys = New System.Windows.Forms.Label()
|
||||
Me.TBMYHOTKEYSTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBMYHOTKEYSTableAdapter()
|
||||
Me.btnAddtomyHK = New System.Windows.Forms.Button()
|
||||
Me.TBHOTKEY_USER_PROFILEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.TBHOTKEY_USER_PROFILETableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBHOTKEY_USER_PROFILETableAdapter()
|
||||
Me.WD_SEARCHTextBox = New System.Windows.Forms.TextBox()
|
||||
Me.HOTKEY2TextBox = New System.Windows.Forms.TextBox()
|
||||
Me.ADDED_WHENTextBox = New System.Windows.Forms.TextBox()
|
||||
Me.CHANGED_WHOTextBox = New System.Windows.Forms.TextBox()
|
||||
Me.CHANGED_WHENTextBox = New System.Windows.Forms.TextBox()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.chkbxMaximizeWS = New System.Windows.Forms.CheckBox()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.lblSave = New System.Windows.Forms.Label()
|
||||
Me.btnsave = New System.Windows.Forms.Button()
|
||||
Me.HOTKEY1ComboBox = New System.Windows.Forms.ComboBox()
|
||||
Me.btndelete = New System.Windows.Forms.Button()
|
||||
Me.OFDWindreamsuche = New System.Windows.Forms.OpenFileDialog()
|
||||
WD_SEARCHLabel = New System.Windows.Forms.Label()
|
||||
HOTKEY2Label = New System.Windows.Forms.Label()
|
||||
ADDED_WHENLabel = New System.Windows.Forms.Label()
|
||||
CHANGED_WHOLabel = New System.Windows.Forms.Label()
|
||||
CHANGED_WHENLabel = New System.Windows.Forms.Label()
|
||||
HOTKEY1Label = New System.Windows.Forms.Label()
|
||||
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBHOTKEY_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBMYHOTKEYSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBHOTKEY_USER_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'WD_SEARCHLabel
|
||||
'
|
||||
resources.ApplyResources(WD_SEARCHLabel, "WD_SEARCHLabel")
|
||||
WD_SEARCHLabel.Name = "WD_SEARCHLabel"
|
||||
'
|
||||
'HOTKEY2Label
|
||||
'
|
||||
resources.ApplyResources(HOTKEY2Label, "HOTKEY2Label")
|
||||
HOTKEY2Label.Name = "HOTKEY2Label"
|
||||
'
|
||||
'ADDED_WHENLabel
|
||||
'
|
||||
resources.ApplyResources(ADDED_WHENLabel, "ADDED_WHENLabel")
|
||||
ADDED_WHENLabel.Name = "ADDED_WHENLabel"
|
||||
'
|
||||
'CHANGED_WHOLabel
|
||||
'
|
||||
resources.ApplyResources(CHANGED_WHOLabel, "CHANGED_WHOLabel")
|
||||
CHANGED_WHOLabel.Name = "CHANGED_WHOLabel"
|
||||
'
|
||||
'CHANGED_WHENLabel
|
||||
'
|
||||
resources.ApplyResources(CHANGED_WHENLabel, "CHANGED_WHENLabel")
|
||||
CHANGED_WHENLabel.Name = "CHANGED_WHENLabel"
|
||||
'
|
||||
'HOTKEY1Label
|
||||
'
|
||||
resources.ApplyResources(HOTKEY1Label, "HOTKEY1Label")
|
||||
HOTKEY1Label.Name = "HOTKEY1Label"
|
||||
'
|
||||
'StatusStrip1
|
||||
'
|
||||
resources.ApplyResources(Me.StatusStrip1, "StatusStrip1")
|
||||
Me.StatusStrip1.Name = "StatusStrip1"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
resources.ApplyResources(Me.Label1, "Label1")
|
||||
Me.Label1.Name = "Label1"
|
||||
'
|
||||
'MyDataset
|
||||
'
|
||||
Me.MyDataset.DataSetName = "MyDataset"
|
||||
Me.MyDataset.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
|
||||
'
|
||||
'TBHOTKEY_PROFILEBindingSource
|
||||
'
|
||||
Me.TBHOTKEY_PROFILEBindingSource.DataMember = "TBHOTKEY_PROFILE"
|
||||
Me.TBHOTKEY_PROFILEBindingSource.DataSource = Me.MyDataset
|
||||
'
|
||||
'TBHOTKEY_PROFILETableAdapter
|
||||
'
|
||||
Me.TBHOTKEY_PROFILETableAdapter.ClearBeforeFill = True
|
||||
'
|
||||
'TableAdapterManager
|
||||
'
|
||||
Me.TableAdapterManager.BackupDataSetBeforeUpdate = False
|
||||
Me.TableAdapterManager.TBDD_CONNECTIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Me.TBHOTKEY_PROFILETableAdapter
|
||||
Me.TableAdapterManager.TBHOTKEY_USER_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_WINDOW_HOOKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.UpdateOrder = Global_Indexer.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'ListBox1
|
||||
'
|
||||
resources.ApplyResources(Me.ListBox1, "ListBox1")
|
||||
Me.ListBox1.DataSource = Me.TBHOTKEY_PROFILEBindingSource
|
||||
Me.ListBox1.DisplayMember = "String"
|
||||
Me.ListBox1.FormattingEnabled = True
|
||||
Me.ListBox1.Name = "ListBox1"
|
||||
Me.ListBox1.ValueMember = "GUID"
|
||||
'
|
||||
'ListBoxMyHK
|
||||
'
|
||||
resources.ApplyResources(Me.ListBoxMyHK, "ListBoxMyHK")
|
||||
Me.ListBoxMyHK.DataSource = Me.TBMYHOTKEYSBindingSource
|
||||
Me.ListBoxMyHK.DisplayMember = "String"
|
||||
Me.ListBoxMyHK.FormattingEnabled = True
|
||||
Me.ListBoxMyHK.Name = "ListBoxMyHK"
|
||||
Me.ListBoxMyHK.ValueMember = "GUID"
|
||||
'
|
||||
'TBMYHOTKEYSBindingSource
|
||||
'
|
||||
Me.TBMYHOTKEYSBindingSource.DataMember = "TBMYHOTKEYS"
|
||||
Me.TBMYHOTKEYSBindingSource.DataSource = Me.MyDataset
|
||||
'
|
||||
'lblmeinehotkeys
|
||||
'
|
||||
resources.ApplyResources(Me.lblmeinehotkeys, "lblmeinehotkeys")
|
||||
Me.lblmeinehotkeys.Name = "lblmeinehotkeys"
|
||||
'
|
||||
'TBMYHOTKEYSTableAdapter
|
||||
'
|
||||
Me.TBMYHOTKEYSTableAdapter.ClearBeforeFill = True
|
||||
'
|
||||
'btnAddtomyHK
|
||||
'
|
||||
resources.ApplyResources(Me.btnAddtomyHK, "btnAddtomyHK")
|
||||
Me.btnAddtomyHK.Image = Global.Global_Indexer.My.Resources.Resources.arrow_Forward_16xMD
|
||||
Me.btnAddtomyHK.Name = "btnAddtomyHK"
|
||||
Me.btnAddtomyHK.UseVisualStyleBackColor = True
|
||||
'
|
||||
'TBHOTKEY_USER_PROFILEBindingSource
|
||||
'
|
||||
Me.TBHOTKEY_USER_PROFILEBindingSource.DataMember = "TBHOTKEY_USER_PROFILE"
|
||||
Me.TBHOTKEY_USER_PROFILEBindingSource.DataSource = Me.MyDataset
|
||||
'
|
||||
'TBHOTKEY_USER_PROFILETableAdapter
|
||||
'
|
||||
Me.TBHOTKEY_USER_PROFILETableAdapter.ClearBeforeFill = True
|
||||
'
|
||||
'WD_SEARCHTextBox
|
||||
'
|
||||
resources.ApplyResources(Me.WD_SEARCHTextBox, "WD_SEARCHTextBox")
|
||||
Me.WD_SEARCHTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBHOTKEY_USER_PROFILEBindingSource, "WD_SEARCH", True))
|
||||
Me.WD_SEARCHTextBox.Name = "WD_SEARCHTextBox"
|
||||
'
|
||||
'HOTKEY2TextBox
|
||||
'
|
||||
resources.ApplyResources(Me.HOTKEY2TextBox, "HOTKEY2TextBox")
|
||||
Me.HOTKEY2TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBHOTKEY_USER_PROFILEBindingSource, "HOTKEY2", True))
|
||||
Me.HOTKEY2TextBox.Name = "HOTKEY2TextBox"
|
||||
'
|
||||
'ADDED_WHENTextBox
|
||||
'
|
||||
resources.ApplyResources(Me.ADDED_WHENTextBox, "ADDED_WHENTextBox")
|
||||
Me.ADDED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBHOTKEY_USER_PROFILEBindingSource, "ADDED_WHEN", True))
|
||||
Me.ADDED_WHENTextBox.Name = "ADDED_WHENTextBox"
|
||||
'
|
||||
'CHANGED_WHOTextBox
|
||||
'
|
||||
resources.ApplyResources(Me.CHANGED_WHOTextBox, "CHANGED_WHOTextBox")
|
||||
Me.CHANGED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBHOTKEY_USER_PROFILEBindingSource, "CHANGED_WHO", True))
|
||||
Me.CHANGED_WHOTextBox.Name = "CHANGED_WHOTextBox"
|
||||
'
|
||||
'CHANGED_WHENTextBox
|
||||
'
|
||||
resources.ApplyResources(Me.CHANGED_WHENTextBox, "CHANGED_WHENTextBox")
|
||||
Me.CHANGED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBHOTKEY_USER_PROFILEBindingSource, "CHANGED_WHEN", True))
|
||||
Me.CHANGED_WHENTextBox.Name = "CHANGED_WHENTextBox"
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
resources.ApplyResources(Me.GroupBox1, "GroupBox1")
|
||||
Me.GroupBox1.Controls.Add(Me.chkbxMaximizeWS)
|
||||
Me.GroupBox1.Controls.Add(Me.Button1)
|
||||
Me.GroupBox1.Controls.Add(Me.lblSave)
|
||||
Me.GroupBox1.Controls.Add(Me.btnsave)
|
||||
Me.GroupBox1.Controls.Add(Me.HOTKEY1ComboBox)
|
||||
Me.GroupBox1.Controls.Add(Me.CHANGED_WHENTextBox)
|
||||
Me.GroupBox1.Controls.Add(CHANGED_WHENLabel)
|
||||
Me.GroupBox1.Controls.Add(HOTKEY1Label)
|
||||
Me.GroupBox1.Controls.Add(WD_SEARCHLabel)
|
||||
Me.GroupBox1.Controls.Add(Me.CHANGED_WHOTextBox)
|
||||
Me.GroupBox1.Controls.Add(CHANGED_WHOLabel)
|
||||
Me.GroupBox1.Controls.Add(Me.WD_SEARCHTextBox)
|
||||
Me.GroupBox1.Controls.Add(HOTKEY2Label)
|
||||
Me.GroupBox1.Controls.Add(Me.ADDED_WHENTextBox)
|
||||
Me.GroupBox1.Controls.Add(ADDED_WHENLabel)
|
||||
Me.GroupBox1.Controls.Add(Me.HOTKEY2TextBox)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.TabStop = False
|
||||
'
|
||||
'chkbxMaximizeWS
|
||||
'
|
||||
resources.ApplyResources(Me.chkbxMaximizeWS, "chkbxMaximizeWS")
|
||||
Me.chkbxMaximizeWS.CheckState = System.Windows.Forms.CheckState.Checked
|
||||
Me.chkbxMaximizeWS.Name = "chkbxMaximizeWS"
|
||||
Me.chkbxMaximizeWS.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
resources.ApplyResources(Me.Button1, "Button1")
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblSave
|
||||
'
|
||||
resources.ApplyResources(Me.lblSave, "lblSave")
|
||||
Me.lblSave.BackColor = System.Drawing.Color.Yellow
|
||||
Me.lblSave.Name = "lblSave"
|
||||
'
|
||||
'btnsave
|
||||
'
|
||||
resources.ApplyResources(Me.btnsave, "btnsave")
|
||||
Me.btnsave.Image = Global.Global_Indexer.My.Resources.Resources.save_16xLG
|
||||
Me.btnsave.Name = "btnsave"
|
||||
Me.btnsave.UseVisualStyleBackColor = True
|
||||
'
|
||||
'HOTKEY1ComboBox
|
||||
'
|
||||
resources.ApplyResources(Me.HOTKEY1ComboBox, "HOTKEY1ComboBox")
|
||||
Me.HOTKEY1ComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBHOTKEY_USER_PROFILEBindingSource, "HOTKEY1", True))
|
||||
Me.HOTKEY1ComboBox.FormattingEnabled = True
|
||||
Me.HOTKEY1ComboBox.Items.AddRange(New Object() {resources.GetString("HOTKEY1ComboBox.Items"), resources.GetString("HOTKEY1ComboBox.Items1"), resources.GetString("HOTKEY1ComboBox.Items2"), resources.GetString("HOTKEY1ComboBox.Items3")})
|
||||
Me.HOTKEY1ComboBox.Name = "HOTKEY1ComboBox"
|
||||
'
|
||||
'btndelete
|
||||
'
|
||||
resources.ApplyResources(Me.btndelete, "btndelete")
|
||||
Me.btndelete.Image = Global.Global_Indexer.My.Resources.Resources.delete_12x12
|
||||
Me.btndelete.Name = "btndelete"
|
||||
Me.btndelete.UseVisualStyleBackColor = True
|
||||
'
|
||||
'OFDWindreamsuche
|
||||
'
|
||||
resources.ApplyResources(Me.OFDWindreamsuche, "OFDWindreamsuche")
|
||||
Me.OFDWindreamsuche.RestoreDirectory = True
|
||||
'
|
||||
'frmHotkey_User
|
||||
'
|
||||
resources.ApplyResources(Me, "$this")
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.Controls.Add(Me.btndelete)
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Controls.Add(Me.btnAddtomyHK)
|
||||
Me.Controls.Add(Me.lblmeinehotkeys)
|
||||
Me.Controls.Add(Me.ListBoxMyHK)
|
||||
Me.Controls.Add(Me.ListBox1)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.StatusStrip1)
|
||||
Me.Name = "frmHotkey_User"
|
||||
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBHOTKEY_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBMYHOTKEYSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBHOTKEY_USER_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents MyDataset As Global_Indexer.MyDataset
|
||||
Friend WithEvents TBHOTKEY_PROFILEBindingSource As System.Windows.Forms.BindingSource
|
||||
Friend WithEvents TBHOTKEY_PROFILETableAdapter As Global_Indexer.MyDatasetTableAdapters.TBHOTKEY_PROFILETableAdapter
|
||||
Friend WithEvents TableAdapterManager As Global_Indexer.MyDatasetTableAdapters.TableAdapterManager
|
||||
Friend WithEvents ListBox1 As System.Windows.Forms.ListBox
|
||||
Friend WithEvents ListBoxMyHK As System.Windows.Forms.ListBox
|
||||
Friend WithEvents lblmeinehotkeys As System.Windows.Forms.Label
|
||||
Friend WithEvents TBMYHOTKEYSBindingSource As System.Windows.Forms.BindingSource
|
||||
Friend WithEvents TBMYHOTKEYSTableAdapter As Global_Indexer.MyDatasetTableAdapters.TBMYHOTKEYSTableAdapter
|
||||
Friend WithEvents btnAddtomyHK As System.Windows.Forms.Button
|
||||
Friend WithEvents TBHOTKEY_USER_PROFILEBindingSource As System.Windows.Forms.BindingSource
|
||||
Friend WithEvents TBHOTKEY_USER_PROFILETableAdapter As Global_Indexer.MyDatasetTableAdapters.TBHOTKEY_USER_PROFILETableAdapter
|
||||
Friend WithEvents WD_SEARCHTextBox As System.Windows.Forms.TextBox
|
||||
Friend WithEvents HOTKEY2TextBox As System.Windows.Forms.TextBox
|
||||
Friend WithEvents ADDED_WHENTextBox As System.Windows.Forms.TextBox
|
||||
Friend WithEvents CHANGED_WHOTextBox As System.Windows.Forms.TextBox
|
||||
Friend WithEvents CHANGED_WHENTextBox As System.Windows.Forms.TextBox
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents HOTKEY1ComboBox As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents btnsave As System.Windows.Forms.Button
|
||||
Friend WithEvents btndelete As System.Windows.Forms.Button
|
||||
Friend WithEvents lblSave As System.Windows.Forms.Label
|
||||
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||
Friend WithEvents OFDWindreamsuche As System.Windows.Forms.OpenFileDialog
|
||||
Friend WithEvents chkbxMaximizeWS As System.Windows.Forms.CheckBox
|
||||
End Class
|
||||
@ -1,330 +0,0 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="WD_SEARCHLabel.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>99, 13</value>
|
||||
</data>
|
||||
<data name="WD_SEARCHLabel.Text" xml:space="preserve">
|
||||
<value>windream-Search:</value>
|
||||
</data>
|
||||
<data name="HOTKEY1Label.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>74, 13</value>
|
||||
</data>
|
||||
<data name="HOTKEY1Label.Text" xml:space="preserve">
|
||||
<value>Modifier key:</value>
|
||||
</data>
|
||||
<data name="Label1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>136, 15</value>
|
||||
</data>
|
||||
<data name="Label1.Text" xml:space="preserve">
|
||||
<value>Current Global Hotkeys:</value>
|
||||
</data>
|
||||
<data name="lblmeinehotkeys.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>69, 15</value>
|
||||
</data>
|
||||
<data name="lblmeinehotkeys.Text" xml:space="preserve">
|
||||
<value>My Hotkeys</value>
|
||||
</data>
|
||||
<data name="btnAddtomyHK.Text" xml:space="preserve">
|
||||
<value>Add</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Text" xml:space="preserve">
|
||||
<value>Edit Hotkey:</value>
|
||||
</data>
|
||||
<data name="chkbxMaximizeWS.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>195, 17</value>
|
||||
</data>
|
||||
<data name="chkbxMaximizeWS.Text" xml:space="preserve">
|
||||
<value>Start windream-Suche maximized</value>
|
||||
</data>
|
||||
<data name="lblSave.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>145, 13</value>
|
||||
</data>
|
||||
<data name="lblSave.Text" xml:space="preserve">
|
||||
<value>Hotkey successfully saved!</value>
|
||||
</data>
|
||||
<data name="btnsave.Text" xml:space="preserve">
|
||||
<value>Save</value>
|
||||
</data>
|
||||
<data name="btndelete.Text" xml:space="preserve">
|
||||
<value>Delete</value>
|
||||
</data>
|
||||
<data name="OFDWindreamsuche.Filter" xml:space="preserve">
|
||||
<value>windream-Search|*.wdf|All Files|*.*</value>
|
||||
</data>
|
||||
<data name="OFDWindreamsuche.Title" xml:space="preserve">
|
||||
<value>Select windream-Search</value>
|
||||
</data>
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAYAICAQAAEABADoAgAAZgAAABAQEAABAAQAKAEAAE4DAAAgIAAAAQAIAKgIAAB2BAAAEBAAAAEA
|
||||
CABoBQAAHg0AACAgAAABABgAqAwAAIYSAAAQEAAAAQAYAGgDAAAuHwAAKAAAACAAAABAAAAAAQAEAAAA
|
||||
AAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICAAACAgIAAwMDAAAAA
|
||||
/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wD///////////////////////////////////////////93
|
||||
d3d3d3d3d3d3d3d3d///d3d3d3d3d3d3d3d3d3f//3d3d3d3d3d3d3d3d3d3//93d3d3d3d3d3d3d3d3
|
||||
d///d3f/////////////d3f//3d3/////////////3d3//93d/////////////93d///d3f/////////
|
||||
////d3f//3d3///4j////////3d3//93d///h3j///j///93d///d3f//4d3j//3j///d3f//3d3///4
|
||||
d3j/93j//3d3//93d////4d3j/d3//93d///d3f////4d3j3d///d3f//3d3/////4d3h3f//3d3//93
|
||||
d//////4d3d3//93d///d3f//////4d3d///d3f//3d3///4d3d3d3f//3d3//93d////4d3d3d3//93
|
||||
d///d3f////4d3d3d///d3f//3d3/////////////3d3//93d/////////////93d///d3f/////////
|
||||
////d3f//3d3/////////////3d3//93d3d3d3d3d3d3d3d3d///d3d3d3d3d3d3d3d3d3f//3d3d3d3
|
||||
d3d3d3d3d3d3//93d3d3d3d3d3d3d3d3d////////////////////////////////////////////wAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAKAAAABAAAAAgAAAAAQAEAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAACA
|
||||
gACAAAAAgACAAICAAACAgIAAwMDAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wD///////////d3
|
||||
d3d3d3d/93d3d3d3d3/3f//////3f/d///////d/93/4j/j/93/3f/h494/3f/d//4eHf/d/93//+Hd/
|
||||
93/3f/h3d3/3f/d//4d3f/d/93//////93/3f//////3f/d3d3d3d3d/93d3d3d3d3///////////wAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAoAAAAIAAAAEAAAAABAAgAAAAAAAAEAAAAAAAAAAAAAAABAAAAAQAAAAAAAEJCQgCvrq8A8e/wAPb2
|
||||
9gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA////AAQEBAQEBAQEBAQEBAQE
|
||||
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAEBAQEBAQEB
|
||||
AQEBAQEBAQEBAQEBAQEBAQEBAQEEBAQEAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQQEBAQBAQEB
|
||||
AQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBBAQEBAEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEEBAQE
|
||||
AQEBAQMDAwMDAwMDAwMDAwMDAwMDAwMDAQEBAQQEBAQBAQEBAwMDAwMDAwMDAwMDAwMDAwMDAwMBAQEB
|
||||
BAQEBAEBAQEDAwMDAwMDAwMDAwMDAwMDAwMDAwEBAQEEBAQEAQEBAQMDAwMDAwMDAwMDAwMDAwMDAwMD
|
||||
AQEBAQQEBAQBAQEBAwMDAwMCAgMDAwMDAwMDAwMDAwMBAQEBBAQEBAEBAQEDAwMDAgEBAgMDAwMDAgMD
|
||||
AwMDAwEBAQEEBAQEAQEBAQMDAwMCAQEBAgMDAwMBAgMDAwMDAQEBAQQEBAQBAQEBAwMDAwMCAQEBAgMD
|
||||
AwEBAgMDAwMBAQEBBAQEBAEBAQEDAwMDAwMCAQEBAgMDAQEBAwMDAwEBAQEEBAQEAQEBAQMDAwMDAwMC
|
||||
AQEBAgMBAQEDAwMDAQEBAQQEBAQBAQEBAwMDAwMDAwMCAQEBAgEBAQMDAwMBAQEBBAQEBAEBAQEDAwMD
|
||||
AwMDAwMCAQEBAQEBAwMDAwEBAQEEBAQEAQEBAQMDAwMDAwMDAwMCAQEBAQEDAwMDAQEBAQQEBAQBAQEB
|
||||
AwMDAwMCAQEBAQEBAQEBAQMDAwMBAQEBBAQEBAEBAQEDAwMDAwMCAQEBAQEBAQEBAwMDAwEBAQEEBAQE
|
||||
AQEBAQMDAwMDAwMCAQEBAQEBAQEDAwMDAQEBAQQEBAQBAQEBAwMDAwMDAwMDAwMDAwMDAwMDAwMBAQEB
|
||||
BAQEBAEBAQEDAwMDAwMDAwMDAwMDAwMDAwMDAwEBAQEEBAQEAQEBAQMDAwMDAwMDAwMDAwMDAwMDAwMD
|
||||
AQEBAQQEBAQBAQEBAwMDAwMDAwMDAwMDAwMDAwMDAwMBAQEBBAQEBAEBAQEBAQEBAQEBAQEBAQEBAQEB
|
||||
AQEBAQEBAQEEBAQEAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQQEBAQBAQEBAQEBAQEBAQEBAQEB
|
||||
AQEBAQEBAQEBAQEBBAQEBAEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEEBAQEBAQEBAQEBAQEBAQE
|
||||
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgA
|
||||
AAAQAAAAIAAAAAEACAAAAAAAAAEAAAAAAAAAAAAAAAEAAAABAAAAAAAAQkJCAK+urwDx7/AA9vb2AAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8ABAQEBAQEBAQEBAQEBAQEBAQB
|
||||
AQEBAQEBAQEBAQEBAQQEAQEBAQEBAQEBAQEBAQEEBAEBAwMDAwMDAwMDAwEBBAQBAQMDAwMDAwMDAwMB
|
||||
AQQEAQEDAwICAwMCAwMDAQEEBAEBAwMCAQIDAQIDAwEBBAQBAQMDAwIBAgEBAwMBAQQEAQEDAwMDAgEB
|
||||
AQMDAQEEBAEBAwMCAQEBAQEDAwEBBAQBAQMDAwIBAQEBAwMBAQQEAQEDAwMDAwMDAwMDAQEEBAEBAwMD
|
||||
AwMDAwMDAwEBBAQBAQEBAQEBAQEBAQEBAQQEAQEBAQEBAQEBAQEBAQEEBAQEBAQEBAQEBAQEBAQEBAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAoAAAAIAAAAEAAAAABABgAAAAAAAAMAAAAAAAAAAAAAAAAAAAAAAAA9vb29vb29vb29vb29vb29vb2
|
||||
9vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb2
|
||||
9vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb2
|
||||
9vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb2
|
||||
QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
9vb29vb29vb29vb2QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC
|
||||
QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
QkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w
|
||||
8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC9vb29vb29vb29vb2
|
||||
QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w
|
||||
8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w
|
||||
8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC
|
||||
9vb29vb29vb29vb2QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w
|
||||
8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC
|
||||
8e/w8e/w8e/w8e/w8e/wr66vr66v8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w
|
||||
QkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/wr66vQkJCQkJCr66v
|
||||
8e/w8e/w8e/w8e/w8e/wr66v8e/w8e/w8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC9vb29vb29vb29vb2
|
||||
QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/wr66vQkJCQkJCQkJCr66v8e/w8e/w8e/w8e/wQkJCr66v8e/w
|
||||
8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w
|
||||
8e/wr66vQkJCQkJCQkJCr66v8e/w8e/w8e/wQkJCQkJCr66v8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC
|
||||
9vb29vb29vb29vb2QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w8e/w8e/wr66vQkJCQkJCQkJCr66v8e/w
|
||||
8e/wQkJCQkJCQkJC8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC
|
||||
8e/w8e/w8e/w8e/w8e/w8e/w8e/wr66vQkJCQkJCQkJCr66v8e/wQkJCQkJCQkJC8e/w8e/w8e/w8e/w
|
||||
QkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w
|
||||
r66vQkJCQkJCQkJCr66vQkJCQkJCQkJC8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC9vb29vb29vb29vb2
|
||||
QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/wr66vQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w
|
||||
8e/w8e/w8e/w8e/w8e/w8e/wr66vQkJCQkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC
|
||||
9vb29vb29vb29vb2QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w8e/wr66vQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC
|
||||
8e/w8e/w8e/w8e/w8e/w8e/wr66vQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w
|
||||
QkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w8e/w8e/w8e/wr66v
|
||||
QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC9vb29vb29vb29vb2
|
||||
QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w
|
||||
8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w
|
||||
8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC
|
||||
9vb29vb29vb29vb2QkJCQkJCQkJCQkJC8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w
|
||||
8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/wQkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJC
|
||||
8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w
|
||||
QkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC9vb29vb29vb29vb2
|
||||
QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC9vb29vb29vb29vb2QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
9vb29vb29vb29vb2QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC9vb29vb29vb29vb29vb29vb29vb29vb2
|
||||
9vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb2
|
||||
9vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb2
|
||||
9vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb2AAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAoAAAAEAAAACAAAAABABgAAAAAAAADAAAAAAAAAAAAAAAAAAAAAAAA9vb29vb29vb29vb29vb29vb2
|
||||
9vb29vb29vb29vb29vb29vb29vb29vb29vb29vb29vb2QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
QkJCQkJCQkJCQkJCQkJC9vb29vb2QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC
|
||||
QkJC9vb29vb2QkJCQkJC8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/wQkJCQkJC9vb29vb2QkJC
|
||||
QkJC8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/wQkJCQkJC9vb29vb2QkJCQkJC8e/w8e/wr66v
|
||||
r66v8e/w8e/wr66v8e/w8e/w8e/wQkJCQkJC9vb29vb2QkJCQkJC8e/w8e/wr66vQkJCr66v8e/wQkJC
|
||||
r66v8e/w8e/wQkJCQkJC9vb29vb2QkJCQkJC8e/w8e/w8e/wr66vQkJCr66vQkJCQkJC8e/w8e/wQkJC
|
||||
QkJC9vb29vb2QkJCQkJC8e/w8e/w8e/w8e/wr66vQkJCQkJCQkJC8e/w8e/wQkJCQkJC9vb29vb2QkJC
|
||||
QkJC8e/w8e/wr66vQkJCQkJCQkJCQkJCQkJC8e/w8e/wQkJCQkJC9vb29vb2QkJCQkJC8e/w8e/w8e/w
|
||||
r66vQkJCQkJCQkJCQkJC8e/w8e/wQkJCQkJC9vb29vb2QkJCQkJC8e/w8e/w8e/w8e/w8e/w8e/w8e/w
|
||||
8e/w8e/w8e/wQkJCQkJC9vb29vb2QkJCQkJC8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/w8e/wQkJC
|
||||
QkJC9vb29vb2QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC9vb29vb2QkJC
|
||||
QkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJCQkJC9vb29vb29vb29vb29vb29vb29vb2
|
||||
9vb29vb29vb29vb29vb29vb29vb29vb29vb29vb2AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==
|
||||
</value>
|
||||
</data>
|
||||
<data name="$this.Text" xml:space="preserve">
|
||||
<value>My Hotkeys</value>
|
||||
</data>
|
||||
</root>
|
||||
File diff suppressed because it is too large
Load Diff
@ -1,111 +0,0 @@
|
||||
Public Class frmHotkey_User
|
||||
|
||||
Private Sub TBHOTKEY_PROFILEBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs)
|
||||
Me.Validate()
|
||||
Me.TBHOTKEY_PROFILEBindingSource.EndEdit()
|
||||
Me.TableAdapterManager.UpdateAll(Me.MyDataset)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frmHotkey_User_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
'TODO: Diese Codezeile lädt Daten in die Tabelle "MyDataset.TBHOTKEY_USER_PROFILE". Sie können sie bei Bedarf verschieben oder entfernen.
|
||||
|
||||
Try
|
||||
Me.TBHOTKEY_PROFILETableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
Me.TBMYHOTKEYSTableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
Me.TBHOTKEY_USER_PROFILETableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
Me.TBHOTKEY_PROFILETableAdapter.Fill(Me.MyDataset.TBHOTKEY_PROFILE)
|
||||
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
Me.lblmeinehotkeys.Text = "My (" & Environment.UserName & ") Hotkeys:"
|
||||
Else
|
||||
Me.lblmeinehotkeys.Text = "Meine (" & Environment.UserName & ") Hotkeys:"
|
||||
End If
|
||||
|
||||
LoadMyHotkeys(USER_ID)
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Load Form: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub LoadMyHotkeys(UserID As Integer)
|
||||
Try
|
||||
Me.TBMYHOTKEYSTableAdapter.Fill(Me.MyDataset.TBMYHOTKEYS, UserID)
|
||||
Catch ex As System.Exception
|
||||
MsgBox("Error in LoadMyHotkeys: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btnAddtomyHK_Click(sender As Object, e As EventArgs) Handles btnAddtomyHK.Click
|
||||
Try
|
||||
If ListBox1.SelectedIndex <> -1 Then
|
||||
TBHOTKEY_USER_PROFILETableAdapter.cmdInsert(USER_ID, ListBox1.SelectedValue)
|
||||
LoadMyHotkeys(USER_ID)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Add MyHotkey: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
Sub Load_MyProfile(HKPROFILE_ID As Integer)
|
||||
Try
|
||||
Me.TBHOTKEY_USER_PROFILETableAdapter.Fill(Me.MyDataset.TBHOTKEY_USER_PROFILE, HKPROFILE_ID)
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Load_MyProfile: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub ListBoxMyHK_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBoxMyHK.SelectedIndexChanged
|
||||
If ListBoxMyHK.SelectedIndex <> -1 Then
|
||||
Console.WriteLine(ListBoxMyHK.SelectedValue)
|
||||
Load_MyProfile(ListBoxMyHK.SelectedValue)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btndelete_Click(sender As Object, e As EventArgs) Handles btndelete.Click
|
||||
If ListBoxMyHK.SelectedIndex <> -1 Then
|
||||
Me.TBHOTKEY_USER_PROFILETableAdapter.Delete(ListBoxMyHK.SelectedValue)
|
||||
LoadMyHotkeys(USER_ID)
|
||||
Me.MyDataset.TBHOTKEY_USER_PROFILE.Clear()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnsave_Click(sender As Object, e As EventArgs) Handles btnsave.Click
|
||||
Try
|
||||
TBHOTKEY_USER_PROFILEBindingSource.EndEdit()
|
||||
If Me.MyDataset.TBHOTKEY_USER_PROFILE.GetChanges Is Nothing = False Then
|
||||
Me.CHANGED_WHOTextBox.Text = Environment.UserName
|
||||
TBHOTKEY_USER_PROFILEBindingSource.EndEdit()
|
||||
TBHOTKEY_USER_PROFILETableAdapter.Update(MyDataset.TBHOTKEY_USER_PROFILE)
|
||||
Me.lblSave.Visible = True
|
||||
LoadMyHotkeys(USER_ID)
|
||||
Else
|
||||
Me.lblSave.Visible = False
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Save My Profile: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
If Not Me.WD_SEARCHTextBox.Text = "" Then
|
||||
Me.OFDWindreamsuche.FileName = Me.WD_SEARCHTextBox.Text
|
||||
End If
|
||||
|
||||
If Me.OFDWindreamsuche.ShowDialog = Windows.Forms.DialogResult.OK Then
|
||||
Me.WD_SEARCHTextBox.Text = Me.OFDWindreamsuche.FileName
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub HOTKEY2TextBox_KeyDown(sender As Object, e As KeyEventArgs) Handles HOTKEY2TextBox.KeyDown
|
||||
HOTKEY2TextBox.Text = ""
|
||||
End Sub
|
||||
|
||||
Private Sub chkbxMaximizeWS_CheckedChanged(sender As Object, e As EventArgs) Handles chkbxMaximizeWS.CheckedChanged
|
||||
CONFIG.Config.WindreamSearchMaximized = chkbxMaximizeWS.Checked
|
||||
CONFIG.Save()
|
||||
End Sub
|
||||
End Class
|
||||
5
Global_Indexer/frmIndex.designer.vb
generated
5
Global_Indexer/frmIndex.designer.vb
generated
@ -322,11 +322,6 @@ Partial Class frmIndex
|
||||
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_REGEX_DOCTYPETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_USER_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_WINDOW_HOOKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.UpdateOrder = Global_Indexer.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'VWINDEX_AUTOMBindingSource1
|
||||
|
||||
@ -1,15 +1,10 @@
|
||||
Imports System.Windows.Forms
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports System.IO
|
||||
Imports System.Text.RegularExpressions
|
||||
Imports Independentsoft
|
||||
Imports Oracle.ManagedDataAccess.Client
|
||||
Imports System.Text
|
||||
Imports System.Security.AccessControl
|
||||
Imports System.Security.Principal
|
||||
Imports System.DirectoryServices
|
||||
Imports DevExpress.XtraEditors.Controls
|
||||
Imports System.ComponentModel
|
||||
Imports DigitalData.Modules.Logging
|
||||
|
||||
Public Class frmIndex
|
||||
@ -1844,10 +1839,10 @@ Public Class frmIndex
|
||||
End If
|
||||
Next
|
||||
|
||||
|
||||
'TODO: Replace Windream Patterns?
|
||||
oSqlResult = ClassPatterns.ReplaceControlValues(oSqlResult, pnlIndex)
|
||||
oSqlResult = ClassPatterns.ReplaceInternalValues(oSqlResult)
|
||||
oSqlResult = ClassPatterns.ReplaceUserValues(oSqlResult, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_LANGUAGE, USER_EMAIL, USER_ID, CURRENT_DOKART_ID)
|
||||
|
||||
If oSqlResult <> String.Empty Then
|
||||
_Logger.Debug("oSqlResult after Replace [" & oSqlResult & "]")
|
||||
End If
|
||||
|
||||
5
Global_Indexer/frmIndexFileList.Designer.vb
generated
5
Global_Indexer/frmIndexFileList.Designer.vb
generated
@ -95,11 +95,6 @@ Partial Class frmIndexFileList
|
||||
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_REGEX_DOCTYPETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_USER_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_WINDOW_HOOKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.UpdateOrder = Global_Indexer.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'Button2
|
||||
|
||||
5
Global_Indexer/frmNamenkonvention.designer.vb
generated
5
Global_Indexer/frmNamenkonvention.designer.vb
generated
@ -208,11 +208,6 @@ Partial Class frmNamenkonvention
|
||||
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_REGEX_DOCTYPETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_USER_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_WINDOW_HOOKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.UpdateOrder = Global_Indexer.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'TBDD_INDEX_AUTOMTableAdapter
|
||||
|
||||
5
Global_Indexer/frmSQLConfigAutoIndex.Designer.vb
generated
5
Global_Indexer/frmSQLConfigAutoIndex.Designer.vb
generated
@ -130,11 +130,6 @@ Partial Class SQLConfigAutoIndex
|
||||
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_USER_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_WINDOW_HOOKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.UpdateOrder = Global_Indexer.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'Button1
|
||||
|
||||
5
Global_Indexer/frmSQLSuggestion.Designer.vb
generated
5
Global_Indexer/frmSQLSuggestion.Designer.vb
generated
@ -137,11 +137,6 @@ Partial Class frmSQLSuggestion
|
||||
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_USER_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_WINDOW_HOOKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.UpdateOrder = Global_Indexer.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'Button1
|
||||
|
||||
42
Global_Indexer/frmStart.Designer.vb
generated
42
Global_Indexer/frmStart.Designer.vb
generated
@ -27,11 +27,8 @@ Partial Class frmStart
|
||||
Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
|
||||
Me.KonfigurationToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.AdministrationToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.GlobalIndexerEinstellungenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.HotkeyEisntellungenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.GrundeinstellungenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.FrmHotkeyAddToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.HistoryIndexierteDateienToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.InfoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
|
||||
@ -48,14 +45,11 @@ Partial Class frmStart
|
||||
Me.LabelVersion = New DevExpress.XtraBars.BarStaticItem()
|
||||
Me.RibbonMiniToolbar1 = New DevExpress.XtraBars.Ribbon.RibbonMiniToolbar(Me.components)
|
||||
Me.MyDataset = New Global_Indexer.MyDataset()
|
||||
Me.TBHOTKEY_USER_PROFILEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.TBHOTKEY_USER_PROFILETableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBHOTKEY_USER_PROFILETableAdapter()
|
||||
Me.TableAdapterManager = New Global_Indexer.MyDatasetTableAdapters.TableAdapterManager()
|
||||
Me.btnChoosefiles = New System.Windows.Forms.Button()
|
||||
Me.MenuStrip1.SuspendLayout()
|
||||
Me.StatusStrip1.SuspendLayout()
|
||||
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBHOTKEY_USER_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'MenuStrip1
|
||||
@ -67,29 +61,17 @@ Partial Class frmStart
|
||||
'KonfigurationToolStripMenuItem
|
||||
'
|
||||
Me.KonfigurationToolStripMenuItem.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
|
||||
Me.KonfigurationToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AdministrationToolStripMenuItem, Me.ToolStripSeparator1, Me.GrundeinstellungenToolStripMenuItem, Me.FrmHotkeyAddToolStripMenuItem, Me.HistoryIndexierteDateienToolStripMenuItem, Me.InfoToolStripMenuItem})
|
||||
Me.KonfigurationToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AdministrationToolStripMenuItem, Me.ToolStripSeparator1, Me.GrundeinstellungenToolStripMenuItem, Me.HistoryIndexierteDateienToolStripMenuItem, Me.InfoToolStripMenuItem})
|
||||
Me.KonfigurationToolStripMenuItem.Image = Global.Global_Indexer.My.Resources.Resources.gear_32xLG
|
||||
Me.KonfigurationToolStripMenuItem.Name = "KonfigurationToolStripMenuItem"
|
||||
resources.ApplyResources(Me.KonfigurationToolStripMenuItem, "KonfigurationToolStripMenuItem")
|
||||
'
|
||||
'AdministrationToolStripMenuItem
|
||||
'
|
||||
Me.AdministrationToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.GlobalIndexerEinstellungenToolStripMenuItem, Me.HotkeyEisntellungenToolStripMenuItem})
|
||||
Me.AdministrationToolStripMenuItem.Image = Global.Global_Indexer.My.Resources.Resources.Einstellungen6
|
||||
Me.AdministrationToolStripMenuItem.Name = "AdministrationToolStripMenuItem"
|
||||
resources.ApplyResources(Me.AdministrationToolStripMenuItem, "AdministrationToolStripMenuItem")
|
||||
'
|
||||
'GlobalIndexerEinstellungenToolStripMenuItem
|
||||
'
|
||||
Me.GlobalIndexerEinstellungenToolStripMenuItem.Name = "GlobalIndexerEinstellungenToolStripMenuItem"
|
||||
resources.ApplyResources(Me.GlobalIndexerEinstellungenToolStripMenuItem, "GlobalIndexerEinstellungenToolStripMenuItem")
|
||||
'
|
||||
'HotkeyEisntellungenToolStripMenuItem
|
||||
'
|
||||
Me.HotkeyEisntellungenToolStripMenuItem.Image = Global.Global_Indexer.My.Resources.Resources.Shortcut_8169_16x
|
||||
Me.HotkeyEisntellungenToolStripMenuItem.Name = "HotkeyEisntellungenToolStripMenuItem"
|
||||
resources.ApplyResources(Me.HotkeyEisntellungenToolStripMenuItem, "HotkeyEisntellungenToolStripMenuItem")
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
@ -100,12 +82,6 @@ Partial Class frmStart
|
||||
Me.GrundeinstellungenToolStripMenuItem.Name = "GrundeinstellungenToolStripMenuItem"
|
||||
resources.ApplyResources(Me.GrundeinstellungenToolStripMenuItem, "GrundeinstellungenToolStripMenuItem")
|
||||
'
|
||||
'FrmHotkeyAddToolStripMenuItem
|
||||
'
|
||||
Me.FrmHotkeyAddToolStripMenuItem.Image = Global.Global_Indexer.My.Resources.Resources.Shortcut_8169_16x
|
||||
Me.FrmHotkeyAddToolStripMenuItem.Name = "FrmHotkeyAddToolStripMenuItem"
|
||||
resources.ApplyResources(Me.FrmHotkeyAddToolStripMenuItem, "FrmHotkeyAddToolStripMenuItem")
|
||||
'
|
||||
'HistoryIndexierteDateienToolStripMenuItem
|
||||
'
|
||||
Me.HistoryIndexierteDateienToolStripMenuItem.Name = "HistoryIndexierteDateienToolStripMenuItem"
|
||||
@ -189,13 +165,10 @@ Partial Class frmStart
|
||||
Me.MyDataset.DataSetName = "MyDataset"
|
||||
Me.MyDataset.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
|
||||
'
|
||||
'TBHOTKEY_USER_PROFILETableAdapter
|
||||
'
|
||||
Me.TBHOTKEY_USER_PROFILETableAdapter.ClearBeforeFill = True
|
||||
'
|
||||
'TableAdapterManager
|
||||
'
|
||||
Me.TableAdapterManager.BackupDataSetBeforeUpdate = False
|
||||
Me.TableAdapterManager.Connection = Nothing
|
||||
Me.TableAdapterManager.TBDD_CONNECTIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing
|
||||
@ -207,11 +180,6 @@ Partial Class frmStart
|
||||
Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBGI_REGEX_DOCTYPETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBHOTKEY_USER_PROFILETableAdapter = Me.TBHOTKEY_USER_PROFILETableAdapter
|
||||
Me.TableAdapterManager.TBHOTKEY_WINDOW_HOOKTableAdapter = Nothing
|
||||
Me.TableAdapterManager.UpdateOrder = Global_Indexer.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'btnChoosefiles
|
||||
@ -230,6 +198,7 @@ Partial Class frmStart
|
||||
Me.Controls.Add(Me.LabelControl1)
|
||||
Me.Controls.Add(Me.StatusStrip1)
|
||||
Me.Controls.Add(Me.MenuStrip1)
|
||||
Me.KeyPreview = True
|
||||
Me.MaximizeBox = False
|
||||
Me.Name = "frmStart"
|
||||
Me.MenuStrip1.ResumeLayout(False)
|
||||
@ -237,7 +206,6 @@ Partial Class frmStart
|
||||
Me.StatusStrip1.ResumeLayout(False)
|
||||
Me.StatusStrip1.PerformLayout()
|
||||
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBHOTKEY_USER_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
@ -245,16 +213,12 @@ Partial Class frmStart
|
||||
Friend WithEvents MenuStrip1 As System.Windows.Forms.MenuStrip
|
||||
Friend WithEvents KonfigurationToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents AdministrationToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents GlobalIndexerEinstellungenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents HotkeyEisntellungenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents GrundeinstellungenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents FrmHotkeyAddToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
|
||||
Friend WithEvents tslblFW As System.Windows.Forms.ToolStripStatusLabel
|
||||
Friend WithEvents MyDataset As Global_Indexer.MyDataset
|
||||
Friend WithEvents TBHOTKEY_USER_PROFILEBindingSource As System.Windows.Forms.BindingSource
|
||||
Friend WithEvents TBHOTKEY_USER_PROFILETableAdapter As Global_Indexer.MyDatasetTableAdapters.TBHOTKEY_USER_PROFILETableAdapter
|
||||
Friend WithEvents TableAdapterManager As Global_Indexer.MyDatasetTableAdapters.TableAdapterManager
|
||||
Friend WithEvents TimerFolderWatch As System.Windows.Forms.Timer
|
||||
Friend WithEvents TimerClose3Minutes As System.Windows.Forms.Timer
|
||||
|
||||
@ -121,6 +121,39 @@
|
||||
<value>400, 17</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="AdministrationToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>221, 22</value>
|
||||
</data>
|
||||
<data name="AdministrationToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Administration</value>
|
||||
</data>
|
||||
<data name="ToolStripSeparator1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>218, 6</value>
|
||||
</data>
|
||||
<data name="GrundeinstellungenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>221, 22</value>
|
||||
</data>
|
||||
<data name="GrundeinstellungenToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>User Basis Einstellungen</value>
|
||||
</data>
|
||||
<data name="HistoryIndexierteDateienToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>221, 22</value>
|
||||
</data>
|
||||
<data name="HistoryIndexierteDateienToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Historie - Indexierte Dateien</value>
|
||||
</data>
|
||||
<data name="InfoToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>221, 22</value>
|
||||
</data>
|
||||
<data name="InfoToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Info</value>
|
||||
</data>
|
||||
<data name="KonfigurationToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>108, 20</value>
|
||||
</data>
|
||||
<data name="KonfigurationToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Konfiguration</value>
|
||||
</data>
|
||||
<data name="MenuStrip1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 0</value>
|
||||
</data>
|
||||
@ -146,60 +179,18 @@
|
||||
<data name=">>MenuStrip1.ZOrder" xml:space="preserve">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name="KonfigurationToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>108, 20</value>
|
||||
</data>
|
||||
<data name="KonfigurationToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Konfiguration</value>
|
||||
</data>
|
||||
<data name="AdministrationToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>221, 22</value>
|
||||
</data>
|
||||
<data name="AdministrationToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Administration</value>
|
||||
</data>
|
||||
<data name="GlobalIndexerEinstellungenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>232, 22</value>
|
||||
</data>
|
||||
<data name="GlobalIndexerEinstellungenToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Global Indexer - Einstellungen</value>
|
||||
</data>
|
||||
<data name="HotkeyEisntellungenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>232, 22</value>
|
||||
</data>
|
||||
<data name="HotkeyEisntellungenToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Hotkey - Einstellungen</value>
|
||||
</data>
|
||||
<data name="ToolStripSeparator1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>218, 6</value>
|
||||
</data>
|
||||
<data name="GrundeinstellungenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>221, 22</value>
|
||||
</data>
|
||||
<data name="GrundeinstellungenToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>User Basis Einstellungen</value>
|
||||
</data>
|
||||
<data name="FrmHotkeyAddToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>221, 22</value>
|
||||
</data>
|
||||
<data name="FrmHotkeyAddToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Hotkeys User</value>
|
||||
</data>
|
||||
<data name="HistoryIndexierteDateienToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>221, 22</value>
|
||||
</data>
|
||||
<data name="HistoryIndexierteDateienToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Historie - Indexierte Dateien</value>
|
||||
</data>
|
||||
<data name="InfoToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>221, 22</value>
|
||||
</data>
|
||||
<data name="InfoToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Info</value>
|
||||
</data>
|
||||
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>515, 17</value>
|
||||
</metadata>
|
||||
<data name="tslblFW.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>133, 17</value>
|
||||
</data>
|
||||
<data name="tslblFW.Text" xml:space="preserve">
|
||||
<value>FolderWatch ist aktiv</value>
|
||||
</data>
|
||||
<data name="tslblFW.Visible" type="System.Boolean, mscorlib">
|
||||
<value>False</value>
|
||||
</data>
|
||||
<data name="StatusStrip1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 139</value>
|
||||
</data>
|
||||
@ -224,15 +215,6 @@
|
||||
<data name=">>StatusStrip1.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="tslblFW.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>133, 17</value>
|
||||
</data>
|
||||
<data name="tslblFW.Text" xml:space="preserve">
|
||||
<value>FolderWatch ist aktiv</value>
|
||||
</data>
|
||||
<data name="tslblFW.Visible" type="System.Boolean, mscorlib">
|
||||
<value>False</value>
|
||||
</data>
|
||||
<metadata name="TimerFolderWatch.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1072, 17</value>
|
||||
</metadata>
|
||||
@ -595,12 +577,6 @@ auf dieses Fenster oder...</value>
|
||||
<metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<metadata name="TBHOTKEY_USER_PROFILEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>127, 17</value>
|
||||
</metadata>
|
||||
<metadata name="TBHOTKEY_USER_PROFILETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>632, 17</value>
|
||||
</metadata>
|
||||
<metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>899, 17</value>
|
||||
</metadata>
|
||||
@ -927,18 +903,6 @@ auf dieses Fenster oder...</value>
|
||||
<data name=">>AdministrationToolStripMenuItem.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>GlobalIndexerEinstellungenToolStripMenuItem.Name" xml:space="preserve">
|
||||
<value>GlobalIndexerEinstellungenToolStripMenuItem</value>
|
||||
</data>
|
||||
<data name=">>GlobalIndexerEinstellungenToolStripMenuItem.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>HotkeyEisntellungenToolStripMenuItem.Name" xml:space="preserve">
|
||||
<value>HotkeyEisntellungenToolStripMenuItem</value>
|
||||
</data>
|
||||
<data name=">>HotkeyEisntellungenToolStripMenuItem.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>ToolStripSeparator1.Name" xml:space="preserve">
|
||||
<value>ToolStripSeparator1</value>
|
||||
</data>
|
||||
@ -951,12 +915,6 @@ auf dieses Fenster oder...</value>
|
||||
<data name=">>GrundeinstellungenToolStripMenuItem.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>FrmHotkeyAddToolStripMenuItem.Name" xml:space="preserve">
|
||||
<value>FrmHotkeyAddToolStripMenuItem</value>
|
||||
</data>
|
||||
<data name=">>FrmHotkeyAddToolStripMenuItem.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>HistoryIndexierteDateienToolStripMenuItem.Name" xml:space="preserve">
|
||||
<value>HistoryIndexierteDateienToolStripMenuItem</value>
|
||||
</data>
|
||||
@ -1041,18 +999,6 @@ auf dieses Fenster oder...</value>
|
||||
<data name=">>MyDataset.Type" xml:space="preserve">
|
||||
<value>Global_Indexer.MyDataset, MyDataset.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
|
||||
</data>
|
||||
<data name=">>TBHOTKEY_USER_PROFILEBindingSource.Name" xml:space="preserve">
|
||||
<value>TBHOTKEY_USER_PROFILEBindingSource</value>
|
||||
</data>
|
||||
<data name=">>TBHOTKEY_USER_PROFILEBindingSource.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>TBHOTKEY_USER_PROFILETableAdapter.Name" xml:space="preserve">
|
||||
<value>TBHOTKEY_USER_PROFILETableAdapter</value>
|
||||
</data>
|
||||
<data name=">>TBHOTKEY_USER_PROFILETableAdapter.Type" xml:space="preserve">
|
||||
<value>Global_Indexer.MyDatasetTableAdapters.TBHOTKEY_USER_PROFILETableAdapter, MyDataset.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
|
||||
</data>
|
||||
<data name=">>TableAdapterManager.Name" xml:space="preserve">
|
||||
<value>TableAdapterManager</value>
|
||||
</data>
|
||||
|
||||
@ -136,60 +136,7 @@ Public Class frmStart
|
||||
TimerCheckDroppedFiles.Start()
|
||||
End If
|
||||
End Sub
|
||||
Private Sub ReceiveHotKey(ByVal HotKeyID As String) Handles HotKey.HotKeyPressed
|
||||
Dim CapTxt As String = ClassHotkey_Windream.GetCaption()
|
||||
CURRENT_FOCUSES_WINDOWNAME = CapTxt
|
||||
If CURRENT_FOCUSES_WINDOWNAME.ToUpper.StartsWith("GLOB") Then Exit Sub
|
||||
LOGGER.Info(" ...Focused window result: '" & CURRENT_FOCUSES_WINDOWNAME & "'")
|
||||
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
Me.NotifyIcon1.Visible = True
|
||||
NotifyIcon1.ShowBalloonTip(1000, "Hotkey", "Hotkey wird ausgeführt!", ToolTipIcon.Info)
|
||||
Try
|
||||
Dim _focusedWindowfound As Boolean = False
|
||||
Dim HK1 As String
|
||||
Dim HK2 As String
|
||||
'Die Hotkeys definieren
|
||||
Dim SQL As String = "SELECT * FROM TBHOTKEYTEMP_USER_HOTKEYS WHERE HOTKEY_ID = " & HotKeyID
|
||||
Dim DTHOTKEYSTEMP As DataTable = ClassDatabase.Return_Datatable(SQL, True)
|
||||
If Not IsNothing(DTHOTKEYSTEMP) Then
|
||||
HK1 = DTHOTKEYSTEMP.Rows(0).Item("HOTKEY1")
|
||||
HK2 = DTHOTKEYSTEMP.Rows(0).Item("HOTKEY2")
|
||||
'Alle Profile raussuchen die die Tastaturkombination enthalten
|
||||
SQL = "select * from TBHOTKEY_USER_PROFILE where UPPER(HOTKEY1) = UPPER('" & HK1 & "') AND UPPER(HOTKEY2) = UPPER('" & HK2 & "') AND USER_ID = " & USER_ID
|
||||
Dim DTHOTKEY_PROFILES As DataTable = ClassDatabase.Return_Datatable(SQL, True)
|
||||
Dim Result As String = ""
|
||||
If Not IsNothing(DTHOTKEY_PROFILES) Then
|
||||
|
||||
'Jedes Hotkeyprofil des Users durchlaufen um zu überprüfen ob das CURRENT_FOCUSES_WINDOWNAME = dem konfiguriertem ist
|
||||
For Each row As DataRow In DTHOTKEY_PROFILES.Rows
|
||||
SQL = "select WINDOW_NAME from TBHOTKEY_PROFILE where GUID = " & row.Item("HKPROFILE_ID")
|
||||
'Konfigurierte windows-String speichern
|
||||
Dim windowconfigured = ClassDatabase.Execute_Scalar(SQL, MyConnectionString, True)
|
||||
'Focuses window enthalten??
|
||||
If CURRENT_FOCUSES_WINDOWNAME.ToUpper.Contains(windowconfigured.ToString.ToUpper) Or CURRENT_FOCUSES_WINDOWNAME.ToUpper = windowconfigured.ToString.ToUpper Then
|
||||
'Ja - also die windream-Suche ausführen
|
||||
_focusedWindowfound = True
|
||||
Result = ClassHotkey_Windream.RUN_WD_SEARCH(row.Item("GUID"))
|
||||
End If
|
||||
Next
|
||||
If _focusedWindowfound = False Then
|
||||
Result = "Focused Window not configured in hotkey"
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
If Result = "" Then
|
||||
Me.NotifyIcon1.Visible = False
|
||||
Else
|
||||
NotifyIcon1.ShowBalloonTip(5000, "Hotkey-Fehler:", Result.ToString, ToolTipIcon.Warning)
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in ReceiveHotKey: " & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
Me.Cursor = Cursors.Default
|
||||
End Sub
|
||||
Private Sub frmMain_DragEnter(sender As Object, e As DragEventArgs) Handles Me.DragEnter
|
||||
Drag_Enter(sender, e)
|
||||
End Sub
|
||||
@ -288,9 +235,6 @@ Public Class frmStart
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Closing Application: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
If USER_ID > 0 Then
|
||||
Unregister_Hotkeys()
|
||||
End If
|
||||
'TempDateien löschen
|
||||
Try
|
||||
For Each _file In TEMP_FILES
|
||||
@ -365,8 +309,6 @@ Public Class frmStart
|
||||
AdministrationToolStripMenuItem.Visible = False
|
||||
End If
|
||||
ClassDatabase.Execute_non_Query("DELETE FROM TBGI_FILES_USER WHERE UPPER(USER@WORK) = UPPER('" & Environment.UserName & "')", True)
|
||||
Unregister_Hotkeys()
|
||||
Load_Hotkeys()
|
||||
|
||||
TopMost = True
|
||||
|
||||
@ -472,76 +414,8 @@ Public Class frmStart
|
||||
End If
|
||||
|
||||
End Sub
|
||||
Sub Unregister_Hotkeys()
|
||||
Try
|
||||
Dim sql As String = "Select * from TBHOTKEYTEMP_USER_HOTKEYS where [USER_ID] = " & USER_ID
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql, True)
|
||||
If Not IsNothing(DT) Then
|
||||
For Each row As DataRow In DT.Rows
|
||||
HotKey.RemoveHotKey(row.Item("HOTKEY_ID"))
|
||||
Next
|
||||
sql = "delete from TBHOTKEYTEMP_USER_HOTKEYS where [USER_ID] = " & USER_ID
|
||||
ClassDatabase.Execute_non_Query(sql, True)
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Unregister_Hotkeys:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
Sub Load_Hotkeys()
|
||||
Try
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable("SELECT HOTKEY1, HOTKEY2, ABS(CONVERT(INT, CONVERT(binary(4), NEWID()))) AS HOTKEY_ID FROM TBHOTKEY_USER_PROFILE WHERE USER_ID = " & USER_ID & " GROUP BY HOTKEY1, HOTKEY2", True)
|
||||
If DT.Rows.Count > 0 Then
|
||||
LOGGER.Info(" >> " & DT.Rows.Count & " Hotkey-Profile")
|
||||
Dim i As Integer = 0
|
||||
For Each row As DataRow In DT.Rows
|
||||
i += 1
|
||||
Dim sql As String = "INSERT INTO TBHOTKEYTEMP_USER_HOTKEYS (HOTKEY_ID,HOTKEY1,HOTKEY2,[USER_ID]) VALUES (" & row.Item("HOTKEY_ID") & ", '" & row.Item("HOTKEY1") & "', '" & row.Item("HOTKEY2") & "', " & USER_ID & ")"
|
||||
ClassDatabase.Execute_non_Query(sql, True)
|
||||
|
||||
Dim keyCode As Keys
|
||||
Try
|
||||
Dim kc As New KeysConverter
|
||||
Dim obj As Object = kc.ConvertFromString(row.Item("HOTKEY2").ToString.ToUpper)
|
||||
keyCode = CType(obj, Keys)
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Convert Key:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
Select Case row.Item("HOTKEY1")
|
||||
Case "Strg"
|
||||
LOGGER.Info(" >>" & i.ToString + "|Strg " & row.Item("HOTKEY2").ToString.ToUpper)
|
||||
HotKey.AddHotKey(keyCode, clsHotkey.MODKEY.MOD_CONTROL, row.Item("HOTKEY_ID"))
|
||||
Case "Shift"
|
||||
LOGGER.Info(" >>" & i.ToString + "|Shift " & row.Item("HOTKEY2").ToString.ToUpper)
|
||||
HotKey.AddHotKey(keyCode, clsHotkey.MODKEY.MOD_SHIFT, row.Item("HOTKEY_ID"))
|
||||
Case "Alt"
|
||||
LOGGER.Info(" >>" & i.ToString + "|Alt " & row.Item("HOTKEY2").ToString.ToUpper)
|
||||
HotKey.AddHotKey(keyCode, clsHotkey.MODKEY.MOD_ALT, row.Item("HOTKEY_ID"))
|
||||
Case "win"
|
||||
LOGGER.Info(" >>" & i.ToString + "|Win " & row.Item("HOTKEY2").ToString.ToUpper)
|
||||
HotKey.AddHotKey(keyCode, clsHotkey.MODKEY.MOD_WIN, row.Item("HOTKEY_ID"))
|
||||
End Select
|
||||
Next
|
||||
Else
|
||||
LOGGER.Info(" >> Keine Hotkeys!")
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Load_Hotkeys:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
Private Sub HotkeyEisntellungenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles HotkeyEisntellungenToolStripMenuItem.Click
|
||||
If ClassLicence.license_is_Valid = True Then
|
||||
Me.Hide()
|
||||
Unregister_Hotkeys()
|
||||
frmHotKey_Add.ShowDialog()
|
||||
Load_Hotkeys()
|
||||
Me.Visible = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub GlobalIndexerEinstellungenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles GlobalIndexerEinstellungenToolStripMenuItem.Click
|
||||
Private Sub GlobalIndexerEinstellungenToolStripMenuItem_Click(sender As Object, e As EventArgs)
|
||||
Try
|
||||
Me.Hide()
|
||||
frmAdministration.ShowDialog()
|
||||
@ -568,16 +442,6 @@ Public Class frmStart
|
||||
Me.TopMost = True
|
||||
End Sub
|
||||
|
||||
Private Sub FrmHotkeyAddToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles FrmHotkeyAddToolStripMenuItem.Click
|
||||
If ClassLicence.license_is_Valid = True Then
|
||||
Me.Hide()
|
||||
Unregister_Hotkeys()
|
||||
frmHotkey_User.ShowDialog()
|
||||
Load_Hotkeys()
|
||||
Me.Visible = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub TimerFolderWatch_Tick(sender As Object, e As EventArgs) Handles TimerFolderWatch.Tick
|
||||
If ClassDatabase.DatabaseConnectionTimeout = True Then
|
||||
TimerFolderWatch.Enabled = False
|
||||
@ -746,4 +610,15 @@ Public Class frmStart
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub AdministrationToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AdministrationToolStripMenuItem.Click
|
||||
Try
|
||||
Me.Hide()
|
||||
frmAdministration.ShowDialog()
|
||||
Me.Show()
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Administration:" & vbCrLf & vbCrLf & ex.Message, MsgBoxStyle.Critical, Text)
|
||||
LOGGER.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
End Class
|
||||
@ -192,7 +192,7 @@
|
||||
|
||||
<Directory Id="resources.de" Name="de">
|
||||
<Component Id="GlobalIndexer.Locales.de" Guid="9E7F8C29-44DF-4D38-AD7B-D64B74990CDB">
|
||||
<File Id="Global_Indexer.resources.de" Name="Global_Indexer.resources.dll" Source="de\Global_Indexer.resources.dll"></File>
|
||||
<File Id="Global_Indexer.resources.de_DE" Name="Global_Indexer.resources.dll" Source="de-DE\Global_Indexer.resources.dll"></File>
|
||||
</Component>
|
||||
|
||||
<Component Id="Devexpress.Locales.de" Guid="6be5ff05-af76-4249-862a-5b13e3c56c2a">
|
||||
|
||||
@ -14,6 +14,8 @@
|
||||
<IntermediateOutputPath>obj\$(Configuration)\</IntermediateOutputPath>
|
||||
<DefineConstants>Debug</DefineConstants>
|
||||
<LinkerAdditionalOptions>-b "$(SolutionDir)Global_Indexer\bin\$(Configuration)"</LinkerAdditionalOptions>
|
||||
<Cultures>
|
||||
</Cultures>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' ">
|
||||
<OutputPath>bin\$(Configuration)\</OutputPath>
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user