Beiträge von autoBert

Halllo chip,

BugFix hat eine UDF geschrieben mit der man jedes SubItem einzeln formatieren kann. Aber daran scheitert sie sicher auch, dass dürfte afaik unmöglich sein,

mfg autoBert

Hallo Chip,

warum erstellst du die LV nicht mit der Standardfunktion und hols dir danach mit

GuiCtrlGetHandle

das benötigte Handle um es dann weiter zu verwenden?

mfg autoBert

Zitat von chip

So hier, vermute mal das durch das GDIPlus die Imagegröße nichtmehr richtig erkant wird:

Und ich vermute es liegt daran dass du _GUIImageList_Create() ohne optionale Parameter verwendest, versuche es einmal so: $listimage = _GUIImageList_Create(32,32)

mfg autoBert

Hallo TOYY1,

das kannst du so machen:

mfg autoBert

Hallo chip,

ich kann dein Problem nicht nachvollziehen. In [Beispiel] Icons von System-DLLs in LV darstellen habe ich eine Imageliust verwendet und die Zeilenhöhe des LV's passt sich an die verwendete Bild-Grösse an (Zumindest unter XP Home SP3),

mfg autoBert

Die besten Wünsche hierzu, vor allem Gesundheit, Glück und Erfolg in allen Lebenslagen. Lass es dir hete gut gehen und dich richtig gross feiern autoBert

Zitat von BadBunny

PS: Bots sind verboten, das gilt auch für das Klickspiel!

Deshalb Vote for close

mfg auoBert

Hallo $var.

du musst auch das optionale flag von Stringsplit benutzen:

Zitat

flag: [optional] ändert wie das Teilen des Strings funktionieren soll. Es können mehrere Flags zusammen verwendet werden:
flag = 0 (Standard), es fungiert jedes in den Trennzeichen enthaltene Zeichen als Trennmarkierung
flag = 1, es wird der gesamte Trennzeichenstring als Trennmarkierung genutzt
flag = 2, deaktiviert die Rückgabe der Anzahl im ersten Element. Dadurch wird das Array 0-basierend. Man muss nun mit UBound() die Größe des Arrays feststellen

Quelle: dt. Hilfe

also so klappt es:

#Include <Array.au3>

$sInput = InputBox ("", "", "Das/e/ist ein/e/Test.")
$aSplit = StringSplit ($sInput, "/e/",1)
_ArrayDisplay ($aSplit)

mfg autoBert

Hallo BugFix,

dein Skript läuft so nicht es fehlt:

#include <WindowsConstants.au3>
#include <GuiConstantsEx.au3>

Danach läuft es zwar aber der von dir versprochene Effekt mit dem Hinweistext bleibt aus. Das Input ist bei mir unter XP SP3 sofort weis und der Hineistext fehlt,

mfg autoBert

Hallo Rhodan,

ja GuiRegisterMsg funktioniert in beiden Modi. Edit allerdings fehlt:

#include <WindowsConstants.au3>

mfg autoBert

Hallo AltenSack,

herzlich willkommen im Forum und viel Spass mit AutoIt.

Hier kannst du dir die deutsche Hilfe herunterladen.
Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/Tutorial Sehr hilfreich ist auch das Buch von peethebee .

und jetzt zu deinen Problemen: Schau dir in der Hilfe die Funktionen die mit

Control..;speziell
ControlClick

anfangen an. Ausserdem solltest du dich in die Handhabung des AutoIt Fenster-Informations-Tool (AU3Info) einarbeiten (unter Allgemeines zu AutoIt in der Hilfe). Damit solltest du es schaffen.

PS.: Deine AutoIt-Version ist nicht mehr aktuell: 3.3.6.1 ist die aktuelle Version,

mfg autoBert

Hallo KingLoL,

kann es ja nicht testen, aber vermutlich fehlt der Backslash hinter .minecraft im lokalen Pfad. Des weiteren solltest du die Session beim Programende ordnungsgemäss schliessen:

_FTP_Close($Open)

Edit: dass keine Fehlermedlungen kommen liegt daran das du keine abfragst, sieh dir das Example1 in der Hulfe dazu an,

mfg autoBert

Hallo planetone,

herzlich willkommen im Forum und viel Spass mit AutoIt.

Hier kannst du dir die deutsche Hilfe herunterladen.
Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/Tutorial Sehr hilfreich ist auch das Buch von peethebee

und jetzt zu deinem Problem: veröffentliche doch bitte die URL der Seite den auch in diesem Bereich gelten die Forenregeln:

Zitat

Folgende Inhalte sind absolut nicht erwünscht. Das Team behält es sich ausdrücklich vor, zur Durchsetzung der Regeln je nach Schweregrad Benutzer, Posts und Threads zu verwarnen, zu sperren oder sogar zu löschen.

- Bots für Spiele jeglicher Art, insbesondere Onlinespiele und ganz besonders Silkroad Online sowie World of Warcraft
- Tools, um Nachrichten unerwünscht oft zu versenden (Spamming-Tools)
- Programme, die anderen, auch Freunden, einen Schreck einjagen sollen oder sich sonst über andere Nutzer lustig machen ("Spaßviren")
- Automatisierung von Webseiten oder Tools, die das in ihren AGBs verbieten
- Viren
- Malware, Spyware
- Keylogger
- Umgehen von Captchas

