Beiträge von sc4ry

sc4ry

Hallo,

ich suche den regeintrag, wo man kontextmenü-einträge zu laufwerken und generell (ohne dateien oder ordner markiert zu haben) erstellen kann...

habe bis jetzt nur für ordner und alle dateitypen finden können...

RegWrite("HKCR\Directory\shell\DFrag All", "", "Reg_SZ", "DFrag All")
RegWrite("HKCR\Directory\shell\DFrag All\command", "", "Reg_SZ", @AutoItExe & " All")

RegWrite("HKCR\*\shell\DFrag All", "", "Reg_SZ", "DFrag All")
RegWrite("HKCR\*\shell\DFrag All\command", "", "Reg_SZ", @AutoItExe & " All")

sc4ry

Hallo,

ich arbeite an einem neuen scriptchen, dass den windows key auslesen soll.
alle vorarbeiten habe ich abgeschlossen, jedoch habe ich noch das ein oder andere prob.

Prob 1:
ich habe über das ganze GUI ein bild gelegt. darüber die inputboxen und buttons, die auch alle sichtbar sind, jedoch funktionieren die buttons nicht (da das bild anscheinend darüber liegt). wie kann ich es machen, dass ich die buttons doch nutzen kann?

Prob 2:
da ich prob 1 nicht lösen konnte, habe ich das script ein wenig modifiziert, dass ich 3 verschiedene versionen aufrufen kann (flag 0, 1 und 2).
möglichkeit 0 soll die finale version sein, wo die buttons aber zZ nicht funktionieren, die tastenkombo geht jedoch)
möglichkeit 1 wird ohne bild gestartet, buttons und tastenkombo funktionieren.
möglichkeit 2 zeit das bild an, versteckt aber die buttons und zeigt dafür ein menü an. tastenkombo geht, aber das menü leider nicht. ich kann auch zZ keinen fehler mehr finden ... kann mal wer drüber gucken?

Prob 3:
der key liegt natürlich verschlüssel in der reg vor ... ich habe ein programm ausfindig machen können, was wie mein tool, den key ausliest, entschlüsselt und anzeigt. jedoch ist es in c/c++ oder c# geschrieben ... leider fühle ich mich nicht in der lage, den code auf autoit umzuschreiben, da ich in den sprachen leider null peil habe. wüsste jmd wie man das an autoit, in mein script, anpassen kann?

Spoiler anzeigen

C#

using System;
using System.Collections;
using Microsoft.Win32;


namespace WindowsApplication1
{
    class MSKeyDecrypt
    {


        // Enumeration for comfortable use the function GetKey
        public enum Product
        { 
            XP, 
            Office10, 
            Office11 
        };


        // dirty registry trails/keys ... 
        private static string XP = @"SOFTWARE\Microsoft\Windows NT\CurrentVersion";
        private static string Office10 = @"SOFTWARE\Microsoft\Windows NT\CurrentVersion";
        private static string Office11 = @"SOFTWARE\Microsoft\Windows NT\CurrentVersion";
        private static string RegKey = "DigitalProductId";


        
        public static string GetKey(Product product) 
        {


            byte[] byteProductId = null;
 
            switch (product) {
                case Product.XP:
                    byteProductId = MyReg.readRegistry2(XP, RegKey);
                break;
                case Product.Office10:
                    byteProductId = MyReg.readRegistry2(Office10, RegKey);
                break;
                case Product.Office11:
                    byteProductId = MyReg.readRegistry2(Office11, RegKey);
                break;
            }


            return DecodeProductKey(byteProductId);
        }




        private static string DecodeProductKey(byte[] digitalProductId)
        {
            // Offset of first byte of encoded product key in 
            //  'DigitalProductIdxxx" REG_BINARY value. Offset = 34H.
            const int keyStartIndex = 52;
            // Offset of last byte of encoded product key in 
            //  'DigitalProductIdxxx" REG_BINARY value. Offset = 43H.
            const int keyEndIndex = keyStartIndex + 15;


            // alpha numeric characters that happen into product key
            char[] digits = new char[]
            {
                'B', 'C', 'D', 'F', 'G', 'H', 'J', 'K', 'M', 'P', 'Q', 'R', 
                'T', 'V', 'W', 'X', 'Y', '2', '3', '4', '6', '7', '8', '9',
            };


            // Length of decoded product key
            const int decodeLength = 29;


            // Length of decoded product key in byte-form.
            // Each byte represents 2 chars.
            const int decodeStringLength = 15;


            // Array of containing the decoded product key.
            char[] decodedChars = new char[decodeLength];


            // Extract byte 52 to 67 inclusive.
            ArrayList hexPid = new ArrayList();





            for (int i = keyStartIndex; i <= keyEndIndex; i++)
            {
                hexPid.Add(digitalProductId[i]);
            }


            for (int i = decodeLength - 1; i >= 0; i--)
            {
                // Every sixth char is a separator.
                if ((i + 1) % 6 == 0)
                {
                    decodedChars[i] = '-';
                }
                else
                {
                    // Do the actual decoding.
                    int digitMapIndex = 0;
                    for (int j = decodeStringLength - 1; j >= 0; j--)
                    {
                        int byteValue = (digitMapIndex << 8) | (byte)hexPid[j];
                        hexPid[j] = (byte)(byteValue / 24);
                        digitMapIndex = byteValue % 24;
                        decodedChars[i] = digits[digitMapIndex];
                    }
                }
            }




            return new string(decodedChars);
        }




    }
}

Alles anzeigen

und hier ist das script

Spoiler anzeigen

[autoit]

;
; WinGetKey
;
; © sc4ry

#include <guiconstants.au3>
#include <string.au3>

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

Opt("TrayMenuMode",1)
TraySetToolTip("sc4ry´s " & @ScriptName & @CRLF & @UserName & " \\ " & @ComputerName & @CRLF & @OSVersion & " " & @OSServicePack & " \\ " & @OSBuild & @CRLF & @IPAddress1)

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

$flag = 2
Global $menu, $copyid, $copykey

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

