hm.. alles kla, und wenn man einfach macht, hotkey shift und der hotkey a = groß A? wäre das eine möglichkeit?
Beiträge von Zattoo
-
-
Ich habe es probiert
[autoit]If _IsPressed(41,$dll)Then
[/autoit]
MsgBox(1, "a", "a wurde gedrückt")
EndIfund groß wäre es dann
[autoit]If _IsPressed(+41,$dll)Then
[/autoit]
MsgBox(1, "A", "A wurde gedrückt")
EndIfund mit HotKeySet
[autoit]HotKeySet("a","send")
[/autoit]
Func senda()
Send("alpha")
EndFuncdas geht aber nicht
-
Hallo,
ich wollte mal Fragen wie ich machen kann, das wenn man [Shift] + [a] drückt (=A) auch ein Großes A erkannt wird,
Ich kenne die Varianten HotKeySet und IsPressed, welche davon muss ich wie nutzen? oder gibt es noch eine andere möglichkeit?
Vielen Dank
MFG -
gut
es gehen nur 5, kann mir jemand sagen was ich machen muss für das als code zu haben?
mfg -
ehrlich gesagt versteh ich net was ich damit anfangen soll, habs mir paar ma durchgelesen, kapiere es nicht... tut mir leid
-
wie geht das?
-
bild ist ja egal, benutzt einfach http://image.shutterstock.com/display_pic_wi…on-45761938.jpg und nennt es jeweils um, habe noch keine bilder wirklich festgelegt
werde es mir genauer anschaun... -
ok,habe das gefunden:
[autoit]GUICtrlSendMsg($AccountList, $LVM_DELETEITEM, Number(ControlListView("", "", $AccountList, "GetSelected")), 0)
[/autoit]
damit klappts, es werden ja immer beim hinzufügen die daten in einer datei abgespeichert, wie ist es möglich das die ausgewählten zeilen im listview, auch in der datei gelöscht werden (NICHT ALLES - NUR DAS AUSGEWÄHLTE)
MFG und DANKE -
Hallo
ich suche hilfe, unzwar scripte ich gerade einen account manager, jetzt komme ich nicht mehr weiter bei dem löschen eines items in meines listview, per button
hier mein script:Spoiler anzeigen
[autoit]#include <ButtonConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <File.au3>
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <GUIListView.au3>
#include <StaticConstants.au3>
#include <String.au3>
#include <WindowsConstants.au3>
#include <Array.au3>Opt("GUIOnEventMode", 1)
[/autoit] [autoit][/autoit] [autoit]
Global $Item, $List;====================================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
;======================================================| Account Manager - Design |==================================================
;====================================================================================================================================$Account_Manager = GUICreate("Account Manager", 680, 380, -1, -1)
[/autoit] [autoit][/autoit] [autoit]
GUISetBkColor(0xC0C0C0)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Account_ManagerClose")
GUISetOnEvent($GUI_EVENT_MINIMIZE, "_Account_ManagerMinimize")
GUISetOnEvent($GUI_EVENT_MAXIMIZE, "_Account_ManagerMaximize")
GUISetOnEvent($GUI_EVENT_RESTORE, "_Account_ManagerRestore")
$ID_Input = GUICtrlCreateInput("ID", 8, 8, 170, 21)
$Passwort_Input = GUICtrlCreateInput("Passwort", 185, 8, 160, 21)
$AddOptions = GUICtrlCreateCheckbox("", 350, 6, 17, 25)
GUICtrlSetOnEvent($AddOptions, "_Check_AddOptions")
GUICtrlSetTip(-1, "Optionale Daten")
$Add_Account = GUICtrlCreatePic(@DesktopDir & "\Account Manager\Add-Test.jpg", 370, 5, 26, 26)
GUICtrlSetOnEvent($Add_Account, "_Check_Add_Account")
GUICtrlSetTip(-1, "Account hinzufügen")
$Edit_Account = GUICtrlCreatePic(@DesktopDir & "\Account Manager\Edit-Test.jpg", 410, 5, 26, 26)
GUICtrlSetOnEvent($Edit_Account, "_Edit_Account")
GUICtrlSetTip(-1, "Account bearbeiten")
$Delete_Account = GUICtrlCreatePic(@DesktopDir & "\Account Manager\Delete-Test.jpg", 450, 5, 26, 26)
GUICtrlSetOnEvent($Delete_Account, "_Delete_Account")
GUICtrlSetTip(-1, "Account löschen")
$Import_Account = GUICtrlCreatePic(@DesktopDir & "\Account Manager\Import-Test.jpg", 490, 5, 26, 26)
GUICtrlSetOnEvent($Import_Account, "_Import_Account")
GUICtrlSetTip(-1, "Account(s) importieren")
$Export_Account = GUICtrlCreatePic(@DesktopDir & "\Account Manager\Export-Test.jpg", 530, 5, 26, 26)
GUICtrlSetOnEvent($Export_Account, "_Export_Account")
GUICtrlSetTip(-1, "Account(s) exportieren")
$Einstellungen = GUICtrlCreatePic(@DesktopDir & "\Account Manager\Einstellungen.jpg", 645, 3, 30, 30)
GUICtrlSetOnEvent($Einstellungen, "_Einstellungen")
GUICtrlSetTip(-1, "Einstellungen bearbeiten")
$AccountList = GUICtrlCreateListView("ID|Passwort|E-Mail|Geheimfrage|Geheimantwort", 0, 35, 680, 318, -1)
_GUICtrlListView_SetColumnWidth($AccountList, 0, 140)
_GUICtrlListView_SetColumnWidth($AccountList, 1, 130)
_GUICtrlListView_SetColumnWidth($AccountList, 2, 135)
_GUICtrlListView_SetColumnWidth($AccountList, 3, 135)
_GUICtrlListView_SetColumnWidth($AccountList, 4, 135)
_GUICtrlListView_RegisterSortCallBack(GUICtrlGetHandle($AccountList))
$EMail_Label = GUICtrlCreateLabel("E-Mail Adresse", 30, 43)
$EMail_Input = GUICtrlCreateInput("", 110, 40, 200, 21)
$Geheimfrage_Label = GUICtrlCreateLabel("Geheimfrage", 30, 68)
$Geheimfrage_Input = GUICtrlCreateInput("", 110, 65, 200, 21)
$Geheimantwort_Label = GUICtrlCreateLabel("Geheimantwort", 30, 93)
$Geheimantwort_Input = GUICtrlCreateInput("", 110, 90, 200, 21)
$Passwort_Hide = GUICtrlCreateCheckbox("Passwörter anzeigen", 555, 356)
GUICtrlSetOnEvent($Passwort_Hide, "_Passwort_Hide")
$Daten_Verschluesseln = GUICtrlCreateCheckbox("Daten verschlüsseln", 430, 356)
_State($GUI_HIDE)
Dim $Accounts
_FileReadToArray("3hD29sWpOe9mNd7.kgj", $Accounts)
If IsArray($Accounts) Then
For $i = 1 To $Accounts[0]
GUICtrlCreateListViewItem(_StringEncrypt(0, $Accounts[$i], "y#h0O", 3), $AccountList)
Next
EndIf
GUISetState(@SW_SHOW)While 1
[/autoit] [autoit][/autoit] [autoit]
Sleep(250)
WEndFunc _Account_ManagerClose()
[/autoit] [autoit][/autoit] [autoit]
Exit
EndFuncFunc _Account_ManagerMinimize()
[/autoit] [autoit][/autoit] [autoit]
EndFuncFunc _Account_ManagerMaximize()
[/autoit] [autoit][/autoit] [autoit]
EndFuncFunc _Account_ManagerRestore()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
EndFunc;====================================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
;===================================================| Account Manager - Quickleiste |================================================
;====================================================================================================================================Func _Add_Account()
[/autoit] [autoit][/autoit] [autoit]
FileWriteLine("3hD29sWpOe9mNd7.kgj", _StringEncrypt(1, GUICtrlRead($ID_Input) & "|" & GUICtrlRead($Passwort_Input) & "|" & GUICtrlRead($EMail_Input) & "|" & GUICtrlRead($Geheimfrage_Input) & "|" & GUICtrlRead($Geheimantwort_Input), "y#h0O", 3))
GUICtrlCreateListViewItem(GUICtrlRead($ID_Input) & "|" & GUICtrlRead($Passwort_Input) & "|" & GUICtrlRead($EMail_Input) & "|" & GUICtrlRead($Geheimfrage_Input) & "|" & GUICtrlRead($Geheimantwort_Input), $AccountList)
MsgBox(0, "Account Manager - Erfolgreich", "Erfolgreich: Account erfolgreich hinzugefügt")
EndFuncFunc _Edit_Account()
[/autoit] [autoit][/autoit] [autoit]
MsgBox(1, "Edit", "TestMsgBox zum Editieren")
EndFuncFunc _Delete_Account()
[/autoit] [autoit][/autoit] [autoit]
MsgBox(1, "Delete", "TestMsgBox zum Deleten")
EndFuncFunc _Import_Account()
[/autoit] [autoit][/autoit] [autoit]
MsgBox(1, "Import", "TestMsgBox zum Importieren")
EndFuncFunc _Export_Account()
[/autoit] [autoit][/autoit] [autoit]
MsgBox(1, "Export", "TestMsgBox zum Exportieren")
EndFuncFunc _Einstellungen()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
MsgBox(1, "Einstellungen", "Jetzt müssten sich die Einstellungen öffnen...")
EndFunc;====================================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
;======================================================| Account Manager - Checks |==================================================
;====================================================================================================================================Func _Check_Add_Account()
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetState($ID_Input, $GUI_Disable)
GUICtrlSetState($Passwort_Input, $GUI_Disable)
GUICtrlSetState($AddOptions, $GUI_Disable)
GUICtrlSetState($EMail_Input, $GUI_Disable)
GUICtrlSetState($Geheimfrage_Input, $GUI_Disable)
GUICtrlSetState($Geheimantwort_Input, $GUI_Disable)
GUICtrlSetState($Add_Account, $GUI_Disable)
GUICtrlSetState($Edit_Account, $GUI_Disable)
GUICtrlSetState($Delete_Account, $GUI_Disable)
GUICtrlSetState($Import_Account, $GUI_Disable)
GUICtrlSetState($Export_Account, $GUI_Disable)
GUICtrlSetState($Einstellungen, $GUI_Disable)
GUICtrlSetState($Passwort_Hide, $GUI_Disable)
GUICtrlSetState($Daten_Verschluesseln, $GUI_Disable)
$ID = GUICtrlRead($ID_Input)
$Passwort = GUICtrlRead($Passwort_Input)If StringLen($ID) < 32 Then
[/autoit] [autoit][/autoit] [autoit]
If StringLen($Passwort) < 32 Then
If StringLen($ID) < 3 Then
MsgBox(0, "Account Manager - Fehler", "Fehler: Die ID ist zu kurz")
Else
If StringLen($Passwort) < 5 Then
MsgBox(0, "Account Manager - Fehler", "Fehler: Das Passwort ist zu kurz")
Else
If $ID = "ID" or "" Then
MsgBox(0, "Account Manager - Fehler", "Fehler: Bitte gib eine ID ein")
Else
If $Passwort = "Password" or "" Then
MsgBox(0, "Account Manager - Fehler", "Fehler: Bitte gib ein Passwort ein")
Else
_Add_Account()
EndIf
EndIf
EndIf
EndIf
Else
MsgBox(0, "Account Manager - Fehler", "Fehler: Das Passwort ist zu lang")
EndIf
Else
MsgBox(0, "Account Manager - Fehler", "Fehler: Die ID ist zu lang")
EndIfGUICtrlSetState($ID_Input, $GUI_Enable)
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetState($Passwort_Input, $GUI_Enable)
GUICtrlSetState($AddOptions, $GUI_Enable)
GUICtrlSetState($EMail_Input, $GUI_Enable)
GUICtrlSetState($Geheimfrage_Input, $GUI_Enable)
GUICtrlSetState($Geheimantwort_Input, $GUI_Enable)
GUICtrlSetState($Add_Account, $GUI_Enable)
GUICtrlSetState($Edit_Account, $GUI_Enable)
GUICtrlSetState($Delete_Account, $GUI_Enable)
GUICtrlSetState($Import_Account, $GUI_Enable)
GUICtrlSetState($Export_Account, $GUI_Enable)
GUICtrlSetState($Einstellungen, $GUI_Enable)
GUICtrlSetState($Passwort_Hide, $GUI_Enable)
GUICtrlSetState($Daten_Verschluesseln, $GUI_Enable)
EndFuncFunc _Check_AddOptions()
[/autoit] [autoit][/autoit] [autoit]
If GUICtrlRead($AddOptions) = 1 Then
For $i = 0 To 100 Step 2
GUICtrlSetPos($AccountList, 0, 20 + $i, 680, 333 - $i)
Next
_State($GUI_SHOW)
ElseIf GUICtrlRead($AddOptions) = 4 Then
_State($GUI_HIDE)
For $i = 0 To 100 Step 2
GUICtrlSetPos($AccountList, 0, 135 - $i, 680, 218 + $i)
Next
EndIf
EndFuncFunc _State($State)
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetState($EMail_Label, $State)
GUICtrlSetState($EMail_Input, $State)
GUICtrlSetState($Geheimfrage_Label, $State)
GUICtrlSetState($Geheimfrage_Input, $State)
GUICtrlSetState($Geheimantwort_Label, $State)
GUICtrlSetState($Geheimantwort_Input, $State)
EndFuncFunc _Passwort_Hide()
[/autoit]
Dim $FileRead
$FileRead = _FileReadToArray("3hD29sWpOe9mNd7.kgj", $Accounts)
If IsArray($FileRead) Then
For $i = 1 To $FileRead[0]
$Split = StringSplit($Item[$i], '|')
$List[$i] = GUICtrlCreateListViewItem($i & "|" & $Split[1] & "|*******|" & $Split[3] & "|" & $Split[4] & "|" & $Split[5], $AccountList)
Next
EndIf
EndFuncdürfte deutlich sein...
MFG und DANKE
(icq 408 478 963) -
Bis jetzt haben wir das Problem noch nicht gelöst...
hat jemand ne Idee worans liegen könnte?Hier das komplette Script
Spoiler anzeigen
[autoit]#include <ButtonConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <File.au3>
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <GUIListView.au3>
#include <StaticConstants.au3>
#include <String.au3>
#include <WindowsConstants.au3>
#include <Array.au3>Opt("GUIOnEventMode", 1)
[/autoit] [autoit][/autoit] [autoit]
Global $Item, $List;====================================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
;======================================================| Account Manager - Design |==================================================
;====================================================================================================================================$Account_Manager = GUICreate("Account Manager", 680, 380, -1, -1)
[/autoit] [autoit][/autoit] [autoit]
GUISetBkColor(0xC0C0C0)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Account_ManagerClose")
GUISetOnEvent($GUI_EVENT_MINIMIZE, "_Account_ManagerMinimize")
GUISetOnEvent($GUI_EVENT_MAXIMIZE, "_Account_ManagerMaximize")
GUISetOnEvent($GUI_EVENT_RESTORE, "_Account_ManagerRestore")
$ID_Input = GUICtrlCreateInput("ID", 8, 8, 170, 21)
$Passwort_Input = GUICtrlCreateInput("Passwort", 185, 8, 160, 21)
$AddOptions = GUICtrlCreateCheckbox("", 350, 6, 17, 25)
GUICtrlSetOnEvent($AddOptions, "_Check_AddOptions")
GUICtrlSetTip(-1, "Optionale Daten")
$Add_Account = GUICtrlCreatePic(@DesktopDir & "\Account Manager\Add-Test.jpg", 370, 5, 26, 26)
GUICtrlSetOnEvent($Add_Account, "_Check_Add_Account")
GUICtrlSetTip(-1, "Account hinzufügen")
$Edit_Account = GUICtrlCreatePic(@DesktopDir & "\Account Manager\Edit-Test.jpg", 410, 5, 26, 26)
GUICtrlSetOnEvent($Edit_Account, "_Edit_Account")
GUICtrlSetTip(-1, "Account bearbeiten")
$Delete_Account = GUICtrlCreatePic(@DesktopDir & "\Account Manager\Delete-Test.jpg", 450, 5, 26, 26)
GUICtrlSetOnEvent($Delete_Account, "_Delete_Account")
GUICtrlSetTip(-1, "Account löschen")
$Import_Account = GUICtrlCreatePic(@DesktopDir & "\Account Manager\Import-Test.jpg", 490, 5, 26, 26)
GUICtrlSetOnEvent($Import_Account, "_Import_Account")
GUICtrlSetTip(-1, "Account(s) importieren")
$Export_Account = GUICtrlCreatePic(@DesktopDir & "\Account Manager\Export-Test.jpg", 530, 5, 26, 26)
GUICtrlSetOnEvent($Export_Account, "_Export_Account")
GUICtrlSetTip(-1, "Account(s) exportieren")
$Einstellungen = GUICtrlCreatePic(@DesktopDir & "\Account Manager\Einstellungen.jpg", 645, 3, 30, 30)
GUICtrlSetOnEvent($Einstellungen, "_Einstellungen")
GUICtrlSetTip(-1, "Einstellungen bearbeiten")
$AccountList = GUICtrlCreateListView("ID|Passwort|E-Mail|Geheimfrage|Geheimantwort", 0, 35, 680, 318, -1)
_GUICtrlListView_SetColumnWidth($AccountList, 0, 140)
_GUICtrlListView_SetColumnWidth($AccountList, 1, 130)
_GUICtrlListView_SetColumnWidth($AccountList, 2, 135)
_GUICtrlListView_SetColumnWidth($AccountList, 3, 135)
_GUICtrlListView_SetColumnWidth($AccountList, 4, 135)
_GUICtrlListView_RegisterSortCallBack(GUICtrlGetHandle($AccountList))
$EMail_Label = GUICtrlCreateLabel("E-Mail Adresse", 30, 43)
$EMail_Input = GUICtrlCreateInput("", 110, 40, 200, 21)
$Geheimfrage_Label = GUICtrlCreateLabel("Geheimfrage", 30, 68)
$Geheimfrage_Input = GUICtrlCreateInput("", 110, 65, 200, 21)
$Geheimantwort_Label = GUICtrlCreateLabel("Geheimantwort", 30, 93)
$Geheimantwort_Input = GUICtrlCreateInput("", 110, 90, 200, 21)
$Passwort_Hide = GUICtrlCreateCheckbox("Passwörter anzeigen", 555, 356)
GUICtrlSetOnEvent($Passwort_Hide, "_Passwort_Hide")
$Daten_Verschluesseln = GUICtrlCreateCheckbox("Daten verschlüsseln", 430, 356)
_State($GUI_HIDE)
Dim $Accounts
_FileReadToArray("3hD29sWpOe9mNd7.kgj", $Accounts)
If IsArray($Accounts) Then
For $i = 1 To $Accounts[0]
GUICtrlCreateListViewItem(_StringEncrypt(0, $Accounts[$i], "y#h0O", 3), $AccountList)
Next
EndIf
GUISetState(@SW_SHOW)While 1
[/autoit] [autoit][/autoit] [autoit]
Sleep(250)
WEndFunc _Account_ManagerClose()
[/autoit] [autoit][/autoit] [autoit]
Exit
EndFuncFunc _Account_ManagerMinimize()
[/autoit] [autoit][/autoit] [autoit]
EndFuncFunc _Account_ManagerMaximize()
[/autoit] [autoit][/autoit] [autoit]
EndFuncFunc _Account_ManagerRestore()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
EndFunc;====================================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
;===================================================| Account Manager - Quickleiste |================================================
;====================================================================================================================================Func _Add_Account()
[/autoit] [autoit][/autoit] [autoit]
FileWriteLine("3hD29sWpOe9mNd7.kgj", _StringEncrypt(1, GUICtrlRead($ID_Input) & "|" & GUICtrlRead($Passwort_Input) & "|" & GUICtrlRead($EMail_Input) & "|" & GUICtrlRead($Geheimfrage_Input) & "|" & GUICtrlRead($Geheimantwort_Input), "y#h0O", 3))
GUICtrlCreateListViewItem(GUICtrlRead($ID_Input) & "|" & GUICtrlRead($Passwort_Input) & "|" & GUICtrlRead($EMail_Input) & "|" & GUICtrlRead($Geheimfrage_Input) & "|" & GUICtrlRead($Geheimantwort_Input), $AccountList)
MsgBox(0, "Account Manager - Erfolgreich", "Erfolgreich: Account erfolgreich hinzugefügt")
EndFuncFunc _Edit_Account()
[/autoit] [autoit][/autoit] [autoit]
MsgBox(1, "Edit", "TestMsgBox zum Editieren")
EndFuncFunc _Delete_Account()
[/autoit] [autoit][/autoit] [autoit]
MsgBox(1, "Delete", "TestMsgBox zum Deleten")
EndFuncFunc _Import_Account()
[/autoit] [autoit][/autoit] [autoit]
MsgBox(1, "Import", "TestMsgBox zum Importieren")
EndFuncFunc _Export_Account()
[/autoit] [autoit][/autoit] [autoit]
MsgBox(1, "Export", "TestMsgBox zum Exportieren")
EndFuncFunc _Einstellungen()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
MsgBox(1, "Einstellungen", "Jetzt müssten sich die Einstellungen öffnen...")
EndFunc;====================================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
;======================================================| Account Manager - Checks |==================================================
;====================================================================================================================================Func _Check_Add_Account()
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetState($ID_Input, $GUI_Disable)
GUICtrlSetState($Passwort_Input, $GUI_Disable)
GUICtrlSetState($EMail_Input, $GUI_Disable)
GUICtrlSetState($Geheimfrage_Input, $GUI_Disable)
GUICtrlSetState($Geheimantwort_Input, $GUI_Disable)
GUICtrlSetState($AddOptions, $GUI_Disable)
GUICtrlSetState($Passwort_Hide, $GUI_Disable)
GUICtrlSetState($Daten_Verschluesseln, $GUI_Disable)
$ID = GUICtrlRead($ID_Input)
$Passwort = GUICtrlRead($Passwort_Input)If StringLen($ID) < 32 Then
[/autoit] [autoit][/autoit] [autoit]
If StringLen($Passwort) < 32 Then
If StringLen($ID) < 3 Then
MsgBox(0, "Account Manager - Fehler", "Fehler: Die ID ist zu kurz")
Else
If StringLen($Passwort) < 5 Then
MsgBox(0, "Account Manager - Fehler", "Fehler: Das Passwort ist zu kurz")
Else
If $ID = "ID" or "" Then
MsgBox(0, "Account Manager - Fehler", "Fehler: Bitte gib eine ID ein")
Else
If $Passwort = "Password" or "" Then
MsgBox(0, "Account Manager - Fehler", "Fehler: Bitte gib ein Passwort ein")
Else
_Add_Account()
EndIf
EndIf
EndIf
EndIf
Else
MsgBox(0, "Account Manager - Fehler", "Fehler: Das Passwort ist zu lang")
EndIf
Else
MsgBox(0, "Account Manager - Fehler", "Fehler: Die ID ist zu lang")
EndIfGUICtrlSetState($ID_Input, $GUI_Enable)
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetState($Passwort_Input, $GUI_Enable)
GUICtrlSetState($EMail_Input, $GUI_Enable)
GUICtrlSetState($Geheimfrage_Input, $GUI_Enable)
GUICtrlSetState($Geheimantwort_Input, $GUI_Enable)
GUICtrlSetState($AddOptions, $GUI_Enable)
GUICtrlSetState($Passwort_Hide, $GUI_Enable)
GUICtrlSetState($Daten_Verschluesseln, $GUI_Enable)
EndFuncFunc _Check_AddOptions()
[/autoit] [autoit][/autoit] [autoit]
If GUICtrlRead($AddOptions) = 1 Then
For $i = 0 To 100 Step 2
GUICtrlSetPos($AccountList, 0, 20 + $i, 680, 333 - $i)
Next
_State($GUI_SHOW)
ElseIf GUICtrlRead($AddOptions) = 4 Then
_State($GUI_HIDE)
For $i = 0 To 100 Step 2
GUICtrlSetPos($AccountList, 0, 135 - $i, 680, 218 + $i)
Next
EndIf
EndFuncFunc _State($State)
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetState($EMail_Label, $State)
GUICtrlSetState($EMail_Input, $State)
GUICtrlSetState($Geheimfrage_Label, $State)
GUICtrlSetState($Geheimfrage_Input, $State)
GUICtrlSetState($Geheimantwort_Label, $State)
GUICtrlSetState($Geheimantwort_Input, $State)
EndFuncFunc _Passwort_Hide()
[/autoit]
Dim $FileRead
$FileRead = _FileReadToArray("3hD29sWpOe9mNd7.kgj", $Accounts)
If IsArray($FileRead) Then
For $i = 1 To $FileRead[0]
$Split = StringSplit($Item[$i], '|')
$List[$i] = GUICtrlCreateListViewItem($i & "|" & $Split[1] & "|*******|" & $Split[3] & "|" & $Split[4] & "|" & $Split[5], $AccountList)
Next
EndIf
EndFunc -
Bevor ich frage schaue ich ob ich das irgentwo finde,
Google'n und BugFix fragen hat nichts gebracht, weitere User hatten auch keine Lösung...
mfg -
Hallo (ihr GUI-Fetischichtesten [by BugFix])
Ich hätte mal eine Frage, ist es möglich den Header eines ListView in irgenteiner Form farblich darzustellen?
Egal ob transparentieren (wtf?) und Bild dahinter setzen oder zu färben oder was es da alles gibt
MFG -
sonst keiner ne idee wies geht?
-
Dort sind auch die Spaltenangabennamen (!?) nicht bunt, sondern grau, ich meine ja damit das die spaltenbezeichnungen zb rot sind...
und nicht die ListViewItems
mfg -
N'abend,
[autoit]
Ich hab nochmal ne Frage, kann man die oberen Zeilen eines ListView färben?
dh. in dem Beispiel Script die Spalte1 Spalte2 Spalte3$listview = GUICtrlCreateListView("Spalte1 |Spalte2|Spalte3", 10, 10, 200, 150);,$LVS_SORTDESCENDING) ;DAS HIER FÄRBEN? MÖGLICH?
[/autoit]Spoiler anzeigen
[autoit]
[/autoit]
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt('MustDeclareVars', 1)
Example()
Func Example()
Local $listview, $button, $item1, $item2, $item3, $input1, $msg
GUICreate("Listview Eintr�ge", 220, 250, 100, 200, -1, $WS_EX_ACCEPTFILES)
GUISetBkColor(0x00E0FFFF) ; �ndert die Hintergrundfarbe
$listview = GUICtrlCreateListView("Spalte1 |Spalte2|Spalte3", 10, 10, 200, 150);,$LVS_SORTDESCENDING) ;DAS HIER FÄRBEN? MÖGLICH?
$button = GUICtrlCreateButton("Wert?", 75, 170, 70, 20)
$item1 = GUICtrlCreateListViewItem("Eintrag2|Spalte22|Spalte23", $listview)
$item2 = GUICtrlCreateListViewItem("Eintrag1|Spalte12|Spalte13", $listview)
$item3 = GUICtrlCreateListViewItem("Eintrag3|Spalte32|Spalte33", $listview)
$input1 = GUICtrlCreateInput("", 20, 200, 150)
GUICtrlSetState(-1, $GUI_DROPACCEPTED) ; Erlaubt drag&drop
GUISetState()
GUICtrlSetData($item2, "EINTRAG1")
GUICtrlSetData($item3, "||SPALTE33")
GUICtrlDelete($item1)
Do
$msg = GUIGetMsg()
Select
Case $msg = $button
MsgBox(0, "Listview Eintr�ge", GUICtrlRead(GUICtrlRead($listview)), 2)
Case $msg = $listview
MsgBox(0, "Listview", "angeklickt=" & GUICtrlGetState($listview), 2)
EndSelect
Until $msg = $GUI_EVENT_CLOSE
EndFunc ;==>Example -
was auf jeden fall möglich ist, das du zb. eine gui machst, mit buttons versehst, und dort die funktion
[autoit]InetGet
[/autoit]
[autoit]
zum downloaden benutzt und dannShellExecute
[/autoit]
zum starten der gedownloadeden exe
mfg -
ok, so gehts DANKE
jetzt ist noch das mit dem verschlüsseln, in eine Datei schreiben, auslesen und in ein ListView schreiben + auslesen und in ein ListView schreiben beim start,
gibt es beim Umsetzen noch andere/bessere möglichkeiten als _FileReadToArray -
Ja, das ist per Button, da ist ja kein IF drinne, ich hab das was er in der Button-Funktion hat, in einer Checkbox Funktion
BUTTONSpoiler anzeigen
[autoit]Func _show1() GUISetState(@SW_HIDE, $gui2) GUISetState(@SW_HIDE, $gui3) GUISetState(@SW_SHOW, $gui1) EndFunc ;==>_show1
[/autoit]
CHECKBOXSpoiler anzeigen
[autoit]Func _Check_AddOptions()
[/autoit]
If GUICtrlRead($AddOptions) = 1 Then
GUISetState(@SW_HIDE, $Account_Manager)
GUISetState(@SW_SHOW, $Account_Manager2)
msgbox(1,"Mit Optionen","anscheinend gings net")
ElseIf GUICtrlRead($AddOptions) = 4 Then
GUISetState(@SW_SHOW, $Account_Manager)
GUISetState(@SW_HIDE, $Account_Manager2)
msgbox(1,"Ohne Optionen","anscheinend gings net")
EndIf
EndFuncDas Versteh ich ja nicht...
MFG -
Ja, habe extra mit #cs/#ce gekennzeichnet was die 2. gui ist,
Koda kenne ich, damit ist auch das Script gesigned
das mit den 2 endlosschleifen, kansnte mir sagen wo das ist? verstehs net so ganzdanke soweit für die vielen antworten
-
oben hab ich mein script gepostet, und wies da ist, wie ichs als logisch sehe, gehts nicht, hab einfach hide das, show dies, aber so passiert nichts...