(Diese Liste ist ausdrücklich nicht vollständig. Programme, die dem hinter diesen Regeln stehenden Geist widersprechen, sind ebenso als nicht erlaubt anzusehen)

Alles anzeigen

mfg autoBert

Hänge die Bilder einfach als Dateanhang in deinem Eröfnungsbeitrag an,

mfg autoBert

Hallo wolkenloser,

der . Paramter ist tatsächlich der Scglüssel. Wenn du es so machst klappt es:

mfg autoBert

Hallo Detroit49,

etwas genauer hätte es schon sein dürfen. Aber mit

GuiCtrlRead

kannst du eigene Labels auslesen, mit

ControlGetText

auch solche von fremden Fenstern. Da du mit FTP nur Dateien übertragen kannst benötigst du noch

FileOpen;
FileWrite;
FileClose

um es in eine Datei zu schreiben. Danach kannst du mit

_FTP_FilePut

das erzeugte File auf einen FTP-Server laden.

mfg autoBert

Hallo AutoItFreak,

die Adlibs solltest du erst nach der Controlerstellung registrieren. Bei mir kommt es vorher zu Fehlern.

mfg autoBert

Zitat von Zattoo

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>
#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>

[/autoit] [autoit][/autoit] [autoit]

Opt("GUIOnEventMode", 1)
Global $Item, $List

[/autoit] [autoit][/autoit] [autoit]

;====================================================================================================================================
;======================================================| Account Manager - Design |==================================================
;====================================================================================================================================

[/autoit] [autoit][/autoit] [autoit]

$Account_Manager = GUICreate("Account Manager", 680, 380, -1, -1)
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)

[/autoit] [autoit][/autoit] [autoit]

While 1
Sleep(250)
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func _Account_ManagerClose()
Exit
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _Account_ManagerMinimize()
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _Account_ManagerMaximize()
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _Account_ManagerRestore()
EndFunc

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;====================================================================================================================================
;===================================================| Account Manager - Quickleiste |================================================
;====================================================================================================================================

[/autoit] [autoit][/autoit] [autoit]

Func _Add_Account()
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")
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _Edit_Account()
MsgBox(1, "Edit", "TestMsgBox zum Editieren")
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _Delete_Account()
MsgBox(1, "Delete", "TestMsgBox zum Deleten")
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _Import_Account()
MsgBox(1, "Import", "TestMsgBox zum Importieren")
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _Export_Account()
MsgBox(1, "Export", "TestMsgBox zum Exportieren")
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _Einstellungen()
MsgBox(1, "Einstellungen", "Jetzt müssten sich die Einstellungen öffnen...")
EndFunc

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;====================================================================================================================================
;======================================================| Account Manager - Checks |==================================================
;====================================================================================================================================

[/autoit] [autoit][/autoit] [autoit]

Func _Check_Add_Account()
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)

[/autoit] [autoit][/autoit] [autoit]

If StringLen($ID) < 32 Then
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")
EndIf

[/autoit] [autoit][/autoit] [autoit]

GUICtrlSetState($ID_Input, $GUI_Enable)
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)
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _Check_AddOptions()
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
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _State($State)
GUICtrlSetState($EMail_Label, $State)
GUICtrlSetState($EMail_Input, $State)
GUICtrlSetState($Geheimfrage_Label, $State)
GUICtrlSetState($Geheimfrage_Input, $State)
GUICtrlSetState($Geheimantwort_Label, $State)
GUICtrlSetState($Geheimantwort_Input, $State)
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _Passwort_Hide()
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

[/autoit]

dürfte deutlich sein...
MFG und DANKE
(icq 408 478 963)

Alles anzeigen

das ganze ist ganz und gar nicht deutlich. Du hast in deinem Skript keinen einzigen Button, anstelle dessen benutzt Pic's lädst diese aber nicht mit hoch. Meinst du jemand macht sich die Mühe und sucht sich Bilder zusammen damit er dein Skript testen kann?

Warum du den umständlichen Weg

GUICtrlSendMsg

nimmst anstatt

_GUICtrlListView_DeleteItemsSelected

erschliest sich mir auch nicht. Nach dem löschen eines Items in der Listview kannst du ja dein Array durchgehen und wenn es nicht in der Listview eingetragen ist löscht du es auch aus dem Array. Das Array schreibst du (am Programmende) zurück in die Datei.

mfg autoBert

Es gibt Seiten ala http://www.famfamfam.com/lab/icons/silk/ von denen man kostenlose Icons ziehen kann. Die jeweiligen Lizenzbestimmunge müssen beachtet werden Bei famfamfam musst du einen Link auf die Seite in dein Skript einbauen:

Zitat

License

I also love to hear of my work being used, feel encouraged to send an email with a link or screenshot of the icons in their new home to mjames at gmail dot com. This work is licensed under a Creative Commons Attribution 2.5 License. This means you may use it for any purpose, and make any changes you like. All I ask is that you include a link back to this page in your credits (although a giant link on every page of your website really isn't needed, contact me to discuss specifics).

mfg autoBert

Du musst nach dem Entpacken die Dateien auch für die Ausführung auf deinem Computer zulassen: Rechtklick auf Eigenschaften und dann zulassen,

mfg autoBert