1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. olfibits

Beiträge von olfibits

  • GUICtrlCreateObj - Handling

    • olfibits
    • 13. Mai 2017 um 20:44
    AutoIt
    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    ;#include <Browser.au3>
    
    
    If $CmdLine[0] <> "3" Then
    	MsgBox(16, "Fehler", "Inkorrekter Programmaufruf")
    	Exit
    EndIf
    
    
    $Username = $CmdLine[1]
    $password = $CmdLine[2]
    $contactname = $CmdLine[3]
    
    
    $status = "offline"
    $name = "Vorname Nachname"
    #Region ### START Koda GUI section ### Form=Forms\singlechat.kxf
    $Form1 = GUICreate("Olfibits WebChat - Einzelchat", 362, 524, 192, 124)
    $Label1 = GUICtrlCreateLabel($name, 40, 5, 312, 17)
    $Icon1 = GUICtrlCreateIcon("Images\singleuser.ico", -1, 2, 2, 32, 32)
    $Label2 = GUICtrlCreateLabel($status, 40, 20, 88, 17)
    $Text = GUICtrlCreateEdit("", 0, 424, 321, 89)
    $Send = GUICtrlCreateButton("S"&@CRLF&"E"&@CRLF&"N"&@CRLF&"D"&@CRLF&"E"&@CRLF&"N", 320, 424, 40, 89, $BS_MULTILINE)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    
    
    #include <Inet.au3>
    
    
    ; #FUNCTION# ====================================================================================================================
    ; Name ..........: _Browser
    ; Description ...: Creates a ActiveX object to show the chat history
    ; Syntax ........: _Browser($mode, $requestString)
    ; Parameters ....: $mode                - String: group | single
    ;                  $requestString       - PHP-Request-String:
    ;										 -> group: username, password, groupname
    ;										 -> single: username, password, name
    ; Return values .: url
    ; Author ........: Florian
    ; Modified ......: 13/05/2017
    ; Remarks .......: 
    ; Related .......: 
    ; Link ..........: 
    ; Example .......: $Browser = _Browser("group", "user=" & $username & "&password=" & $password & "&groupname=" & $groupname) 
    ; ===============================================================================================================================;browser.au3
    
    
    Func _Browser($mode, $requestString)
    	$url = "http://localhost/chat_2.0/"
    	If $mode = "group" Then
    		$file = $url & "chat.groupchat.php?" & $RequestString
    		$obj = ObjCreate("shell.Explorer.2")
    		Global $object = GUICtrlCreateObj($obj, 0, 40, 360, 360)
    		$obj.navigate($file)
    	ElseIf $mode = "single" Then
    		$file = $url & "chat.singlechat.php?" & $RequestString
    		$obj = ObjCreate("shell.Explorer.2")
    		Global $object = GUICtrlCreateObj($obj, 0, 40, 360, 360)
    		$obj.navigate($file)	
    	EndIf	
    	Dim $Return[3]
    	$Return[1] = $obj
    	$Return[2] = $file
    	Return $Return
    EndFunc
    
    
    Func _Refresh($Arr)
    	$Arr[1].navigate($Arr[2])	
    EndFunc
    ; #FUNCTION# ====================================================================================================================
    ; Name ..........: _Write
    ; Description ...: Writes a text message to a specified user/group
    ; Syntax ........: _Write($mode, $name, $text)
    ; Parameters ....: $mode                - String: group | single
    ;                  $name                - String: the group-name or user-name
    ;                  $text                - Text message to write
    ; Return values .: int $error [0 = SUCCESS | 1 = INPUT_ERROR | 2 = INTERNAL_ERROR]
    ; Author ........: Florian
    ; Modified ......: 13/05/2017
    ; Remarks .......: 
    ; Related .......: 
    ; Link ..........: 
    ; Example .......: $Write = _Write("single", "olfibits", "Servus, das ist ein Test! :-)")
    ; ===============================================================================================================================
    Func _Write($mode, $name, $text)
    	$req = "username="&$Username
    	$req &= "&password="&$password
    	$req &= "&name="&$contactname
    	$req &= "&text="&$text
    	$url = "http://localhost/chat_2.0/"
    	If $mode = "group" Then
    		$file = $url & "chat.writegroupchat.php?" & $req
    		MsgBox(0, "", $file)
    		_INetGetSource($file)
    	ElseIf $mode = "single" Then
    		$file = $url & "chat.writesinglechat.php?" & $req
    		MsgBox(0, "", $file)
    		_INetGetSource($file)
    	Else
    		Return 1		
    	EndIf	
    	If @error Then
    		Return 2
    	EndIf
    EndFunc
    
    
    $req = "username="&$Username
    $req &= "&password="&$password
    $req &= "&name="&$contactname
    $Browser = _Browser("single", $req)
    
    
    Func _Refresh_()
    	_Refresh($Browser)
    EndFunc
    
    
    ;AdlibRegister("_Refresh_", 2000)
    While 1
    	$nMsg = GUIGetMsg()	
    	Switch $nMsg
    		Case $GUI_EVENT_CLOSE
    			Exit
    		Case $Object
    			MsgBox(64, "", "h")		; das ist ein Test					
    		Case $Send
    			$Txt = GUICtrlRead($Text)
    			If $Txt <> "" Then
    				_Write("single", $contactname, $Txt)
    			Else
    				MsgBox(16, "Fehler", "Leerer Text")
    			EndIf			
    	EndSwitch
    WEnd
    Alles anzeigen

    Sorry, so siehts aus. :)

    Würde gerne wissen wie ich das $Object anspreche.

  • GUICtrlCreateObj - Handling

    • olfibits
    • 13. Mai 2017 um 20:03

    Hallo,

    ich möchte gerne bei einem Chatverlauf als COM-Object (shell.explorer.2) bei einem Klick das Aktualisieren mit AdlibUnregister (mit AdlibRegister gestartet) unterbinden.
    Leider funktioniert nicht mal die testausgabe einer MsgBox. Irgendwie funktioniert es nicht, dass GUIGetMsg() den Klick auf das Objekt ($object) registriert (würde es nicht existieren etc., würde ja eine Fehlermeldung entstehen.)

    Die Hilfe zu ObjEvent hilft mir auch nicht weiter.

    Vielen Dank im Voraus,
    olfibits

  • AMsg - Erweiterte MsgBox mit GDI+

    • olfibits
    • 11. Mai 2017 um 13:33

    Servus,

    also ich hab das mal runtergeladen, ist super.

    LG
    olfibits

  • Word Tabelle formatieren

    • olfibits
    • 11. Mai 2017 um 13:29

    Hallo @lloid und

    ich vermute leider, dass das nicht geht.

    Die Hilfedatei sagt dazu:

    AutoIt
    #include <Word.au3>
    _Word_DocTableWrite ( $oRange, ByRef $aArray [, $iIndexBase = Default [, $sDelimiter = Default]] )

    Parameters

    $oRange Word range object where the table should be inserted
    $aArray one or two-dimensional array to be converted to a table.
    Can be zero or 1-based
    $iIndexBase [optional] Can be 0 or 1 and specifies if the array starts with row 0 or 1 (default = 1)
    $sDelimiter [optional] Specifies the character used to separate text into cells (default = @TAB)


    Folgerung:
    - $oRange definiert die Position
    - $aArray definiert die Tabelle

    Bsp.:
    Dim $table[3] ; Tabelle mit 4 Spalten (0, 1, 2, 3)

    $table[0] = "Spalte 1"
    $table[1] = "Spalte 2"
    $table[2] = "Spalte 3"
    $table[3] = "Spalte 4"

    - $iIndexBase = 0 (weil das Array ja mit 0 startet)
    - $sDelimiter = @TAB (es soll ja in verschiedene Spalten, denke ich... anders verstehe ich das nicht :) )

    Anhanddessen bin ich der Meinung, dass diese Wordfunktion nur für Klartext gedacht ist. Ob es andere Möglichkeiten gibt, bezweifle ich, wenn ich die UDF-Liste zu Word ansehe. Allgemein komme ich mit den Word-Funktionen nicht besonders klar...

    Warte aber vielleicht lieber eine Experten-Antwort ab, da mein Kenntnisstand über AutoIt zwar immer mehr zunimmt, aber noch nicht vollständig "ausgereift" ist. :)

    LG
    olfibits

  • ISN AutoIt Studio

    • olfibits
    • 7. Mai 2017 um 09:07

    Hey Wahnsinn. Von 1.03 auf 1.05 ist echt ein Sprung. Und das Update funktionierte auch. Sauber :)

    Edit: Eines ist mir allerdings noch aufgefallen... bin ich jetzt blind oder kann man kein Kontextmenü erstellen?? ?(
    Edit 2.0: Bei dem "Plugin-Absturz-Hinweis" heißt es "Das Tab wird nun gschlossen." (Typo) :p

  • Array-Problem bei Auslesen

    • olfibits
    • 28. April 2017 um 20:27

    Hätte ich gemacht. Irgendwie hat das bei deinem Beispiel auch nicht funktioniert ... ?(

    Wie auch immer. Ich nehme jetzt die INI-Variante, das finde ich auch etwas strukturierter. Dann muss ich halt UTF-8-technisch auf die Umlaute verzichten. Aber das krieg ich sicher hin. :)

    LG

  • Array-Problem bei Auslesen

    • olfibits
    • 28. April 2017 um 16:18

    Vielen Dank für Deine Hilfe, allerdings löst das nicht vollständig mein Problem (habe ich auch nicht richtig erläutert :o)

    Ich habe eine Funktion App(String $appName), die mir aus der "Mini-Datenbank" Beschreibung und Name der jeweiligen App (je nach Sprache) in der GUI anzeigen soll und mit Klick auf diesen Button den Pfad ausführen soll.

    Wenn das in AutoIt mit den Indizes nicht hinhaut, werde ich das ganze in einer INI-Datei speichern. Da ist das ganze vielleicht auch ein wenig übersichtlicher. Danke trotzdem, das werde ich mir merken.

  • Array-Problem bei Auslesen

    • olfibits
    • 27. April 2017 um 20:30

    Hallo ihr,
    ich bin's mal wieder :P ...

    Ich hab gerade so ein Problem mit Arrays. Dort habe ich mehrsprachig die Pfade, Namen und Beschreibungen auf Deutsch/Englisch gespeichert. Allerdings habe ich da so ein Problem beim Auslesen. Komischerweise zeigt sich da immer der im Array zuletzt definierte Eintrag. ?(
    Irgendwie bin ich zu dumm den Fehler zu finden, vielleicht schafft's ja wer von euch. :D

    AutoIt
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Icon=Icons\pc.ico
    #AutoIt3Wrapper_Outfile=Main.exe
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    ; -- Created with ISN Form Studio 2 for ISN AutoIt Studio -- ;
    
    
    
    
    
    
    #NoTrayIcon
    #include <StaticConstants.au3>
    #include <Array.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Include <GuiButton.au3>
    
    
    
    
    
    
    ; Better language support overview
    
    
    
    
    
    
    Dim $Apps[6][3][2]
    
    
    
    
    
    
    $Apps["CalUI"]["Description"]["de"] = "Eine einfache Kalenderoberfläche."
    $Apps["CalUI"]["Description"]["en"] = "A little calendar interface."
    $Apps["Fileman"]["Description"]["de"] = "Ein Dateimanager in Baumansicht (mit Öffnen-Funktion)."
    $Apps["Fileman"]["Description"]["en"] = "A File-Manager in Tree-View (open-function included)."
    $Apps["Timer"]["Description"]["de"] = "Ein einfaches Timer-Programm mit Countdown-Funktion."
    $Apps["Timer"]["Description"]["en"] = "An easy timer with countdown function."
    $Apps["Memo"]["Description"]["de"] = "Mit Memo können Sie Notizen speichern und später öffnen."
    $Apps["Memo"]["Description"]["en"] = "Memo allows you to save and later open notes."
    $Apps["Desktop"]["Description"]["de"] = "Erstellen Sie einen Screenshot Ihres Desktops."
    $Apps["Desktop"]["Description"]["en"] = "Create a JPG snapshot of your desktop."
    $Apps["Help"]["Description"]["de"] = "Informationen und Hilfe zu dieser Desktop-Workstation-Edition."
    $Apps["Help"]["Description"]["en"] = "Information and help for this Desktop-WS edition."
    
    
    
    
    
    
    $Apps["CalUI"]["File"]["de"] = "data\de\calui.exe"
    $Apps["CalUI"]["File"]["en"] = "data\en\calui.exe"
    $Apps["Fileman"]["File"]["de"] = "data\de\FileExplorer.exe"
    $Apps["Fileman"]["File"]["en"] = "data\en\FileExplorer.exe"
    $Apps["Timer"]["File"]["de"] = "data\de\Timer.exe"
    $Apps["Timer"]["File"]["en"] = "data\en\Timer.exe"
    $Apps["Memo"]["File"]["de"] = "data\de\Memo.exe"
    $Apps["Memo"]["File"]["en"] = "data\en\Memo.exe"
    $Apps["Desktop"]["File"]["de"] = "data\de\catchMyDesktop.exe"
    $Apps["Desktop"]["File"]["en"] = "data\en\catchMyDesktop.exe"
    
    
    
    
    
    
    $Apps["CalUI"]["Name"]["de"] = "Kalender"
    $Apps["CalUI"]["Name"]["en"] = "Calendar"
    $Apps["Fileman"]["Name"]["de"] = "Datei-Manager"
    $Apps["Fileman"]["Name"]["en"] = "File Manager"
    $Apps["Timer"]["Name"]["de"] = "Timer"
    $Apps["Timer"]["Name"]["en"] = "Timer"
    $Apps["Memo"]["Name"]["de"] = "Kurznotizen ('Memo')"
    $Apps["Memo"]["Name"]["en"] = "Notes ('Memo')"
    $Apps["Desktop"]["Name"]["de"] = "CatchMyDesktop"
    $Apps["Desktop"]["Name"]["en"] = "CatchMyDesktop"
    
    
    
    
    
    
        If @OSLang <> "0407" Then
            $language = "en"
        Else
            $language = "de"
        EndIf
    Func _ShellExecute($sPath)    
        ShellExecute($sPath)
    EndFunc
    
    
    
    
    
    
    SoundPlay("start.wav")
    
    
    
    
    
    
    $Main = GUICreate("Olfibits Desktop Workstation 2.0 Starter Edition",700,500,-1,-1,-1,-1)
    $BGimage = GUICtrlCreatePic(@scriptdir&"\"&"Images\bg.bmp",0,0,700,500,$WS_CLIPSIBLINGS)
    guictrlsetstate(-1,$GUI_DISABLE)
    GUICtrlSetFont(-1,15,400,0,"MS Sans Serif")
    GUICtrlSetBkColor(-1,"0xFFFFDF")
    $DateTime = GUICtrlCreateLabel("--.--.--",175,485,350,15,$SS_CENTER,-1)
    ;$DateTime = GUICtrlCreateLabel(".",190,540,798,21,$SS_RIGHT,-1)
    GUICtrlSetFont(-1,9,400,0,"MS Sans Serif")
    GUICtrlSetBkColor(-1,"0xFFFFDF")
    GUICtrlCreateLabel("App",520,0,180,41,$SS_CENTER,-1)
    GUICtrlSetFont(-1,20,600,4,"Segoe UI Semibold")
    GUICtrlSetBkColor(-1,"0xFFFFFF")
    $AppName = GUICtrlCreateLabel("App:",520,41,180,15,-1,-1)
    GUICtrlSetBkColor(-1,"0xFFFFFF")
    $Timer = GUICtrlCreateButton("Timer",10,10,125,125,$BS_ICON,-1)
    GUICtrlSetFont(-1,20,400,0,"Segoe UI")
    GUICtrlSetImage(-1,@scriptdir&"\"&"Icons\timer.ico",1,1)
    $Description = GUICtrlCreateLabel("Beschreibung:",520,56,180,138,-1,-1)
    GUICtrlSetBkColor(-1,"0xFFFFFF")
    $Run = GUICtrlCreateButton("Gewählte App starten",520,194,180,30,-1,-1)
    $CalUI = GUICtrlCreateButton("Calendar",142,145,125,125,$BS_ICON,-1)
    GUICtrlSetFont(-1,20,400,0,"Segoe UI")
    GUICtrlSetImage(-1,@scriptdir&"\"&"Icons\cal.ico",1,1)
    $FileMan = GUICtrlCreateButton("File Manager",10,145,125,125,$BS_ICON,-1)
    GUICtrlSetFont(-1,20,400,0,"Segoe UI")
    GUICtrlSetImage(-1,@scriptdir&"\"&"Icons\fileman.ico",1,1)
    $Desktop = GUICtrlCreateButton("Snapshot",142,10,125,125,$BS_ICON,-1)
    GUICtrlSetFont(-1,20,400,0,"Segoe UI")
    GUICtrlSetImage(-1,@scriptdir&"\"&"Icons\desktop.ico",1,1)
    $Memo = GUICtrlCreateButton("Notizen",271,10,125,125,$BS_ICON,-1)
    GUICtrlSetFont(-1,20,400,0,"Segoe UI")
    GUICtrlSetImage(-1,@scriptdir&"\"&"Icons\file.ico",1,1)
    $Help = GUICtrlCreateButton("Informationen",271,145,125,125,$BS_ICON,-1)
    GUICtrlSetFont(-1,20,400,0,"Segoe UI")
    GUICtrlSetImage(-1,@scriptdir&"\"&"Icons\help.ico",1,1)
    $Exit = GUICtrlCreateButton("Beenden",522,446,180,54,$BS_ICON,-1)
    GUICtrlSetFont(-1,20,400,0,"Segoe UI")
    GUICtrlSetImage(-1,@scriptdir&"\"&"Icons\shutdown.ico",1,1)
    
    
    
    
    
    
    GUISetstate(@SW_SHOW)
    
    
    
    
    
    
    AdlibRegister("_Update", 1000)
    Func _Update()
     If $language = "de" Then
        GUICtrlSetData($dateTime, @MDAY&"."&@MON&"."&@YEAR&", "&@HOUR&":"&@MIN&":"&@SEC)
     Else
        $op = "th"
        Switch @MDAY
            Case "01"
                $op = "st"
            Case "02"
                $op = "nd"        
            Case "03"
                $op = "rd"    
        EndSwitch
        Switch @MON
            Case "01"
                $Mon = "January"    
            Case "02"
                $Mon = "February"
            Case "03"
                $Mon = "March"
            Case "04"
                $Mon = "April"
            Case "05"
                $Mon = "May"            
            Case "06"
                $Mon = "June"
            Case "07"
                $Mon = "July"
            Case "08"
                $Mon = "August"
            Case "09"
                $Mon = "September"
            Case "10"
                $Mon = "October"
            Case "11"
                $Mon = "November"
            Case "12"
                $Mon = "December"        
        EndSwitch
        GUICtrlSetData($dateTime, @MDAY&$op&" of "&$Mon&" "&@YEAR&", "&@HOUR&":"&@MIN&":"&@SEC)
     EndIf
    EndFunc
    
    
    
    
    
    
    Func App($appN)
        If $appN = "" Then
            MsgBox(16, "Error", "Internal error. No app specified.")       
        Else
            ; MsgBox(0, "", '$Apps["'&$appN&']["Name"]["'&$language&'"]' & " = "& $Apps[$appN]["Name"][$language]) ; <== da hakt's auch schon
            GUICtrlSetData($AppName, "App: "& $Apps[$appN]["Name"][$language]); <== und da erst recht
            $CurrentApp = $Apps[$appN]["Name"][$language]
        EndIf
    EndFunc
    
    
    
    
    
    
    While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
            Case $GUI_EVENT_CLOSE
                SoundPlay("stop.wav")
                GUIDelete()
                Sleep(3000)
                Exit
            Case $Exit
                SoundPlay("stop.wav")
                GUIDelete()
                Sleep(3000)
                Exit
            Case $CalUI
                App("CalUI")
            Case $Memo
                App("Memo")
            Case $Fileman
                App("Fileman")
            Case $timer
                App("Timer")
            case $Desktop
                App("Desktop")
            case $Help
                If $language = "en" Then
                    MsgBox(64, "About Olfibits Desktop Workstation 2.0 Starter Edition", "This edition is a starter edition of Olfibits Desktop Workstation and a test version of this project. That's why not too many features and files are included. Obtain a higher edition for better features.")
                Else
                    MsgBox(64, "Über Olfibits Desktop Workstation 2.0 Starter Edition", "Diese Variante ist eine Einsteiger-Variante von Olfibits Desktop Workstation und eine Testversion für dieses Projekt. Daher sind nur sehr wenige Funktionen eingebunden. Erwerben Sie sich eine höhere Version für bessere Programme und Funktionen.")
                EndIf
        EndSwitch
    WEnd
    Alles anzeigen

    Vielen Dank im Voraus!
    olfibits

  • Nutzungsrechte Skripte

    • olfibits
    • 18. April 2017 um 19:53

    Also ich bin auf jeden Fall dafür - habe auch so gevotet. Jeder kann ja eine Lizenz erstellen oder eine Bemerkung hinterlassen, zB 'für Benutzung an mich wenden' oder so.

  • Wer hat eigentlich die "Rechte" an veröffentlichen Skripten?

    • olfibits
    • 17. April 2017 um 14:12

    Mach das, wie du meinst :)

  • Wer hat eigentlich die "Rechte" an veröffentlichen Skripten?

    • olfibits
    • 17. April 2017 um 07:58

    @BugFix genauso hätte ich es jetzt aich gesehen, war mir aber nicht 100% sicher.

  • Wer hat eigentlich die "Rechte" an veröffentlichen Skripten?

    • olfibits
    • 16. April 2017 um 11:10

    alles klar :)

  • Wer hat eigentlich die "Rechte" an veröffentlichen Skripten?

    • olfibits
    • 16. April 2017 um 07:33

    Danke für die Antwort, dann kenn ich mich schon aus. Und hochgeladene UDFs darf im Prinzip jeder verwenden?

  • Wer hat eigentlich die "Rechte" an veröffentlichen Skripten?

    • olfibits
    • 15. April 2017 um 21:18

    hallo,

    erstmal frohe Ostern.
    Wie gesagt - wer hat die Rechte an veröffentlichten Skripten und darf bspw. ein anderer User öffentliche Skripte verwenden?

    Lg
    olfibits

  • IniRead funktioniert nicht - finde das Problem nicht

    • olfibits
    • 10. April 2017 um 08:01
    Zitat von alpines

    aber doch nicht programmintern

    Ja... ebendas wusste ich ja nicht. So kann's gehn :)

  • IniRead funktioniert nicht - finde das Problem nicht

    • olfibits
    • 8. April 2017 um 11:33

    Weil ich dachte, dass dann die Pfade wegen den Leerzeichen nicht mehr gehen. Tja, so dumm kann man sein :cursing:

  • IniRead funktioniert nicht - finde das Problem nicht

    • olfibits
    • 8. April 2017 um 10:46

    Hallo,

    ich hab's anscheinend irgendwie erledigt. In der INI-Datei (settings.ini) habe ich die Anführungszeichen entfernt - dann ging es ohne Probleme.
    Seither ist zwar nur noch ein Eintrag mit den Default einträgen, die ich aber filtern kann.
    Ich denke damit ist das Thema - wenn auch ungewöhnlich - gelöst.

    LG olfibits

  • Kleine Übungen mit Spoilern als html-Datei erstellen

    • olfibits
    • 8. April 2017 um 10:29

    Hab den Code mal nur kurz überflogen, aber sieht ganz nett aus und ist durchaus sehr sinnvoll
    :)

  • IniRead funktioniert nicht - finde das Problem nicht

    • olfibits
    • 8. April 2017 um 10:20

    (Hinweis: 1. Zeile sind Spaltenüberschriften)

  • IniRead funktioniert nicht - finde das Problem nicht

    • olfibits
    • 8. April 2017 um 10:19

    Daran liegts auch nicht, leider.

    AutoIt
    $PluginPath = $Plugins[$i][1]			
    		$Name = IniRead($PluginPath, "plugin", "Name", "Name")
    		$Version = IniRead($PluginPath, "plugin", "Version", "Version")
    		$Author = IniRead($PluginPath, "plugin", "Author", "Autor")
    		$Date = IniRead($PluginPath, "plugin", "Date", "Datum")
    		$Path = IniRead($PluginPath, "plugin", "Main", "Hauptpfad")
    		$Details = $Name & "|" & $Version & "|" & $Author & "|" & $Date & "|" & $Path		
    		GUICtrlCreateListViewItem($Details, $ListView1)

    Wenn ich $Details
    als MsgBox ausgebe, kommt heraus
    Titel: Details
    Inhalt: Name|Version|Autor|Datum|Hauptpfad (also die Default-Werte). Bei "" als Default das gleiche. Bin ratlos
    Vorallem, wenn ich so dasselbe Plugin als neues Plugin "installiere":

    AutoIt
    Case $Install
    			$Title = InputBox("Titel des Plugins", "Geben Sie den Titel des Plugins ein (KEINE LEERZEICHEN!!)")
    			$INIPath = FileOpenDialog("Wählen Sie eine gültige Konfigurationsdatei (*.ini) des Plugins aus...", @UserProfileDir, "INI-Konfigurationsdateien (*.ini)")
    			IniWrite(@ScriptDir & "\settings.ini", "plugins", StringReplace($Title, " ", "_"), $IniPath)
    			_LoadList()

    ... steht in der Listbox drin:


    Name Version Autor Datum Hauptpfad
    Name Version Autor Datum Hauptpfad
    Name Version Autor Datum Hauptpfad
    Beispielplugin 1.0 *** (Olfibits) 08.04.2017 PluginSample.exe


    und lässt sich über den Button mit dieser Methode:

    AutoIt
    $Array = StringSplit(GUICtrlRead(GUICtrlRead($ListView1)), "|")
    ShellExecute($Array[5])

    ... ohne Probleme starten. :)
    Keine Ahnung woran das liegt.

    lg

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™