Beiträge von RR04

  • FileInstall

    Hallo,
    gegeben ist :
    source: Der Quellpfad der Datei, die eingebunden und kompiliert werden soll. Dieser muss ein reiner String sein; er kann keine Variable sein. Es kann ein relativer Pfad sein (man verwendet .\ oder ..\ in dem Pfad).

    dest: Der Zielpfad (mit abschließendem "Backslash", falls nur das Verzeichnis angegeben wird). Das kann eine Variable sein.

    flag: [optional] Das Flag bestimmt, ob existierende Dateien überschrieben werden sollen:
    0 = (Standard) Überschreibe bestehende Dateien nicht
    1 = Überschreibe bestehende Dateien

    [autoit]


    ; Bindet ein Bitmap mit dem Dateinamen "C:\test.bmp" in das kompilierte Script ein und legt es nach dem Starten der exe-Datei in "D:\mydir\test.bmp" ab.
    $b = True
    If $b = True Then FileInstall("C:\test.bmp", "D:\mydir\test.bmp")

    [/autoit]


    dennoch kann ich mir eine gepackte Datei mit Winrar oder 7zip gut vorstellen, Aufwand und Nutzen immer im Auge !
    Viel Erfolg ! :)

  • FileSelectFolder-Dialog das nur Datenträger anzeigt?

    Hi,
    vielleicht hilft Dir dieses weiter:

    [autoit]


    ; Beispiel aus "SiS"
    ; $cobDest ist ein "GUICtrlCreateCombo"
    Func _dest()
    Local $path = FileSelectFolder($languages[71][1], "::{00000000-1080-F9E5-6311-4162E05A6BEE}", 1)
    If Not @error Then
    GUICtrlSetData($cobDest, $path, $path)
    EndIf
    EndFunc ;==>_dest

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

    ; Ein weiteres Beispiel
    FileSelectFolder ("Wähle einen Ordner aus.", "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}", 4)
    ; Ende

    [/autoit]


    und

    Spoiler anzeigen


    CLSIDs besondere Ordner

    Sinnvoll bei der Verwendung von FileOpenDialog, FileSaveDialog oder FileSelectFolder

    Diese Liste wurde von Registry Guide for Windows at WinGuides Network
    entnommen
    Beachte: nicht alle Werte können für die oben gelisteten AutoIt Funktionen als Parameter verwendet werden.

    Beispiel: FileSelectFolder ("Wähle einen Ordner aus.", "::{00000000-1080-F9E5-6311-4162E05A6BEE}", 1)

    Ordner Wert für den "directory"-Parameter der File*-Funktionen

    Administrationsaufgaben "::{D20EA4E1-3957-11d2-A40B-0C5020524153}"
    Aktenkoffer "::{85BBD920-42A0-1069-A2E4-08002B30309D}"
    Systemsteuerung "::{21EC2020-3AEA-1069-A2DD-08002b30309d}"
    Schriften "::{D20EA4E1-3957-11d2-A40B-0C5020524152}"
    Verlauf "::{FF393560-C2A7-11CF-BFF4-444553540000}"
    Posteingang "::{00020D75-0000-0000-C000-000000000046}"
    Microsoft Netzwerk "::{00028B00-0000-0000-C000-000000000046}"
    Arbeitsplatz "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}"
    Eigene Dateien "::{450D8FBA-AD25-11D0-98A8-0800361B1103}"
    Netzwerkumgebung "::{208D2C60-3AEA-1069-A2D7-08002B30309D}"
    Netzwerkcomputer "::{1f4de370-d627-11d1-ba4f-00a0c91eedba}"
    Netzwerkverbindungen "::{7007ACC7-3202-11D1-AAD2-00805FC1270E}"
    Drucker und Faxgeräte "::{2227A280-3AEA-1069-A2DE-08002B30309D}"
    Programmordner "::{7be9d83c-a729-4d97-b5a7-1b7313c39e0a}"
    Papierkorb "::{645FF040-5081-101B-9F08-00AA002F954E}"
    Scanner und Kameras "::{E211B736-43FD-11D1-9EFB-0000F8757FCD}"
    Geplante Tasks "::{D6277990-4C6A-11CF-8D87-00AA0060F5BF}"
    Startmenüordner "::{48e7caab-b918-4e58-a94d-505519c795dc}"
    Temporäre Internetdateien "::{7BD29E00-76C1-11CF-9DD0-00A0C9034933}"
    Webordner "::{BDEADF00-C265-11d0-BCED-00A0C90AB50F}"


    Viel Erfolg ! :)

  • Koda Form Designer Großes Problem

    Hi,

    er meint, dass beim ändern der Farbe auch eine Art Styl eingerichtet wird in einer GUI.
    Bei mir ist es auch so ? ;(

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>

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

    $Form1 = GUICreate("Form1", 541, 429, 817, 118)
    $Button_1 = GUICtrlCreateButton("Notepad", 10, 30, 100)
    GUICtrlSetColor(-1, 0xff0000)
    $Button_1 = GUICtrlCreateButton("Notepad", 210, 30, 100)
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit]

  • Habe ein Problem bei Matheformeln in einer Gui

    Hi,
    wenn es Fragen gibt drücke mal in Scite "Ctrl+F5", dann gibt es Hinweise ! ;)

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>

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

    Opt('MustDeclareVars', 1)
    Example()

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

    Func Example()
    Local $Button_1, $Button_2, $msg, $Zahl, $Zahl1
    GUICreate("Flächenberechnungen")

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

    Opt("GUICoordMode", 2)
    $Button_1 = GUICtrlCreateButton("Quadrat", 10, 30, 100)
    $Button_2 = GUICtrlCreateButton("Rechteck", 0, -1)

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

    GUISetState()

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

    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    ExitLoop
    Case $msg = $Button_1
    $Zahl = InputBox("Quadratflächen-Berechnung", "Länge/Breite = a bitte angeben. Bei einem Komma bitte . Benutzen ( z.B. 3.5 )")
    MsgBox(0, "Ergebnis:", "Die Fläche des Quadrates Beträgt " & $Zahl * $Zahl & @TAB)
    Case $msg = $Button_2
    $Zahl = InputBox("Rechteckflächen-Berechnung", "Länge = a bitte angeben. Bei einem Komma bitte . Benutzen ( z.B. 3.5 )")
    $Zahl1 = InputBox("Rechteckflächen-Berechnung", "Breite = b bitte angeben. Bei einem Komma bitte . Benutzen ( z.B. 2.5 )")
    MsgBox(0, "Ergebnis:", "Die Fläche des Rechteckes Beträgt " & $Zahl * $Zahl1 & @TAB)
    EndSelect
    WEnd
    EndFunc ;==>Example
    ; Ende

    [/autoit]

  • Undecompilierbare Exe dateien..o.O

    Hi,
    Ergänzung zu Post #12, aufgrund von neuen Anfragen. :)

    Ich empfehle den Obfuscator(/striponly) aber auch diese Option gibt es noch ! ;)

    Wer den Obfuscator ohne die Möglichen Parameter einsetzt übernimmt die Standardeinstellungen (default) !

    Possible Parameters:
    /cs 0/1 : 0=No String encryption (1=default)
    /cn 0/1 : 0=No Numeric encryption (1=default)
    /cf 0/1 : 0=No Func rename (1=default)
    /cv 0/1 : 0=No Var rename (1=default)
    /sf 0/1 : 1=Strip all unused Func's (0=default)
    /sv 0/1 : 1=Strip all unused Global var records (0=default)
    /striponly: same as /cs=0 /cn=0 /cf=0 /cv=0 /sf=1 /sv=1
    /sci 0 : Default Minimal output to the console: warning and errors.
    /sci 1 : Show more progress information.
    /sci 9 : Show all debug lines as found in the Obfuscator.log.
    /Beta : Use Beta Includes. Dont use AutoIt3Wrapper_Run_Obfuscator.

    To strip the source, which is included in the ouput EXE from all Comments, Whitespace and All un-used Func's (also included UDF's), you just specify :
    /striponly

    Edit:
    Siehe Beispiele Post #12
    SfB_v1.9.00_Obfuscated.au3 >> Obfuscator(/striponly)
    SfB_v1.9.00a_Obfuscated.au3 >> Obfuscator(ohne Parameter)

    Viel Erfolg ! :thumbup:

  • Variablen suchen

    Hi,

    zum einen empfehle ich den Obfuscator(/striponly) aber auch diese Option gibt es noch ! ;)

    AutoItSetOption "MustDeclareVars"

    Als Alternative zu AutoItSetOption() kann auch Opt() verwendet werden.

    AutoIt wird mit einer Fehlernachricht stoppen, wenn die angeforderte Option unbekannt ist.
    Folgende Optionen sind vorhanden:

    Wenn diese Option genutzt wird müssen alle Variablen deklariert werden mit Dim, Local oder Global bevor sie verwendet werden können - beseitigt die Möglichkeit von Bugs durch Schreibfehler in Variablen.
    1 = Variable muss deklariert werden
    0 = Variable muss nicht deklariert werden (Standard)

    Das Autoit SyntaxCheckProd läuft das nicht sowieso vor dem compilen durch ?