$ID = RegRead("HKLM\Software\Microsoft\Windows NT\CurrentVersion", "ProductId")
$Key = RegRead("HKLM\Software\Microsoft\Windows NT\CurrentVersion", "DigitalProductId")

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

If $flag = 0 Then GUICreate("WinGetKey", 300, 120, -1, -1, $WS_POPUP + $WS_DLGFRAME, $WS_EX_TOPMOST) ;normal(bild + buttons, kein menu)
If $flag = 1 Then GUICreate("WinGetKey", 300, 120, -1, -1, $WS_POPUP + $WS_DLGFRAME, $WS_EX_TOPMOST) ;picless(ohne bild + menu, mit buttons)
If $flag = 2 Then GUICreate("WinGetKey", 260, 140, -1, -1, $WS_POPUP + $WS_DLGFRAME, $WS_EX_TOPMOST) ;buttonless (mit bild + menu, ohne buttons)

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

If $flag <> 1 Then GUICtrlCreatePic("C:\Dokumente und Einstellungen\Administrator\Lokale Einstellungen\Anwendungsdaten\Microsoft\Wallpaper1.bmp", 0, 0, 370, 190)
If $flag = 2 Then $menu = GUICtrlCreateMenu("copy...")
If $flag = 2 Then $copyid = GUICtrlCreateMenuItem("ID (ALT+I)", $menu)
If $flag = 2 Then $copykey = GUICtrlCreateMenuItem("Key (ALT+K)", $menu)
$copyid = GUICtrlCreateButton("copy &ID", 245, 30, 50, 20)
If $flag = 2 Then GUICtrlSetState($copyid, $gui_hide)
$copykey = GUICtrlCreateButton("copy &Key", 245, 80, 50, 20)
If $flag = 2 Then GUICtrlSetState($copykey, $gui_hide)
GUICtrlCreateLabel("Product ID", 10, 10, 53, 15)
GUICtrlCreateLabel("Product Key", 10, 60, 60, 15)
$IID = GUICtrlCreateInput("", 10, 30, 230, 20, $ES_READONLY)
GUICtrlSetData($IID, $ID)
$IKey = GUICtrlCreateInput("", 10, 80, 230, 20, $ES_READONLY)
GUICtrlSetData($IKey, $Key)

GUISetState(@sw_show)

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

While 1
$msg = GUIGetMsg()
Select
case $msg = $gui_event_close
Exit
case $msg = $copyid
ClipPut("")
ClipPut(guictrlread($IID))
case $msg = $copykey
ClipPut("")
ClipPut(guictrlread($IKey))
EndSelect
WEnd

[/autoit]

sc4ry

http://de.wikipedia.org/wiki/Nfo

natürlich wird es in der warez-scene benutzt, aber davon ist es noch lange nicht illegal (genau wie filesharing), aber wer das natürlich von anfang an damit in verbidung bringt, leidet ein bisschen unter vervolgungswahn =)

also in der nfo sind normal alle wichtigen merkmale zu etwas zusammengefasst. das ist der eigentliche sinn davon. dass man diese schön gestaltet und nach und nach immer aufwendigere bildchen enthalten sind, ist was anders.

aber hiermit kann man auch gut einen schriftlichen, ersten eindruch in ein programm verschaffen =)

sc4ry

danke für die tips, werd es morgen probieren.
aber es steht wirklich nix in der leerzeile (da ich sie selber schreiben = @CRLF)

von daher kann ich die ausnahmen ignorieren *g*

bin dann mal zuversichtlich =)

sc4ry

ich kann leider nicht sagen, wie ich auf scary gekommen bin, aber es kommt aus meinen alten RtcW tagen.
das ganze hat sich dann immer so fortgeführt, bis ich dann mal im irc war. und wie es kommen musste, war der nick schon vergeben,also hab ich aus dem a eine 4 gemacht =)
aber es gibt noch andere abwandlungen von meinem nick, je nachdem wieviele bereits vergeben sind.

tauche allerdings auch mal unter dem namen eines leckeren bieres auf, aber scary war mein erster aller nicks, und ich trage ihn immernoch =)

sc4ry

hallo,

kann man leere zeilen aus einer txt löschen lassen? also können bestimmt, aber wie?

sc4ry

*hehe*

ja, wie bereits geschrieben, die nfo hat mich vllt 5 min meines lebens gekostet. wollte erstmal "irgendwas" da reinhauen und das restliche programm funktionstüchtig machen.

gucken ob ich in der lage bin, ne anständige nfo zu entwerfen, aber nen schönheitswettbewerb soll das ganze eh nicht werden.

wenn das jmd kann und eine basteln will, bin ich auch happy =)
nur klauen wollte ich keine ...

sc4ry

probier mal mit FileFindFirstFile & FileFindNextFile ....
geht eine datei nach der anderen durch, dann kannste FileGetSize machen,die größe vergleichen und die datei löschen bzw wieder von vorne beginnen...

[autoit]

$search = FileFindFirstFile($FileType)
;Fehlermeldung, falls keine Übereinstimmung
If $search = -1 Then
MsgBox(16, "Error", "No files/directories matched the search pattern")
Exit
EndIf

;suche weiter
While 1
$file = FileFindNextFile($search)
If @error Then ExitLoop

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

auszug aus nem alten script von mir

sc4ry

Hello again,

jmd brachte mich vor 2 tagen auf die idee, mal ein tool zu schreiben, mit dem es einfach ist, ein nfo zu erstellen, und das recht schnell.
also habe ich mich mal drangesetzt und dies hier entwickelt.

könnt mir vorstellen das jmd lachen wird, wenn er sieht, wie ich im script selber die nfo erstelle, aber es klappt =P

jedoch bin ich für verbesserungsvorschläge offen (und besonders, wenn jmd eine nfo zur freien verfügung stellen will). also die nfo ist immer die gleiche, welche ich auch gestern in 5 min erstellt habe.

schauts euch mal an, hoffe ich habe alle bugs gefunden und behoben

schade, die datei selber ist zu groß, dann eben nur das vorgesehene icon

