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. Chicago

Beiträge von Chicago

  • WindowsInformation (SerialKey, InstallDate,...)

    • Chicago
    • 2. Oktober 2007 um 00:40

    hallo Xeno,

    geiles Teil.... :tassen: ... muss ich schon sagen .....

    und wenn du es noch schaffen könntest auszulesen wie die Installationskennung wäre,
    die M$ bei der aktivierung angibt, wäre es megamega geil....

    Weiß aber nicht ob man das wo kann....

  • Kleines Matheprogramm

    • Chicago
    • 28. September 2007 um 00:15

    Hallo Oscar,

    habe mal die neueste Fassung oben gepostet. Dein Vorschlag ist nicht schlecht, nur dachte ich mir hier nochmals die Formeln anzuzeigen.

    Den ein oder anderen Tab versuche ich noch zu füllen mit Rechnungen.
    Also wenn du noch was weißt, bitte schreiben, solltest du auch die Formel parat haben, direkt mitposten. Erspart mir die Suche.

  • Tool: Formatierung Controls

    • Chicago
    • 24. September 2007 um 00:24

    Hallo BugFix,

    habs gestern getestet und direkt mal in mein Matheprog mit eingebaut.
    Aber wäre es möglich, muss nicht, hinter den Zeilen ein Komentar als
    Erklärung mit auszugeben.... denke da an die Anfänger.

    Etwa so:

    GUICtrlSetFont(-1, 15, 950, -1, "Courier New") ; Schriftartenbestimmung
    GUICtrlSetColor(-1, 0xFF78FF) ; Schriftfarbe
    GUICtrlSetBkColor(-1, 0xD46AC8) ; Schrift Hintergrund

    Wäre sehr hilfreich für Neulinge.

  • Kleines Matheprogramm

    • Chicago
    • 23. September 2007 um 23:03

    Hallo Oscar,

    Die Idee mit den Button ist nicht schlecht....
    mit der if verstehe ich nicht so ganz.... aber egal.

    Ich finde es ist auch sehr unübersichtlich was ich mir da damals ausgedacht habe, drum bin ich gerade dabei alles neu zu überarbeiten....
    mit GUICtrlCreateTabItem ..... da lege ich die Button für jede Berechnung
    zusammen in einem Reiter.... find ist wesendlich übersichtlicher.

    Ich denke wenn ich es noch schaffe, stell ich es heute noch rein im ersten post.

    Aber trotzdem danke für die Tips.... bis zum nächsten edit ...

    Edit: .... so generalüberholt, aufgeräumt... mit Farbe gematscht...
    Vieleicht müsste die OKButton Lösung überarbeitet werden ... aber mal sehen

  • Beispielsammlung

    • Chicago
    • 23. September 2007 um 00:41

    Hallo Alina,

    eine super idee.... :klatschen:

    Ich würde dann mal als ein Beispiel für ein Beispiel vollgendes anregen.

    Beispiel der Hilfe:

    $font="Comic Sans MS"
    GUISetFont (9, 400, 4, $font) ; will display underlined characters
    GUICtrlCreateLabel ("underlined label",10,20)

    Zeile wird Unterstrichen und entsprechend der Schrift dargestellt...

    Folgende Zeile um vorrangegangenes wieder zu normalisieren :

    GUISetFont (8.5, 400, 1, "") ; <---- Standard Einstellung

    Das kann man leider in der Hilfe nicht finden, mir hat da gtaSpider geholfen.
    Und wenns gut und vorallem Einfach erklärt wird, denke ich das dort auch nicht viel
    nachgefragt werden müsste........ Man muss sich nur an die eigenen Anfänge erinnern und
    es für sorry .... "dumme" erklären... auch wenn man meint, das versteht schon jeder....

    Ich würde Dir gerne dabei Helfen Beispiele zu erklären.... mein Versuchskanninchen sitzt
    neben mir... hat null ahnung ..... aber wenn ich neee Anleitung schreibe hats bis jetzt jeder geschafft zb. ins Inet zu kommen oder es Office zu bedienen...

  • Kleines Matheprogramm

    • Chicago
    • 22. September 2007 um 19:03

    Hallo,

    erstmal möchte ich danke sagen für die Kritik, und eure tolle Hilfe.

    Jetzt mal der Reihe nach:

    Zu Oskar:

    Angefangen mit Zeile 56:
    Semikolon VOR der schließenden Klammer. Diesen Fehler hast Du dutzende Male (bei jedem GUICtrlSetOnEvent und jedem GUISetOnEvent) gemacht.

    -> Das kann ich leider nicht nachvollziehen, da es in meinem Script nicht so ist, auch
    habe ich das Listing ausgedruckt wo es auch nicht so ist .... X(

    - Zeile 179: $Formel4 = " Die Formel = V / ( L * B "

    -> habe es im Ausdruck gesehen, aber es war schon zu spät um es zu ändern
    hätte ich aber heute noch Editiert,

    - Trapez schreibt sich ohne "tz"
    -> schreibfehler, aber Deutsch war nie meine stärke 8)

    - Benutzer muss erraten, in welcher Einheit er die Eingaben machen muss.
    -> Ich denke Du meinst jetzt in Metern oder mm.... Masseinheiten ?

    zur Ausgabe der MsgBox Seite 2 .... da wollte ich noch eine dritte Seite ranhängen mit
    Volumenberechnen von Zylindern, Kegeln und soweiter..... nur vergessen es auszukommentieren.

    Opt("GUICoordMode", 3) und Opt("GUIOnEventMode", 1)
    -> danke, wie ich sehe in jeder gui drin.... ?(

    m² .... <-- wusste nicht wie ich das hoch 2 hinbekomme..... trotzdem Danke


    Zu Alina:

    Warum sollte ich Dir denn die Berichtigung übel nehmen... ich freue mich wenn ich hilfe und änderungs vorschläge auch in Form von Berichtigungen bekomme. So kann ich doch besser vergleichen .....

    - Button betätigen kann, der die Berechnung "startet",
    -> den hatte ich schon mal am anfang drin, hatte ihn aber nicht wirklich ans laufen bekommen...
    werde ich aber noch einbauen bis zum nächsten mal. Ansonsten reicht doch Enter bei der letzten eingabe

    Wie meinst Du das, mit den Formeln anzeigen? Die stehen doch schon im Fenster ....


    Bei mir lief das Script eigendlich ohne Fehler, habe es ausgibig getestet. Mit
    groben Fehlern hätte ich es nicht gepostet... Wer mich von Galenda her kennt,
    weiß das...... da bin ich ein Perfektionist....
    aber egal.... ist halt so, darum bittet man ja um Hilfe


    Wie gesagt Danke an euch zwei für die konstruktive unterstützung...


    Edit .... sehe gerade mein 100 Post ... :tassen:

    Edit2 ..... im ersten Post Script überarbeitet... mit Berechnen Button

    Edit3 .... Erneut überarbeitet ... Formeln und Ergebnis hervorgehoben und letzte Rechenfehler
    behoben .... Ihr könnt wieder Testen

  • Kleines Matheprogramm

    • Chicago
    • 22. September 2007 um 04:38

    Hallo,

    hier mal ein Kleines Mathematik Programm, was ich vor 20 Jahren mal in
    Basic geschrieben habe. Ich habe es mal, um wieder mit proggen anzufangen,
    in Autoit umgeschrieben. Es ist keine Meisterleistung ( das weiß ich selber ),
    aber mal ein Anfang.

    Berechnet werden Quadratmeter, Trapetz, Dreiecke und so weiter...... auch wenn Masse fehlen

    Danken möchte ich hier mal ganz lieb, meinen "Prof" peethebee, der mir sehr wertvolle Tips und
    hilfstellungen gegeben hat und hier und da schützend eingegriffen hat.

    Ich würde mich freuen, wenns hier mal einige testen würden und mir vieleicht auch
    einige Vorschläge zur Verbesserung geben könnten ........ Soll heißen .....
    Kritik und Vorschläge sind gerne gesehen .... also los...


    Edit: Das Script war zu groß, drum jetzt als zip angehängt.......

    Edit2: einige kleinere Fehler ausgeräumt und mit der Erlaubnis von Daniel W.
    dessen Calculator mit eingebaut. Danke nochmal an Daniel

    Dateien

    Geometrie.zip 11,37 kB – 691 Downloads
  • Für was verwendet ihr autoit ?

    • Chicago
    • 18. September 2007 um 01:35

    Hallo Bullz,

    wie du aus dem Forum bestimmt sehen konntest, wird Autoit
    sehr oft genutzt um automationen für Programme zu schreiben.

    Aber nicht nur dafür, wie du vieleicht auch gesehen hast lassen sich mit Autoit auch komplexe Programme programmieren...
    siehe Projekte/ Galendo und so weiter.......

    Anders gesagt .... man kann alles machen mit Autoit.... bis zu einem gewissen Grad versteht sich ..... aber es ist einfach und vielseitig.

    Probiere und studiere.... und wenn du auf probleme stößt, wird dir hier
    kompetent und schnell geholfen...

  • Zufallskopierer für MP3

    • Chicago
    • 13. September 2007 um 22:48

    Hallo,

    hier ist ein kleines aber feines und bestimmt für einige gut zu brauchendes Script:

    GtaSpider hat das Script geprogt und Ihm gilt daher mein Dank.


    Es kopiert aus einem Ordner(Festplatte) Tracks zufällig, wie der Name schon sagt, an einen MP3-Player oder anderes Ziel.
    Alles lässt sich über eine Gui einstellen ....


    Spoiler anzeigen
    [autoit]


    ; =============================================================
    ;
    ; Zufallskopierer für Musiktracks in MP3
    ;
    ; Idee: Chicago
    ;
    ; Author: GtaSpider
    ;
    ; =============================================================

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

    #include <file.au3>
    #include <array.au3>
    #include <GUIConstants.au3>
    Opt("GuiOnEventMode", 1)

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

    Global $hwndSpl, $SplNext = 1, $SplText, $FileList, $size = 0
    Global $ListTxt = @ScriptDir & "\List.txt"
    Global $ListTxtOp = FileOpen($ListTxt, 1)
    Global $FilesToCopy[1]

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

    $maingui = GUICreate("MP3-Zufallskopierer", 200, 200, 193, 125)
    ;GUISetOnEvent($GUI_EVENT_CLOSE, "_exit";) ;Da GuigetMsg() nicht mehr funktinoiert, da OnEventMode 1 ist
    GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
    $MusicInp = GUICtrlCreateInput("", 8, 24, 121, 21)
    GUICtrlCreateLabel("Musik Ordner:", 8, 8, 68, 15)
    $TargetInp = GUICtrlCreateInput("", 8, 64, 121, 21)
    GUICtrlCreateLabel("Ziel Ordner:", 8, 48, 68, 15)
    $ChooseBut1 = GUICtrlCreateButton("..", 129, 24, 27, 21, 0)
    GUICtrlSetOnEvent(-1, "_search_path")
    $ChooseBut2 = GUICtrlCreateButton("..", 129, 64, 27, 21, 0)
    GUICtrlSetOnEvent(-1, "_search_path")
    GUICtrlCreateLabel("Größe in mb:", 8, 90, 68, 15)
    $GroesseInp = GUICtrlCreateInput("", 8, 105, 121, 21)
    $StartBut = GUICtrlCreateButton("&Start", 8, 150, 148, 25, 0)
    GUICtrlSetOnEvent(-1, "_Start")
    $Progress = GUICtrlCreateProgress(8, 138, 148, 9)
    GUISetState()

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

    While 1;Damit das Script nicht beendet
    Sleep(100)
    WEnd

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

    Func _search_path()
    $path = FileSelectFolder("", 3 ,1,"::{450D8FBA-AD25-11D0-98A8-0800361B1103}")
    If @error Then Return
    If @GUI_CtrlId = $ChooseBut1 Then; wenn als letzes ChosseBut1 gedrückt wurde (der button für den Musik Ordner)...
    If $path <> "" Then GUICtrlSetData($MusicInp, $path);...setze das control $MusicInp (Musik Ordner) mit dem Pfad
    Else; ansonsten (also wenn der button für den Ziel ordner gedrückt wurde) ...
    If $path <> "" Then GUICtrlSetData($TargetInp, $path);...setze das control $TargetInp (Ziel Ordner) mit dem Pfad
    EndIf

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

    EndFunc ;==>_search_path

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

    If FileGetSize($ListTxt) Then _ReadFromList()

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

    Func CLOSEClicked()
    Exit
    EndFunc

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

    Func _Start()
    ;DIESE DATEN MUSST DU NACH DEINEN WÜNSCHEN BEARBEITEN <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
    Global $MusicDir = GUICtrlRead($MusicInp) ; Laufwerk auf dem Musik ist >> soll in Gui ausgewählt werden können
    Global $SizeInByte = GUICtrlRead($GroesseInp) * 1048576 ; Berechnet die Größe der zu kopierenden Dateimengen 3750 * 1048576 = ca. 4 GB
    Global $DestDir = GUICtrlRead($TargetInp) ; Laufwerk MP3-Player >> Zielort Auswahl in Gui Ordner oder MP3-Player
    Global $MusicDirName = StringTrimLeft($MusicDir, StringInStr($MusicDir, "", 0, -1))

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

    If Not IsArray($FileList) Then _ReadMusicDir()

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

    $SplText = "Kopiere Daten"
    $hwndSpl = SplashTextOn("", $SplText & @LF & "|", 250, 65, -1, -1, 1, "Courier New")
    AdlibEnable("_SetSpl", 100)

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

    If Not FileExists($DestDir) Then DirCreate($DestDir)

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

    $mb = 0
    $rand = 0
    $InUseRead = FileRead("InUse_do_not_delete.txt";)
    $InUse = $InUseRead
    While 1
    $SplText = "Kopiere Daten" & @CRLF & StringTrimLeft($FileList[$rand], StringInStr($FileList[$rand], "", -1, -1))
    $aInUse = StringSplit($InUse, ",")
    $RandInUse = True
    While $RandInUse
    $rand = Random(1, $FileList[0], 1)
    $RandInUse = False
    For $i = 1 To $aInUse[0]
    ConsoleWrite($rand & "," & $aInUse[$i] & @CRLF)
    If $rand = $aInUse[$i] Then
    $RandInUse = True
    ExitLoop
    EndIf
    Next
    WEnd
    $mb += FileGetSize($FileList[$rand])
    If $mb > $SizeInByte Then ExitLoop
    FileCopy($FileList[$rand], $DestDir & "\*.*")
    $InUse &= $rand & ","
    WEnd

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

    FileWrite("InUse_do_not_delete.txt", StringTrimLeft($InUse, StringLen($InUseRead)))

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

    SplashOff()
    EndFunc ;==>_Start

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

    Func OnAutoItExit()
    FileClose($ListTxtOp)
    EndFunc ;==>OnAutoItExit

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

    Func _ReadMusicDir()
    $SplText = "Lese den Musikordner ein" & @LF & $MusicDirName
    $hwndSpl = SplashTextOn("", $SplText & @LF & "|", 250, 40, -1, -1, 1, "Courier New")
    AdlibEnable("_SetSpl", 100) ; <<<<< Hier kommt die Fehlermeldung
    FileDelete("InUse_do not delete.txt")
    $FileList = _FileListToArrayEx($MusicDir, "*.*", 1, '', True)
    SplashOff()
    AdlibDisable()
    FileWriteLine($ListTxtOp, $MusicDir)
    For $i = 1 To $FileList[0]
    FileWriteLine($ListTxtOp, StringTrimLeft($FileList[$i], StringLen($MusicDir) + 1))
    Next
    EndFunc ;==>_ReadMusicDir

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

    Func _ReadFromList()
    $SplText = "Lese daten von Datei" & @LF & StringTrimLeft($ListTxt, StringInStr($ListTxt, "", 0, -1))
    $hwndSpl = SplashTextOn("", $SplText & @LF & "|", 250, 65, -1, -1, 1, "Courier New")
    AdlibEnable("_SetSpl", 100)
    _FileReadToArray($ListTxt, $FileList)
    Global $MusicDir = $FileList[1]
    $FileList[0] = $FileList[0] - 1
    _ArrayDelete($FileList, 1)
    For $i = 1 To $FileList[0]
    $FileList[$i] = $MusicDir & "" & $FileList[$i]
    If Not FileExists($FileList[$i]) Then MsgBox(0, "", $FileList[$i])
    Next
    SplashOff()
    EndFunc ;==>_ReadFromList

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

    Func _SetSpl()
    Switch $SplNext
    Case 1
    ControlSetText($hwndSpl, "", "Static1", $SplText & @LF & "./.")
    $SplNext = 2
    Case 2
    ControlSetText($hwndSpl, "", "Static1", $SplText & @LF & "..-..")
    $SplNext = 3
    Case 3
    ControlSetText($hwndSpl, "", "Static1", $SplText & @LF & "...\...")
    $SplNext = 4
    Case 4
    ControlSetText($hwndSpl, "", "Static1", $SplText & @LF & "|")
    $SplNext = 1
    EndSwitch
    EndFunc ;==>_SetSpl

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

    ;===============================================================================
    ; Description: lists all or preferred files and or folders in a specified path (Similar to using Dir with the /B Switch)
    ; Syntax: _FileListToArrayEx($sPath, $sFilter = '*.*', $iFlag = 0, $sExclude = '', $bTmpFile = False)
    ; Parameter(s): $sPath = Path to generate filelist for
    ; $sFilter = The filter to use. Search the Autoit3 manual for the word "WildCards" For details, support now for multiple searches
    ; Example *.exe; *.txt will find all .exe and .txt files
    ; $iFlag = determines weather to return file or folders or both.
    ; $sExclude = exclude a file from the list by all or part of its name
    ; Example: Unins* will remove all files/folders that start with Unins
    ; $iFlag=0(Default) Return both files and folders
    ; $iFlag=1 Return files Only
    ; $iFlag=2 Return Folders Only
    ; $bTmpFile = Boolean value for specifying if using a temp. file
    ; $bTmpFile = True All files are written to a "reserved" .tmp file (Thanks to gafrost) for the example
    ; The Reserved file is then read into an array, then deleted
    ; $bTmpFile = False No .tmp file is used
    ; Requirement(s): None
    ; Return Value(s): On Success - Returns an array containing the list of files and folders in the specified path
    ; On Failure - Returns the an empty string "" if no files are found and sets @Error on errors
    ; @Error or @extended = 1 Path not found or invalid
    ; @Error or @extended = 2 Invalid $sFilter or Invalid $sExclude
    ; @Error or @extended = 3 Invalid $iFlag
    ; @Error or @extended = 4 No File(s) Found
    ; Author(s): SmOke_N
    ; Note(s): The array returned is one-dimensional and is made up as follows:
    ; $array[0] = Number of Files\Folders returned
    ; $array[1] = 1st File\Folder
    ; $array[2] = 2nd File\Folder
    ; $array[3] = 3rd File\Folder
    ; $array[n] = nth File\Folder
    ;===============================================================================

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

    Func _FileListToArrayEx($sPath, $sFilter = '*.*', $iFlag = 0, $sExclude = '', $iRecurse = False, $iShortName = True)
    If Not FileExists($sPath) Then Return SetError(1, 1, '')
    If $sFilter = -1 Or $sFilter = Default Then $sFilter = '*.*'
    If $iFlag = -1 Or $iFlag = Default Then $iFlag = 0
    If $sExclude = -1 Or $sExclude = Default Then $sExclude = ''
    Local $aBadChar[6] = ['\', '/', ':', '>', '<', '|']
    $sFilter = StringRegExpReplace($sFilter, '\s*;\s*', ';')
    If StringRight($sPath, 1) <> '\' Then $sPath &= '\'
    For $iCC = 0 To 5
    If StringInStr($sFilter, $aBadChar[$iCC]) Or _
    StringInStr($sExclude, $aBadChar[$iCC]) Then Return SetError(2, 2, '')
    Next
    If StringStripWS($sFilter, 8) = '' Then Return SetError(2, 2, '')
    If Not ($iFlag = 0 Or $iFlag = 1 Or $iFlag = 2) Then Return SetError(3, 3, '')
    Local $oFSO = ObjCreate("Scripting.FileSystemObject"), $sTFolder
    $sTFolder = $oFSO.GetSpecialFolder (2)
    Local $hOutFile = @TempDir & $oFSO.GetTempName
    If Not StringInStr($sFilter, ';') Then $sFilter &= ';'
    Local $aSplit = StringSplit(StringStripWS($sFilter, 8), ';'), $sRead, $sHoldSplit
    For $iCC = 1 To $aSplit[0]
    If StringStripWS($aSplit[$iCC], 8) = '' Then ContinueLoop
    If StringLeft($aSplit[$iCC], 1) = '.' And _
    UBound(StringSplit($aSplit[$iCC], '.')) - 2 = 1 Then $aSplit[$iCC] = '*' & $aSplit[$iCC]
    $sHoldSplit &= '"' & $sPath & $aSplit[$iCC] & '" '
    Next
    $sHoldSplit = StringTrimRight($sHoldSplit, 1)
    If $iRecurse Then
    RunWait(@ComSpec & ' /c dir /b /s /a ' & $sHoldSplit & ' > "' & $hOutFile & '"', '', @SW_HIDE)
    Else
    RunWait(@ComSpec & ' /c dir /b /a ' & $sHoldSplit & ' /o-e /od > "' & $hOutFile & '"', '', @SW_HIDE)
    EndIf
    $sRead &= FileRead($hOutFile)
    If Not FileExists($hOutFile) Then Return SetError(4, 4, '')
    FileDelete($hOutFile)
    If StringStripWS($sRead, 8) = '' Then SetError(4, 4, '')
    Local $aFSplit = StringSplit(StringTrimRight(StringStripCR($sRead), 1), @LF)
    Local $sHold
    For $iCC = 1 To $aFSplit[0]
    If $sExclude And StringLeft($aFSplit[$iCC], _
    StringLen(StringReplace($sExclude, '*', ''))) = StringReplace($sExclude, '*', '') Then ContinueLoop
    Switch $iFlag
    Case 0
    If StringLeft($aFSplit[$iCC], StringLen($sPath)) <> $sPath Then
    If $iShortName Then
    $sHold &= FileGetShortName($sPath & $aFSplit[$iCC]) & Chr(1)
    Else
    $sHold &= $sPath & $aFSplit[$iCC] & Chr(1)
    EndIf

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

    Else
    If $iShortName Then
    $sHold &= FileGetShortName($aFSplit[$iCC]) & Chr(1)
    Else
    $sHold &= $aFSplit[$iCC] & Chr(1)
    EndIf

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

    EndIf
    Case 1
    If StringInStr(FileGetAttrib($sPath & '\' & $aFSplit[$iCC]), 'd') Then ContinueLoop
    If StringLeft($aFSplit[$iCC], StringLen($sPath)) <> $sPath Then
    If $iShortName Then
    $sHold &= FileGetShortName($sPath & $aFSplit[$iCC]) & Chr(1)
    Else
    $sHold &= $sPath & $aFSplit[$iCC] & Chr(1)
    EndIf
    Else
    If $iShortName Then
    $sHold &= FileGetShortName($aFSplit[$iCC]) & Chr(1)
    Else
    $sHold &= $aFSplit[$iCC] & Chr(1)
    EndIf
    EndIf
    Case 2
    If Not StringInStr(FileGetAttrib($sPath & '\' & $aFSplit[$iCC]), 'd') Then ContinueLoop
    If StringLeft($aFSplit[$iCC], StringLen($sPath)) <> $sPath Then
    If $iShortName Then
    $sHold &= FileGetShortName($sPath & $aFSplit[$iCC]) & Chr(1)
    Else
    $sHold &= $sPath & $aFSplit[$iCC] & Chr(1)
    EndIf
    Else
    If $iShortName Then
    $sHold &= FileGetShortName($aFSplit[$iCC]) & Chr(1)
    Else
    $sHold &= $aFSplit[$iCC] & Chr(1)
    EndIf
    EndIf
    EndSwitch
    Next
    $sHold = StringReplace(StringReplace(StringReplace(StringReplace($sHold, Chr(129), "ü"), Chr(132), "ä"), Chr(148), "ö"), Chr(225), "ß")
    If StringTrimRight($sHold, 1) Then Return StringSplit(StringTrimRight($sHold, 1), Chr(1))
    Return SetError(4, 4, '')
    EndFunc ;==>_FileListToArrayEx

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit]
  • Bugs

    • Chicago
    • 31. August 2007 um 23:46

    Hallo peethebee,

    mir ist gestern bei einer Neuinstallation mit IOM3.02 folgendes aufgefallen,
    sind keine Bug... :-)) nur leichte flüchtigkeits Fehler.

    1. Bei der installation von Ad-Aware SE Personal wird in der info
    eine Falsche HP angegeben

    >> Homepage=http://www.emsisoft.de <<
    diese gehört zu a-squared free

    1.2 Desweiteren wird Adware 2007 installiert wozu das pllangs nicht passt.
    Auf der Hp von Lavasoft konnte ich kein plugin/Sprachpacket finden
    für Adware 2007
    Wenn ich die pllangs installiere gibts einen Extra Ordner für
    Ad-Aware SE Personal, selbst kopieren D-Lang geht nicht da
    verschiedene Dateiendungen


    2: Bei a-squared free ist die info richtig für Ad-Aware SE Personal
    also denke ich nur vertauscht.

    So, das wars eigendlich schon, also nix schlimmes ...

  • Verbot von sogenannten "Hacker-Tools"

    • Chicago
    • 30. August 2007 um 23:17

    hallo,

    nah dann sag ich mal auch was.

    Ich sitzte ja in Portugal, somit betrifft mich das Gesetz eigendlich nicht so recht ... und was spricht dagegen ... wenn ich in Portugal die Hackertool
    aus dem I-Net lade.... Jedem neee CD mit Bildern schicke... :-))

    Man kann ja auch Dateien schön in Bildern verstecken .... und man solls ja eigendlich nicht merken???? !!!! oder vieleicht doch ??

    Aber der Rolli-Man geht mir auch gege´n den strich... Hacker-Tool verbieten,
    aber selber welche programieren lassen.. Bundestrojaner ist für mich das selbe wie ein Hacktool...... Also einfach massenanzeigen ...
    Gerichtsverhandlung 4 Millionen Jahre Bratspieß ... weg die S.. :-))))

    in diesem sinne

  • IOM3 in nLite CD einbinden

    • Chicago
    • 30. August 2007 um 02:15

    Hi IOM-Fangemeinde,

    habe mal versucht die IOM 3 in eine nLite-DVD einzubinden.
    Hatte mehrer fehlversuche.... aber beim 3x gings.

    Ich habe den kompletten inhalt vom Ordner Install-O-Matic 3.0
    in den Install-Ordner kopiert. Anschließend unter [GuiRunOnce]
    wie folgt eingebunden >> %Source%Install\Start.exe <<

    Wer sich mit nLite auskennt weiß das erst Windows installiert wird und nach einem Neustart wird dann die Start.exe von IOM3 gestartet.
    Somit habe ich (Ihr) alles sofort auf CD und müsst nicht nach dem Neustart bei nacktem Windows die IOM3 selber starten.
    Nur noch die Programme anklicken und IOM sagen Installieren.

  • nero2007

    • Chicago
    • 18. August 2007 um 00:23

    ups... war schon off... sorry

  • nero2007

    • Chicago
    • 17. August 2007 um 23:57

    hallo d2po88,

    vieleicht könntest Du mal schreiben ob das problem immer noch besteht.
    Desweiteren gibts hier unter Scripte bestimmt laufende Nero Versionen
    die funzen. Ich selber installiere mein Nero immer ohne probs.

    Also wenns noch besteht melden ... ansonsten als gelöst markieren.

  • sinnvolle Tools für die IOM

    • Chicago
    • 13. August 2007 um 23:45

    Hallo,

    ich warte noch auf die Lieferung von der PC Magazin aus Deutschland.
    Also kann ich zur Zeit nicht viel sagen. Es instressiert mich natürlich
    brennend was IOM so alles kann. Werde mich dann mal intensiv
    mit beschäftigen.

  • Foto-DVD mit welchem Prog?

    • Chicago
    • 5. August 2007 um 23:57

    Hallo,

    wenn Du richtig gelesen hättest hab ich Nero 7 Premium drauf und auch probiert... Zen

    Weedhead... habe Nero update gemacht und werde es ausprobieren.
    Werde mich dann wieder melden und Berichten.

    Danke erstmal für die antworten die gekommen sind. =)

    Edit: So .... habe mir jetzt 98 draufgetan...... dann hab ich mein altes
    PhotoSuite SE 4.0 drauf gemacht und probiers hiermit....

  • Foto-DVD mit welchem Prog?

    • Chicago
    • 3. August 2007 um 18:23

    Hallo Leute,

    ich habe vor, eine Foto-DVD zu machen. Hatte ich schon mal gemacht.
    Es soll ein Autostart haben, und ein Menü, da ich 2 Ordner habe mit unterschiedlichen
    Anlässen. Habe es gestern mit Nero Premium probiert, aber er nimmt nur einen
    Ordner pro DVD. Habe kein Menü am Anfang, wo ich wählen kann, Fest1 oder Fest 2.

    Ich hatte mal ein Programm, weiß nur nicht mehr welches und wo es ist.

    Habe WinOnCD 6 probiert, nach der intallation fehlen meine DVD-Laufwerke... X(

    Wie Ihr seht .... Ihr müsst mir mal auf die sprünge helfen. Wenns mit Nero so gehen sollte,
    dann sagt mir doch bitte wie ich das anstellen kann.


    Danke schon mal


    Edit: Keine Hilfe ist auch eine Hilfe.... X( leider.... dachte hier könnte mir jemand helfen

  • CountDown

    • Chicago
    • 1. August 2007 um 01:29

    Hi Bugfix,

    hab mal intresse halber countdown geladen. Aber bei mir wurde nichts gestartet. Muss ich das irgendwo mit einbauen oder wie.
    Auch als Exe keinen erfolg gehabt.

  • USB-Stick- Legen Sie Datenträger ein??

    • Chicago
    • 24. Juli 2007 um 22:43

    hi,

    erstmal danke allen die mir helfen wollten.
    Nein Huggy, ich mag zwar große Füsse haben .... :D
    aber auf dem Tisch sind die nicht .. logisch hab ich nicht draufgestanden.

    Habe auch das Tool probiert und auch Steckplatz gewechselt..
    alles ohne erfolg... ist halt im A....h das ding ....

    War eh nichts wirklich wichtiges drauf ...
    Nochmal danke für die antworten....

  • USB-Stick- Legen Sie Datenträger ein??

    • Chicago
    • 24. Juli 2007 um 00:06

    hallo Gemeinde,

    Ich habe einen 1GB Stick. Der ging auch eigendlich immer gut, doch plötzlich wird mir gesagt:

    Legen Sie bitte einen Datenträger ein.

    Irgendwie denkt mein Rechner es wäre eine CD oder was. Bei 2 anderen habe ich keine probleme.
    Wer kann mir helfen oder ist das Ding schrott?


    Edit: Jetzt scheint er gar nicht mehr angesprochen zu werden.... Lämpchen blinkt
    nur noch mal kurz auf (1x)

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™