Put these together..

[Jussip]

delete

Edited September 27, 2008 by Jussip

[Andreik]

Include all attached files.

#Include <File>

Edited September 21, 2008 by Andreik

[James]

Erm no.

It's just copying functions from one to another and using them how you need to. You will probably need to change variables and such around if collisions occur.

[Valuater]

Not Tested....

expandcollapse popup

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Dim $file_loc = @ScriptDir & "\"

$Form1_1 = GUICreate("All-In-One", 459, 427, 204, 134, -1, BitOR($WS_EX_TOOLWINDOW, $WS_EX_WINDOWEDGE))
$Hex = GUICtrlCreateButton("Open Hex Conversion Tool", 16, 256, 193, 57, 0, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE))
$Leetspeak = GUICtrlCreateButton("Start Leetspeak", 224, 128, 193, 57, 0, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE))
$MsnChanger = GUICtrlCreateButton("Open Msn Music Changer", 16, 192, 193, 57, 0, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE))
$Freezer = GUICtrlCreateButton("Open Process Freezer", 224, 64, 193, 57, 0, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE))
$Autotalker = GUICtrlCreateButton("Open Autotalker", 16, 128, 193, 57, 0, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE))
$Winmanag = GUICtrlCreateButton("Open Windows Manager", 16, 64, 193, 57, 0, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE))
$Tooltip = GUICtrlCreateButton("Start Tooltip", 224, 192, 193, 57, 0, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE))
$Pop = GUICtrlCreateButton("Start Pop-p", 224, 256, 193, 57, 0, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE))
$Esittely = GUICtrlCreateLabel("All-In-One", 160, 20, 231, 38)
GUICtrlSetFont(-1, 20, 800, 0, "Arno Pro Smbd SmText")
GUISetState(@SW_SHOW)


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

        Case $Hex
            Just_Do_It("Hex Conversion Tool.au3") ; ??? space or underlined ?
        Case $Leetspeak
            Just_Do_It("Place name here....") ; do this to all case
        Case $MsnChanger
        Case $Freezer
        Case $Autotalker
        Case $Winmanag
        Case $Tooltip
        Case $Pop
    EndSwitch
WEnd


Func Just_Do_It($Proggy)
    If FileExists($file_loc & $Proggy) Then
        If @Compiled = 1 Then
            $file_exe = FileGetShortName(@AutoItExe & ' /AutoIt3ExecuteScript "' & $file_loc & $Proggy & '"')
            Run($file_exe)
        Else
            $file_au3 = FileGetShortName($file_loc & $Proggy)
            Run(@AutoItExe & " " & $file_au3)
        EndIf
    Else
        MsgBox(0, "ERROR", "The file was not found...    " & @CRLF & $file_loc & $Proggy & "   ", 5)
    EndIf
EndFunc   ;==>Just_Do_It

EDIT....

Added error checking for file location

8)

Edited September 21, 2008 by Valuater

[AlmarM]

You sould compile them first and then use.

Run(@ScriptDir & "\autotalker.exe")

AlmarM

[Valuater]

You sould compile them first and then use.

Run(@ScriptDir & "\autotalker.exe")

AlmarM

Actually, These exe files would be moved together to operate correctly, and with that many exe files, the program would be over-bloated with the same Autoit.exe in each one.

These au3 files can be placed into the original exe with fileInstall and deleted right after use.

If there is a higher security level problem, they can be obfuscated and or encryted. The exe file could decrypt the files internally

8)

[AlmarM]

Actually, These exe files would be moved together to operate correctly, and with that many exe files, the program would be over-bloated with the same Autoit.exe in each one.

These au3 files can be placed into the original exe with fileInstall and deleted right after use.

If there is a higher security level problem, they can be obfuscated and or encryted. The exe file could decrypt the files internally

8)

Hmmm true, didnt tought of that.

AlmarM