Spoiler anzeigen

[autoit]

;
; NFastO
;
;by sc4ry

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

#include <guiconstants.au3>
#include <date.au3>

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

$maingui = GUICreate("NFastO", 800, 400)
$build = GUICtrlCreateButton("&Build", 710, 5, 80)
$save = GUICtrlCreateButton("&save", 725, 60, 50, 20)
$openbutton = GUICtrlCreateButton("&open", 725, 80, 50, 20)
$exit = GUICtrlCreateButton("&Exit", 710, 135, 80)

GUICtrlCreateGroup("general Release Infos", 10, 0, 460, 100)
GUICtrlCreateLabel("Release", 20, 23)
$rel = GUICtrlCreateInput("", 70, 20, 230, 20)
GUICtrlCreateLabel("Type", 320, 23)
$type = GUICtrlCreateCombo("", 360, 20, 100, 20)
GUICtrlSetData(-1, "Software|Movie|Game|Music|Else", "Software")
GUICtrlCreateLabel("Date", 20, 50)
$today = GUICtrlCreateInput(_NowCalcDate(), 20, 70, 70)
GUICtrlCreateLabel("Language", 110, 50)
$lang = GUICtrlCreateInput("", 110, 70, 170)
GUICtrlCreateLabel("Size (MB)", 300, 50)
$size = GUICtrlCreateInput("", 300, 70, 90)
$search = GUICtrlCreateButton("from File", 400, 68, 60)

GUICtrlCreateGroup("Group Infos", 480, 0, 220, 100)
GUICtrlCreateLabel("Group", 490, 20)
$group = GUICtrlCreateInput("", 490, 35, 200, 20)
$authlabel = GUICtrlCreateLabel("Author", 490, 60)
$author = GUICtrlCreateInput("", 490, 75, 200, 20)

GUICtrlCreateGroup("further Infos", 10, 100, 690, 60)
$label1 = GUICtrlCreateLabel("Version", 20, 120, 100, 20)
$input1 = GUICtrlCreateInput("", 100, 118, 100, 18)
$label2 = GUICtrlCreateLabel("OS", 20, 140, 100, 15)
$input2 = GUICtrlCreateInput("", 100, 138, 100, 18)
$label3 = GUICtrlCreateLabel("", 270, 120, 100, 20)
GUICtrlSetState(-1, $GUI_HIDE)
$input3 = GUICtrlCreateInput("", 350, 118, 100, 18)
GUICtrlSetState(-1, $GUI_HIDE)
$label4 = GUICtrlCreateLabel("", 270, 140, 100, 15)
GUICtrlSetState(-1, $GUI_HIDE)
$input4 = GUICtrlCreateInput("", 350, 138, 100, 18)
GUICtrlSetState(-1, $GUI_HIDE)
$label5 = GUICtrlCreateLabel("", 520, 120, 80, 20)
GUICtrlSetState(-1, $GUI_HIDE)
$input5 = GUICtrlCreateInput("", 580, 118, 100, 18)
GUICtrlSetState(-1, $GUI_HIDE)
$label6 = GUICtrlCreateLabel("", 520, 140, 80, 15)
GUICtrlSetState(-1, $GUI_HIDE)
$input6 = GUICtrlCreateInput("", 580, 138, 100, 18)
GUICtrlSetState(-1, $GUI_HIDE)

GUICtrlCreateGroup("Description", 10, 160, 390, 230)
$desc = GUICtrlCreateEdit("", 30, 180, 350, 200)
GUICtrlSetData($desc, @CRLF & @CRLF & "Install Notes:" & @CRLF & @CRLF & "1) " & @CRLF & "2) ")

GUICtrlCreateGroup("Notes", 410, 160, 380, 230)
$notes = GUICtrlCreateEdit("Website: " & @CRLF & @CRLF & "Mail: " & @CRLF & @CRLF & "IRC: " & @CRLF & @CRLF & "We are looking for: "& @CRLF & @CRLF & "Group-Info: "& @CRLF & @CRLF & "Greetings: ", 430, 180, 350, 200)

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

GUISetState(@SW_SHOW, $maingui)

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

While 1
$msg = GUIGetMsg()
Select
case $msg = $type
$switch = GUICtrlRead($type)
Switch $switch
case "Software"
GUICtrlSetData($authlabel, "Author")
GUICtrlSetData($label1, "Version")
GUICtrlSetData($label2, "OS")
GUICtrlSetData($label3, "")
GUICtrlSetData($label4, "")
GUICtrlSetData($label5, "")
GUICtrlSetData($label6, "")
GUICtrlSetState($label1, $GUI_SHOW)
GUICtrlSetState($label2, $GUI_SHOW)
GUICtrlSetState($label3, $GUI_HIDE)
GUICtrlSetState($label4, $GUI_HIDE)
GUICtrlSetState($label5, $GUI_HIDE)
GUICtrlSetState($label6, $GUI_HIDE)
GUICtrlSetData($input1, "")
GUICtrlSetData($input2, "")
GUICtrlSetData($input3, "")
GUICtrlSetData($input4, "")
GUICtrlSetData($input5, "")
GUICtrlSetData($input6, "")
GUICtrlSetState($input1, $GUI_SHOW)
GUICtrlSetState($input2, $GUI_SHOW)
GUICtrlSetState($input3, $GUI_HIDE)
GUICtrlSetState($input4, $GUI_HIDE)
GUICtrlSetState($input5, $GUI_HIDE)
GUICtrlSetState($input6, $GUI_HIDE)
GUICtrlSetData($desc, @CRLF & @CRLF & "Install Notes:" & @CRLF & @CRLF & "1) " & @CRLF & "2) ")
case "Movie"
GUICtrlSetData($authlabel, "Ripper")
GUICtrlSetData($label1, "V-Codec")
GUICtrlSetData($label2, "A-Codec")
GUICtrlSetData($label3, "V-Bitrate")
GUICtrlSetData($label4, "A-Bitrate")
GUICtrlSetData($label5, "Runtime")
GUICtrlSetData($label6, "Genre")
GUICtrlSetState($label1, $GUI_SHOW)
GUICtrlSetState($label2, $GUI_SHOW)
GUICtrlSetState($label3, $GUI_SHOW)
GUICtrlSetState($label4, $GUI_SHOW)
GUICtrlSetState($label5, $GUI_SHOW)
GUICtrlSetState($label6, $GUI_SHOW)
GUICtrlSetData($input1, "")
GUICtrlSetData($input2, "")
GUICtrlSetData($input3, "")
GUICtrlSetData($input4, "")
GUICtrlSetData($input5, "")
GUICtrlSetData($input6, "")
GUICtrlSetState($input1, $GUI_SHOW)
GUICtrlSetState($input2, $GUI_SHOW)
GUICtrlSetState($input3, $GUI_SHOW)
GUICtrlSetState($input4, $GUI_SHOW)
GUICtrlSetState($input5, $GUI_SHOW)
GUICtrlSetState($input6, $GUI_SHOW)
GUICtrlSetData($desc, @CRLF & @CRLF & "IMDB: ")
case "Game"
GUICtrlSetData($authlabel, "Cracker")
GUICtrlSetData($label1, "Secure")
GUICtrlSetData($label2, "Genre")
GUICtrlSetData($label3, "Serial")
GUICtrlSetData($label4, "")
GUICtrlSetData($label5, "")
GUICtrlSetData($label6, "")
GUICtrlSetState($label1, $GUI_SHOW)
GUICtrlSetState($label2, $GUI_SHOW)
GUICtrlSetState($label3, $GUI_SHOW)
GUICtrlSetState($label4, $GUI_HIDE)
GUICtrlSetState($label5, $GUI_HIDE)
GUICtrlSetState($label6, $GUI_HIDE)
GUICtrlSetData($input1, "")
GUICtrlSetData($input2, "")
GUICtrlSetData($input3, "")
GUICtrlSetData($input4, "")
GUICtrlSetData($input5, "")
GUICtrlSetData($input6, "")
GUICtrlSetState($input1, $GUI_SHOW)
GUICtrlSetState($input2, $GUI_SHOW)
GUICtrlSetState($input3, $GUI_SHOW)
GUICtrlSetState($input4, $GUI_HIDE)
GUICtrlSetState($input5, $GUI_HIDE)
GUICtrlSetState($input6, $GUI_HIDE)
GUICtrlSetData($desc, @CRLF & @CRLF & "Install Notes:" & @CRLF & @CRLF & "1) " & @CRLF & "2) ")
case "Music"
GUICtrlSetData($authlabel, "Ripper")
GUICtrlSetData($label1, "Genre")
GUICtrlSetData($label2, "Codec")
GUICtrlSetData($label3, "Songs")
GUICtrlSetData($label4, "Bitrate")
GUICtrlSetData($label5, "")
GUICtrlSetData($label6, "")
GUICtrlSetState($label1, $GUI_SHOW)
GUICtrlSetState($label2, $GUI_SHOW)
GUICtrlSetState($label3, $GUI_SHOW)
GUICtrlSetState($label4, $GUI_SHOW)
GUICtrlSetState($label5, $GUI_HIDE)
GUICtrlSetState($label6, $GUI_HIDE)
GUICtrlSetData($input1, "")
GUICtrlSetData($input2, "")
GUICtrlSetData($input3, "")
GUICtrlSetData($input4, "")
GUICtrlSetData($input5, "")
GUICtrlSetData($input6, "")
GUICtrlSetState($input1, $GUI_SHOW)
GUICtrlSetState($input2, $GUI_SHOW)
GUICtrlSetState($input3, $GUI_SHOW)
GUICtrlSetState($input4, $GUI_SHOW)
GUICtrlSetState($input5, $GUI_HIDE)
GUICtrlSetState($input6, $GUI_HIDE)
GUICtrlSetData($desc, "")
case "Else"
GUICtrlSetData($authlabel, "Author")
GUICtrlSetState($label1, $GUI_HIDE)
GUICtrlSetState($label2, $GUI_HIDE)
GUICtrlSetState($label3, $GUI_HIDE)
GUICtrlSetState($label4, $GUI_HIDE)
GUICtrlSetState($label5, $GUI_HIDE)
GUICtrlSetState($label6, $GUI_HIDE)
GUICtrlSetState($input1, $GUI_SHOW)
GUICtrlSetData($input1, "")
GUICtrlSetState($input2, $GUI_SHOW)
GUICtrlSetData($input2, "")
GUICtrlSetState($input3, $GUI_SHOW)
GUICtrlSetData($input3, "")
GUICtrlSetState($input4, $GUI_SHOW)
GUICtrlSetData($input4, "")
GUICtrlSetState($input5, $GUI_SHOW)
GUICtrlSetData($input5, "")
GUICtrlSetState($input6, $GUI_SHOW)
GUICtrlSetData($input6, "")
GUICtrlSetData($desc, "")
EndSwitch
case $msg = $gui_event_close
Exit
case $msg = $exit
Exit
case $msg = $save
$ini = @scriptdir & "\savings\" & GUICtrlRead($rel) & ".ini"
DirCreate(@scriptdir & "\savings")
IniWrite($ini, "Settings", "Release", GUICtrlRead($rel))
IniWrite($ini, "Settings", "Type", GUICtrlRead($type))
IniWrite($ini, "Settings", "Date", GUICtrlRead($today))
IniWrite($ini, "Settings", "Language", GUICtrlRead($lang))
IniWrite($ini, "Settings", "Size", GUICtrlRead($size))
IniWrite($ini, "Settings", "Group", GUICtrlRead($group))
IniWrite($ini, "Settings", "Author", GUICtrlRead($author))
IniWrite($ini, "Settings", "Description", StringReplace(GUICtrlRead($desc), @CRLF, "[CRLF]"))
IniWrite($ini, "Settings", "Notes", StringReplace(GUICtrlRead($notes), @CRLF, "[CRLF]"))
IniWrite($ini, "Settings", "Input1", GUICtrlRead($input1))
IniWrite($ini, "Settings", "Input2", GUICtrlRead($input2))
IniWrite($ini, "Settings", "Input3", GUICtrlRead($input3))
IniWrite($ini, "Settings", "Input4", GUICtrlRead($input4))
IniWrite($ini, "Settings", "Input5", GUICtrlRead($input5))
IniWrite($ini, "Settings", "Input6", GUICtrlRead($input6))
MsgBox(64, "Settings saved", GUICtrlRead($rel) & ".ini in \savings", 3)
case $msg = $openbutton
$openfile = FileOpenDialog("Open existing NFO", @scriptdir & "\savings", "All (*.*)")
If @error Then
Else
$open = IniReadSection($openfile, "Settings")
If $open[2][1] = "Software" Then
GUICtrlSetData($authlabel, "Author")
GUICtrlSetData($label1, "Version")
GUICtrlSetData($label2, "OS")
GUICtrlSetState($label1, $GUI_SHOW)
GUICtrlSetState($label2, $GUI_SHOW)
GUICtrlSetState($label3, $GUI_HIDE)
GUICtrlSetState($label4, $GUI_HIDE)
GUICtrlSetState($label5, $GUI_HIDE)
GUICtrlSetState($label6, $GUI_HIDE)
GUICtrlSetState($input1, $GUI_SHOW)
GUICtrlSetState($input2, $GUI_SHOW)
GUICtrlSetState($input3, $GUI_HIDE)
GUICtrlSetState($input4, $GUI_HIDE)
GUICtrlSetState($input5, $GUI_HIDE)
GUICtrlSetState($input6, $GUI_HIDE)
ElseIf $open[2][1] = "Movie" Then
GUICtrlSetData($authlabel, "Ripper")
GUICtrlSetData($label1, "Video Codec")
GUICtrlSetData($label2, "Audio Codec")
GUICtrlSetData($label3, "Video Bitrate")
GUICtrlSetData($label4, "Audio Bitrate")
GUICtrlSetData($label5, "Runtime")
GUICtrlSetData($label6, "Genre")
GUICtrlSetState($label1, $GUI_SHOW)
GUICtrlSetState($label2, $GUI_SHOW)
GUICtrlSetState($label3, $GUI_SHOW)
GUICtrlSetState($label4, $GUI_SHOW)
GUICtrlSetState($label5, $GUI_SHOW)
GUICtrlSetState($label6, $GUI_SHOW)
GUICtrlSetState($input1, $GUI_SHOW)
GUICtrlSetState($input2, $GUI_SHOW)
GUICtrlSetState($input3, $GUI_SHOW)
GUICtrlSetState($input4, $GUI_SHOW)
GUICtrlSetState($input5, $GUI_SHOW)
GUICtrlSetState($input6, $GUI_SHOW)
ElseIf $open[2][1] = "Game" Then
GUICtrlSetData($authlabel, "Cracker")
GUICtrlSetData($label1, "Protection")
GUICtrlSetData($label2, "Gametype")
GUICtrlSetData($label3, "Serial")
GUICtrlSetState($label1, $GUI_SHOW)
GUICtrlSetState($label2, $GUI_SHOW)
GUICtrlSetState($label3, $GUI_SHOW)
GUICtrlSetState($label4, $GUI_HIDE)
GUICtrlSetState($label5, $GUI_HIDE)
GUICtrlSetState($label6, $GUI_HIDE)
GUICtrlSetState($input1, $GUI_SHOW)
GUICtrlSetState($input2, $GUI_SHOW)
GUICtrlSetState($input3, $GUI_SHOW)
GUICtrlSetState($input4, $GUI_HIDE)
GUICtrlSetState($input5, $GUI_HIDE)
GUICtrlSetState($input6, $GUI_HIDE)
ElseIf $open[2][1] = "Music" Then
GUICtrlSetData($authlabel, "Ripper")
GUICtrlSetData($label1, "Genre")
GUICtrlSetData($label2, "Audio Codec")
GUICtrlSetData($label3, "Songs")
GUICtrlSetData($label4, "Audio Bitrate")
GUICtrlSetState($label1, $GUI_SHOW)
GUICtrlSetState($label2, $GUI_SHOW)
GUICtrlSetState($label3, $GUI_SHOW)
GUICtrlSetState($label4, $GUI_SHOW)
GUICtrlSetState($label5, $GUI_HIDE)
GUICtrlSetState($label6, $GUI_HIDE)
GUICtrlSetState($input1, $GUI_SHOW)
GUICtrlSetState($input2, $GUI_SHOW)
GUICtrlSetState($input3, $GUI_SHOW)
GUICtrlSetState($input4, $GUI_SHOW)
GUICtrlSetState($input5, $GUI_HIDE)
GUICtrlSetState($input6, $GUI_HIDE)
ElseIf $open[2][1] = "Else" Then
GUICtrlSetData($authlabel, "Author")
GUICtrlSetState($label1, $GUI_HIDE)
GUICtrlSetState($label2, $GUI_HIDE)
GUICtrlSetState($label3, $GUI_HIDE)
GUICtrlSetState($label4, $GUI_HIDE)
GUICtrlSetState($label5, $GUI_HIDE)
GUICtrlSetState($label6, $GUI_HIDE)
GUICtrlSetState($input1, $GUI_SHOW)
GUICtrlSetState($input2, $GUI_SHOW)
GUICtrlSetState($input3, $GUI_SHOW)
GUICtrlSetState($input4, $GUI_SHOW)
GUICtrlSetState($input5, $GUI_SHOW)
GUICtrlSetState($input6, $GUI_SHOW)
EndIf
GUICtrlSetData($rel, $open[1][1])
GUICtrlSetData($type, $open[2][1])
GUICtrlSetData($today, $open[3][1])
GUICtrlSetData($lang, $open[4][1])
GUICtrlSetData($size, $open[5][1])
GUICtrlSetData($group, $open[6][1])
GUICtrlSetData($author, $open[7][1])
GUICtrlSetData($desc, StringReplace($open[8][1], "[CRLF]", @CRLF))
GUICtrlSetData($notes, StringReplace($open[9][1], "[CRLF]", @CRLF))
GUICtrlSetData($input1, $open[10][1])
GUICtrlSetData($input2, $open[11][1])
GUICtrlSetData($input3, $open[12][1])
GUICtrlSetData($input4, $open[13][1])
GUICtrlSetData($input5, $open[14][1])
GUICtrlSetData($input6, $open[15][1])
EndIf
case $msg = $search
$filesize = FileGetSize(FileOpenDialog("Search for your file", -1, "All (*.*)" , 1))
GUICtrlSetData($size, Round($filesize / 1024 / 1024, 2))
case $msg = $build
$nfo = FileOpen(FileSaveDialog("Save your NFO", "", "All (*.*)", 2, GUICtrlRead($rel) & ".nfo"), 1)
If $nfo = -1 Then
Else
FileWrite($nfo, "¤¤¤¤ " & GUICtrlRead($group) & @CRLF)
FileWrite($nfo, " ¤¤¤¤¤" & @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, " ~p.r.o.u.d.l.y~ ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, " ~p.r.e.s.e.n.t.s~ ¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, "¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, "¤¤¤¤" & @CRLF)
FileWrite($nfo, "¤¤¤¤¤ " & GUICtrlRead($rel) & @CRLF)
FileWrite($nfo, "¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, "¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, "¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, @CRLF)
If GUICtrlRead($type) <> "" Then
FileWrite($nfo, " Type: " & GUICtrlRead($type) & @CRLF)
Else
EndIf
If GUICtrlRead($author) <> "" Then
FileWrite($nfo, " Author: " & GUICtrlRead($author) & @CRLF)
Else
EndIf
If GUICtrlRead($today) <> "" Then
FileWrite($nfo, " date: " & GUICtrlRead($today) & @CRLF)
Else
EndIf
If GUICtrlRead($lang) <> "" Then
FileWrite($nfo, " language: " & GUICtrlRead($lang) & @CRLF)
Else
EndIf
If GUICtrlRead($size) <> "" Then
FileWrite($nfo, " size: " & GUICtrlRead($size) & " MB" & @CRLF)
Else
EndIf
If GUICtrlRead($input1) <> "" Then
FileWrite($nfo, " " & GUICtrlRead($label1) & ": " & GUICtrlRead($input1) & @CRLF)
Else
EndIf
If GUICtrlRead($input2) <> "" Then
FileWrite($nfo, " " & GUICtrlRead($label2) & ": " & GUICtrlRead($input2) & @CRLF)
Else
EndIf
If GUICtrlRead($input3) <> "" Then
FileWrite($nfo, " " & GUICtrlRead($label3) & ": " & GUICtrlRead($input3) & @CRLF)
Else
EndIf
If GUICtrlRead($input4) <> "" Then
FileWrite($nfo, " " & GUICtrlRead($label4) & ": " & GUICtrlRead($input4) & @CRLF)
Else
EndIf
If GUICtrlRead($input5) <> "" Then
FileWrite($nfo, " " & GUICtrlRead($label5) & ": " & GUICtrlRead($input5) & @CRLF)
Else
EndIf
If GUICtrlRead($input6) <> "" Then
FileWrite($nfo, " " & GUICtrlRead($label6) & ": " & GUICtrlRead($input6) & @CRLF)
Else
EndIf
FileWrite($nfo, @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, "¤¤¤¤¤¤ ~description~ ¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, @CRLF)
If GUICtrlRead($desc) <> "" Then
FileWrite($nfo, GUICtrlRead($desc) & @CRLF)
Else
FileWrite($nfo, @CRLF)
EndIf
FileWrite($nfo, @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤ ¤¤¤¤" & @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, "¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, "¤¤¤¤¤¤ ~notes~ ¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, @CRLF)
If GUICtrlRead($notes) <> "" Then
FileWrite($nfo, GUICtrlRead($notes) & @CRLF)
Else
FileWrite($nfo, @CRLF)
EndIf
FileWrite($nfo, @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤ ¤¤¤¤" & @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, "¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, " ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, "¤¤¤¤¤¤created¤with¤¤¤¤¤¤¤¤¤¤¤¤¤¤ NFastO" & @CRLF)
FileWrite($nfo, "¤¤¤¤¤¤¤¤¤¤¤¤¤by¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, "¤¤¤¤¤¤¤¤¤¤¤¤¤¤s¤c¤4¤r¤y¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileWrite($nfo, "¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤" & @CRLF)
FileClose($nfo)
MsgBox(64, "NFO saved", GUICtrlRead($rel) & ".nfo", 3)
EndIf
EndSelect
WEnd

[/autoit]

sc4ry

$folder = fileopendialog(...)

iniwrite(@scriptdir & "\test.ini", "Section", "key", $folder)

das müsste gehen.
wie sieht deins denn aus?

sc4ry

dann ist wingettext doch genau das richtige für dich. der liest dir den text ja, unter angabe des fenster-titels, aus.

und mit StringRegExp sollteste dann deinen Teil rausschneiden können

sc4ry

hmm, leider komme ich dann auch nicht richtig weiter ... der fehler ist zwar behoben, aber es folgen weitere

bin jetzt soweit ... also laut theorie, praktisch lässt es sich leider noch nicht testen

Spoiler anzeigen

[autoit]

#include <Systray_UDF.au3>
#Include <Constants.au3>
#include <array.au3>

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

Opt("TrayMenuMode",1)
HotKeySet("^!L", "TrayIcon")

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

_getWindows()
_getTrayIcons()

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

TraySetState()
While 1
$msg = TrayGetMsg()
Select
Case $msg = 0
ContinueLoop
Case $msg = $Win[$i]
_SysTrayIconVisible( Not _SysTrayIconVisible("Default", _SysTrayIconIndex($Win[$i][1])))
TrayItemSetState( $Win[$i][1], $TRAY_CHECKED)
ContinueLoop
Case $msg = $Tray[$i]
_SysTrayIconVisible( Not _SysTrayIconVisible("Default", _SysTrayIconIndex($Tray[$i][1])))
TrayItemSetState( $Tray[$i][1], $TRAY_CHECKED)
ContinueLoop
Case $msg = $trayexit
Exit
EndSelect
WEnd

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

;Functions

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

;get windows
Func _getWindows()
TrayCreateItem("Windows:")
$WinTitles = WinList()
For $i = 1 to $WinTitles[0][0]
$Win[$i] = TrayCreateItem($WinTitles[$i][1])
Next
EndFunc

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

;get tray-icons
Func _getTrayIcons()
TrayCreateItem("Systray:")
$SysTitles = _SysTrayIconTitles()
For $i = 1 to $SysTitles[0][0]
$Tray[$i] = TrayCreateItem($SysTitles[$i][1])
Next
$trayexit = TrayCreateItem("Exit")
EndFunc

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

;show/ hide mail tray-icon
Func TrayIcon()
Opt("TrayIconHide", Not Opt("TrayIconHide", "Default"))
EndFunc

[/autoit]

Code

I:\AutoScrIpTs\shTraY\shTraY.au3(17,24) : WARNING: $i: possibly used before declaration.
				Case $msg = $Win[$i]
				~~~~~~~~~~~~~~~~~~~^
I:\AutoScrIpTs\shTraY\shTraY.au3(17,25) : WARNING: $Win: possibly used before declaration.
				Case $msg = $Win[$i]
				~~~~~~~~~~~~~~~~~~~~^
I:\AutoScrIpTs\shTraY\shTraY.au3(18,93) : ERROR: _SysTrayIconVisible() called with wrong number of args.
					_SysTrayIconVisible( Not _SysTrayIconVisible("Default", _SysTrayIconIndex($Win[$i][1])))
					~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
K:\AutoIt3\Include\Systray_UDF.au3(581,40) : REF: definition of _SysTrayIconVisible().
Func _SysTrayIconVisible($flag, $index)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
I:\AutoScrIpTs\shTraY\shTraY.au3(21,26) : WARNING: $Tray: possibly used before declaration.
				Case $msg = $Tray[$i]
				~~~~~~~~~~~~~~~~~~~~~^
I:\AutoScrIpTs\shTraY\shTraY.au3(22,94) : ERROR: _SysTrayIconVisible() called with wrong number of args.
					_SysTrayIconVisible( Not _SysTrayIconVisible("Default", _SysTrayIconIndex($Tray[$i][1])))
					~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
K:\AutoIt3\Include\Systray_UDF.au3(581,40) : REF: definition of _SysTrayIconVisible().
Func _SysTrayIconVisible($flag, $index)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
I:\AutoScrIpTs\shTraY\shTraY.au3(25,26) : WARNING: $trayexit: possibly used before declaration.
				Case $msg = $trayexit
				~~~~~~~~~~~~~~~~~~~~~^
I:\AutoScrIpTs\shTraY\shTraY.au3(17,24) : ERROR: $i: undeclared global variable.
				Case $msg = $Win[$i]
				~~~~~~~~~~~~~~~~~~~^
I:\AutoScrIpTs\shTraY\shTraY.au3 - 3 error(s), 4 warning(s)

Alles anzeigen

sc4ry

sauber, bin im englischen forum fündig geworden. also dort gibt es auch schon ähnliche programme wie ich es vorhabe. aber werde mich trotzdem dran probieren.

also windows/trays anzeigen/verstecken sollte ich somit hinbekommen.
beim rest werde ich mal gucken ob es möglich ist ...

PS: die ersten probs tauchen auf

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

#include <Systray_UDF.au3>
#Include <Constants.au3>
#include <array.au3>

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

Opt("TrayMenuMode",1)
HotKeySet("^!L", "TrayIcon")

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

$SysTitles = _SysTrayIconTitles()

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

For $i = 1 to $SysTitles[0][0]
$Item[$i] = TrayCreateItem($SysTitles[$i][1])
Next

$trayexit = TrayCreateItem("Exit")
TraySetState()
While 1
$msg = TrayGetMsg()
Select
Case $msg = 0
ContinueLoop
Case $msg = $Item[$i]
_SysTrayIconVisible( 0, _SysTrayIconIndex($SysTitles[$i][1]))
TrayItemSetState( $SysTitles[$i][1], $TRAY_CHECKED)
ContinueLoop
Case $msg = $trayexit
Exit
EndSelect
WEnd

;Tray-Icon
Func TrayIcon()
Opt("TrayIconHide", Not Opt("TrayIconHide", "Default"))
EndFunc

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

E:\AutoIt3\Include\WindowsConstants.au3 (64) : ==> Can not redeclare a constant.:
Global Const $WM_GETTEXT = 0x000D
Global Const ^ ERROR

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

was tun?

sc4ry

hey, das ist schonmal ne gute funktion.
hab mir überlegt, um das ganze vllt zu vereinfachen, dass im traymenü direkt alle fenster und tray-icons angezeigt werden, die zZ existieren.

wenn man dann einen eintrag anklickt, wird dieser versteckt (und traychecked). bei einem weiteren klick wieder sichtbar. alle einträge die checked waren, werden in einer ini gespeichert, damit sie beim nächsten mal wieder versteckt werden.

gibt es denn was für den tray wie winlist() ... also traylist()?

btw, könnte man vllt ne bestehende dll von traywizard benutzen?

sc4ry

ich sag mal, c&p hab ich auf jeden fall richtig gemacht, bzw ich hab einfach alle versionen ausprobiert =)

aber hier n bild, vllt hilft das noch

sc4ry

hi, leider komm ich mit diesem unattend script nicht weiter, also wollte ich es auf die altmodische art probieren, die da wäre "ControlSend".

leider geht das nicht, da irgendwas mit dem fenstertitel nicht stimmt.
die funktion bleibt z.B. bei WinWaitActive("SAP") hängen (oder wahlweise auch dem controlsend, obwohl mir das infotool sagt, dass der titel SAP ist.

was kann ich machen (wie man sieht, hat das offene fenster kein "titel", jedoch in der taskleiste heisst es wirklich SAP)

sc4ry

du könntest auch ein splashtexton machen ... dann läuft das script direkt weiter.

bleibt dann halt für ewig (bis das script beendet wird), oder du setzt irgendwo ein splashoff hin, dann verschwindet es ...

nur ne idee, kommt natürlich drauf an, was du machen willst

sc4ry

1. fenster aus taskleiste in systray minimieren
also eine möglichkeit wäre, dass beim rechtsklick auf ein fenster im kontrextmenü der einrag "minimize to tray" o. ä. erscheint. dann verschwindet das fenster aus der taskleiste und dessen smybol ist dann im systray zu sehen.

wie würde ich das jetzt umsetzen? wüsste nicht mal, wo ich anfangen soll, ausser vllt regeintrag *g*

2. systray symbole dem autoit script hinzufügen
man kann durch das kontextmenü oder einer liste die icons die sich zZ im systray befinden auswählen. diese sollen grob gesagt "aus dem systray verschwinden". dazu werden diese im traymenü vom autoit script angezeigt.

3. es gibt ein programm namens taskshuffle, womit man das bewerkstelligen kann.
mit linksklick das fenster halten und "einfach" verschieben

das sind halt die ideen, nur wo anfangen und wie ?

sc4ry

ich habe zwar noch keine zeit dafür, aber ich würde es gerne in ein paar wochen probieren.

und zwar möchte ich die funktionen ein paar kleinerer programme vereinen.

IDEE:

-Fenster die in der Taskleiste erscheinen, in den Systray minimieren
-Systray Symbole dem AutoIt-Script hinzufügen (so dass diese nicht mehr im systray erscheinen, sondern im traymenü ... wie bei TrayWizard)
-Fenster in der Taskleiste nach eigenen Wünschen sortieren

evtl noch weitere ideen, aber das ist erstmal das, was ich nice finde.

jetzt ist die frage, ist autoit das geeignete programm dafür, oder ist das überhaupt möglich? und wenn ja, wer würde mir dabei helfen *g*

sc4ry

so, ich habe noch was was rumprobiert. es gab verschiedene probs, von fileinstall, über irgednwas bis zu nem progressgui.

bis auf 1 fehler habe ich nun alles ausgemerzt, und zumindest den einen fehler lokalisiert. er liegt genau hier

Spoiler anzeigen

[autoit]

;"script-läuft"-anzeige
If $notify = "1" Then
$ProgressGui = GUICreate( "", 200, 30, -1, -1, $WS_POPUP + $WS_DLGFRAME + $WS_VISIBLE + $DS_SETFOREGROUND, $WS_EX_TOPMOST)
$Progress = GUICtrlCreateProgress( 1, 20, 200, 10)
GUICtrlSetStyle( -1, $PBS_MARQUEE)
GUICtrlCreateLabel("Starter is working ...", 55, 1, 120, 18)
GUISetState(@SW_SHOW)
_GUICtrlProgressSetMarquee($Progress)
Else
EndIf

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

....
.......
..........

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

;"script fertig"-meldung
If $notify = "2" Then
If $info = 1 Then
ProcessWaitClose("HDInfoCheck.exe")
SplashTextOn("", $script & " is ready now", 250, 30, -1, -1, 0 + 1 + 32, "", "", 1000)
Sleep(3000)
SplashOff()
Else
SplashTextOn("", $script & " is ready now", 250, 30, -1, -1, 0 + 1 + 32, "", "", 1000)
Sleep(8000)
SplashOff()
EndIf
ElseIf $notify = "1" Then
If $info = 1 Then
ProcessWaitClose("HDInfoCheck.exe")
Else
Sleep(5000)
EndIf
GUIDelete($ProgressGui)
Else
EndIf

[/autoit]

und zwar an diesem progressgui. denn wenn ich den weglasse, und zb auch durch einen spashtexton ersetzte, sind die buttons korrekt. aber was stimmt hier nicht?

PS: hab jetzt mal im code das "menu" vor die buttons gesetzt, dann geht alles ohne probleme

[autoit]

;erstelle hauptfenster
$gui = GUICreate($script & " V3", 400, 300, -1, -1, -1, $WS_EX_ACCEPTFILES)
$menu = GUICtrlCreateMenu("&More")
$infos = GUICtrlCreateMenuitem("&Info", $menu)
$about = GUICtrlCreateMenuitem("&About", $menu)
$ok = GUICtrlCreateButton("&OK", 40, 251, 70, -1, $BS_DEFPUSHBUTTON )
GUICtrlSetTip($ok, "Saves your current settings in an *.ini-file")
$cancel = GUICtrlCreateButton("&Cancel", 290, 251, 70)
If $flag = True Then GUICtrlSetTip($cancel, "This button only hides your settings")
$label = GUICtrlCreateLabel("© daniel von pluto", 160, 260)
GUICtrlSetColor(-1, 0x9E9E9E)
GUICtrlSetFont($label, 7)

[/autoit]

aber weiss wer, warum beim einblenden des GUI die einträge alle so schwarz werden?
das fenster ist nicht transparent, sondern wird nur mit dem effekt ein/ausgeblendet:
DllCall ( "user32.dll", "int", "AnimateWindow", "hwnd", $gui, "int", 2000, "long", 0x00080000)

Beiträge von sc4ry

Kontextmenü bei Laufwerken usw

WinGetKey

NFastO

leere zeilen in txt löschen

die Geschichte eures Nicknames

leere zeilen in txt löschen

NFastO

Alle Datein die kleiner als "z.B. 300kB" sind löschen ?!

NFastO

Dateipfad lässt sich nicht in ini speichern

MSGBOX von externem Programm auslesen

ist das möglich...

ist das möglich...

ist das möglich...

verpeilt ... bestehendes IE-Fenster übernehmen?

SAP Login Script?

Msgbox die verschwinded

ist das möglich...

ist das möglich...

buttons weg