GUISETCREATEPIC problem

  • Hi

    Da ich GTA San Andreas Multiplayer zocke habe ich mich hingesetzt und habe mir ein Multiplayer-Starter gemacht. Jetzt wollte ich hinter den Buttons und Labels ein Hintergrund machen.
    Wo liegt jzt mein Fehler?

    [autoit]

    #cs ----------------------------------------------------------------------------

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

    AutoIt Version: 3.3.0.0
    Author: myName

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

    Script Function:
    Template AutoIt script.

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

    #ce ----------------------------------------------------------------------------

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

    ; Script Start - Add your code below here

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

    $pfad = FileExists ("data.ini")
    If $pfad = 1 Then
    Sleep(200)
    ElseIf $pfad = 0 Then
    $pfad = InputBox("PFAD", "Geben Sie hier ihren Pfad zu GTA San Anreas an. Bitte ohne .exe")
    IniWrite("data.ini", "Pfad", "Pfad", $pfad)
    EndIf

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

    $pfadlesen = IniRead("data.ini", "Pfad", "Pfad", "default")

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

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("GTA Starter", 635, 293, 187, 122)
    $Pic1 = GUICtrlCreatePic(@ProgramFilesDir & "GTA.gif", 630, 290, 180, 120, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    $Start = GUICtrlCreateButton("Start", 72, 112, 137, 41, BitOR($WS_GROUP,$WS_CLIPSIBLINGS), $WS_EX_CLIENTEDGE)
    $Exit = GUICtrlCreateButton("Exit", 248, 112, 137, 41, BitOR($WS_GROUP,$WS_CLIPSIBLINGS), $WS_EX_CLIENTEDGE)
    $Label1 = GUICtrlCreateLabel("Start/Exit", 72, 88, 48, 17)
    GUICtrlSetColor(-1, 0xFF0000)
    $Label2 = GUICtrlCreateLabel("Dies ist ein GTA SA:MP Start. Mit diesem Starter kann man problemlos den SA:MP starten.", 32, 16, 429, 17)
    GUICtrlSetColor(-1, 0xFF0000)
    $Label3 = GUICtrlCreateLabel("Tools", 480, 56, 30, 17)
    GUICtrlSetColor(-1, 0xFF0000)
    $Button1 = GUICtrlCreateButton("GTAInside", 472, 96, 153, 41, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("GTA Mod Installer", 472, 152, 153, 41, $WS_GROUP)
    $Label4 = GUICtrlCreateLabel("Achtung! Der GTA Mod Installer muss im GTA San Andreas Verzeichnis installiert sein!",472, 200, 175, 50)
    GUICtrlSetColor(-1, 0xFF0000)

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

    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Start
    Startsamp()
    Case $Exit
    exitsamp()
    Case $Button1
    inside()
    ;Case $mod
    ;gtamod()
    EndSwitch
    WEnd

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

    Func startsamp()
    userdata()
    ShellExecute($pfadlesen & "samp.exe")
    EndFunc

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

    Func exitsamp()
    Exit("samp.exe")
    EndFunc

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

    Func inside()
    Run (@ScriptDir &"/GTAInside.htm")
    EndFunc

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

    Func userdata()
    FileCopy($pfadlesen & "USERDATA.dat", @ScriptDir)
    EndFunc

    [/autoit]

    schon mal danke im voraus

    mfg

    Einmal editiert, zuletzt von Atax (24. Juli 2009 um 12:02)

  • Zitat

    Wird ein Bild als Hintergrundbild genutzt, während die anderen Steuerelemente dieses quasi überlappen, so ist es wichtig, das Bild-Steuerelement zu deaktivieren und es nach den anderen Steuerelementen zu erstellen: GuiCtrlSetState(-1,$GUI_DISABLE).

  • erstmal vielen dank

    ich habe das jzt unter die $pic1 Zeile gesetzt jedoch bleibt der hintergrund grau.

  • Hier nen Beispiel:

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------

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

    AutoIt Version: 3.3.0.0
    Author: myName

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

    Script Function:
    Template AutoIt script.

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

    #ce ----------------------------------------------------------------------------

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

    ;~ ; Script Start - Add your code below here

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

    $pfad = FileExists ("data.ini")
    If $pfad = 1 Then
    Sleep(200)
    ElseIf $pfad = 0 Then
    $pfad = InputBox("PFAD", "Geben Sie hier ihren Pfad zu GTA San Anreas an. Bitte ohne .exe")
    IniWrite("data.ini", "Pfad", "Pfad", $pfad)
    EndIf

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

    $pfadlesen = IniRead("data.ini", "Pfad", "Pfad", "default")

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

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("GTA Starter", 635, 293, 187, 122)
    $Pic1 = GUICtrlCreatePic(@DocumentsCommonDir & '\Eigene Bilder\Beispielbilder\Winter.jpg', 0, 0, 635, 293)
    GuiCtrlSetState(-1,$GUI_DISABLE)
    $Start = GUICtrlCreateButton("Start", 72, 112, 137, 41)
    $Exit = GUICtrlCreateButton("Exit", 248, 112, 137, 41)
    $Label1 = GUICtrlCreateLabel("Start/Exit", 72, 88, 48, 17)
    GUICtrlSetColor(-1, 0xFF0000)
    $Label2 = GUICtrlCreateLabel("Dies ist ein GTA SA:MP Start. Mit diesem Starter kann man problemlos den SA:MP starten.", 32, 16, 429, 17)
    GUICtrlSetColor(-1, 0xFF0000)
    $Label3 = GUICtrlCreateLabel("Tools", 480, 56, 30, 17)
    GUICtrlSetColor(-1, 0xFF0000)
    $Button1 = GUICtrlCreateButton("GTAInside", 472, 96, 153, 41, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("GTA Mod Installer", 472, 152, 153, 41, $WS_GROUP)
    $Label4 = GUICtrlCreateLabel("Achtung! Der GTA Mod Installer muss im GTA San Andreas Verzeichnis installiert sein!",472, 200, 175, 50)
    GUICtrlSetColor(-1, 0xFF0000)
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Start
    Startsamp()
    Case $Exit
    exitsamp()
    Case $Button1
    inside()
    ;Case $mod
    ;gtamod()
    EndSwitch
    WEnd

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

    Func startsamp()
    userdata()
    ShellExecute($pfadlesen & "samp.exe")
    EndFunc

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

    Func exitsamp()
    Exit("samp.exe")
    EndFunc

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

    Func inside()
    Run (@ScriptDir &"/GTAInside.htm")
    EndFunc

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

    Func userdata()
    FileCopy($pfadlesen & "USERDATA.dat", @ScriptDir)
    EndFunc

    [/autoit]

    Bei dir fehlt auch noch ein \
    @ProgramFilesDir & "GTA.gif"

    also so dann
    @ProgramFilesDir & "\GTA.gif"

    Einmal editiert, zuletzt von Greek (23. Juli 2009 um 15:20)

  • also ich hab das jetzt so.

    [autoit]

    #cs ----------------------------------------------------------------------------

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

    AutoIt Version: 3.3.0.0
    Author: myName

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

    Script Function:
    Template AutoIt script.

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

    #ce ----------------------------------------------------------------------------

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

    ; Script Start - Add your code below here

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

    $pfad = FileExists("data.ini")
    If $pfad = 1 Then
    Sleep(200)
    ElseIf $pfad = 0 Then
    $pfad = InputBox("PFAD", "Geben Sie hier ihren Pfad zu GTA San Anreas an. Bitte ohne .exe")
    IniWrite("data.ini", "Pfad", "Pfad", $pfad)
    EndIf

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

    $pfadlesen = IniRead("data.ini", "Pfad", "Pfad", "default")

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

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("GTA Starter", 635, 293, 187, 122)
    $Pic1 = GUICtrlCreatePic(@ProgramFilesDir & "GTA.jpg", 630, 290, 180, 120, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
    GUICtrlSetState(-1, $GUI_DISABLE)
    $Start = GUICtrlCreateButton("Start", 72, 112, 137, 41, BitOR($WS_GROUP, $WS_CLIPSIBLINGS), $WS_EX_CLIENTEDGE)
    $Exit = GUICtrlCreateButton("Exit", 248, 112, 137, 41, BitOR($WS_GROUP, $WS_CLIPSIBLINGS), $WS_EX_CLIENTEDGE)
    $Label1 = GUICtrlCreateLabel("Start/Exit", 72, 88, 48, 17)
    GUICtrlSetColor(-1, 0xFF0000)
    $Label2 = GUICtrlCreateLabel("Dies ist ein GTA SA:MP Start. Mit diesem Starter kann man problemlos den SA:MP starten.", 32, 16, 429, 17)
    GUICtrlSetColor(-1, 0xFF0000)
    $Label3 = GUICtrlCreateLabel("Tools", 480, 56, 30, 17)
    GUICtrlSetColor(-1, 0xFF0000)
    $Button1 = GUICtrlCreateButton("GTAInside", 472, 96, 153, 41, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("GTA Mod Installer", 472, 152, 153, 41, $WS_GROUP)
    $Label4 = GUICtrlCreateLabel("Achtung! Der GTA Mod Installer muss im GTA San Andreas Verzeichnis installiert sein!", 472, 200, 175, 50)
    GUICtrlSetColor(-1, 0xFF0000)
    GUISetState(@SW_SHOW)
    $Pic1 = GUICtrlCreatePic("/GTA.jpg", 630, 290, 180, 120, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
    GUICtrlSetState(-1, $GUI_DISABLE)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Start
    Startsamp()
    Case $Exit
    exitsamp()
    Case $Button1
    inside()
    ;Case $mod
    ;gtamod()
    EndSwitch
    WEnd

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

    Func startsamp()
    userdata()
    ShellExecute($pfadlesen & "samp.exe")
    EndFunc

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

    Func exitsamp()
    Exit ("samp.exe")
    EndFunc

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

    Func inside()
    Run(@ScriptDir & "/GTAInside.htm")
    EndFunc

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

    Func userdata()
    FileCopy($pfadlesen & "USERDATA.dat", @ScriptDir)
    EndFunc ;==>userdata

    [/autoit]

    der hintergrund bleibt trotzdem grau.

  • Hi, versuch es mal so, sollte es nicht funktionieren, dann schreibe wo Dein Bild genau liegt.

    Spoiler anzeigen
    [autoit]


    ; by Atax
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>

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

    #cs

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

    $pfad = FileExists("data.ini")
    If $pfad = 1 Then
    Sleep(200)
    ElseIf $pfad = 0 Then
    $pfad = InputBox("PFAD", "Geben Sie hier ihren Pfad zu GTA San Anreas an. Bitte ohne .exe")
    IniWrite("data.ini", "Pfad", "Pfad", $pfad)
    EndIf

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

    $pfadlesen = IniRead("data.ini", "Pfad", "Pfad", "default")

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

    #ce

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

    $Form1 = GUICreate("GTA Starter", 635, 293, 187, 122)
    $Pic1 = GUICtrlCreatePic(@ScriptDir & "\gtao.jpg", 0, 0, 635, 293, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))

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

    ;i Das Bild hatte einen falschen Namen und hat auch die falsche Größe.
    ; Die Größe mußt Du noch anpassen.
    ;i ! So sollte es funktionieren ! ;)

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

    GUICtrlSetState(-1, $GUI_DISABLE)
    $Start = GUICtrlCreateButton("Start", 72, 112, 137, 41, BitOR($WS_GROUP, $WS_CLIPSIBLINGS), $WS_EX_CLIENTEDGE)
    $Exit = GUICtrlCreateButton("Exit", 248, 112, 137, 41, BitOR($WS_GROUP, $WS_CLIPSIBLINGS), $WS_EX_CLIENTEDGE)
    $Label1 = GUICtrlCreateLabel("Start/Exit", 72, 88, 48, 17)
    GUICtrlSetColor(-1, 0xFF0000)
    $Label2 = GUICtrlCreateLabel("Dies ist ein GTA SA:MP Start. Mit diesem Starter kann man problemlos den SA:MP starten.", 32, 16, 429, 17)
    GUICtrlSetColor(-1, 0xFF0000)
    $Label3 = GUICtrlCreateLabel("Tools", 480, 56, 30, 17)
    GUICtrlSetColor(-1, 0xFF0000)
    $Button1 = GUICtrlCreateButton("GTAInside", 472, 96, 153, 41, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("GTA Mod Installer", 472, 152, 153, 41, $WS_GROUP)
    $Label4 = GUICtrlCreateLabel("Achtung! Der GTA Mod Installer muss im GTA San Andreas Verzeichnis installiert sein!", 472, 200, 175, 50)
    GUICtrlSetColor(-1, 0xFF0000)

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

    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Start
    Startsamp()
    Case $Exit
    exitsamp()
    Case $Button1
    inside()
    ;Case $mod
    ;gtamod()
    EndSwitch
    WEnd

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

    Func startsamp()
    userdata()
    ShellExecute($pfadlesen & "samp.exe")
    EndFunc ;==>startsamp

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

    Func exitsamp()
    Exit ("samp.exe")
    EndFunc ;==>exitsamp

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

    Func inside()
    Run(@ScriptDir & "/GTAInside.htm")
    EndFunc ;==>inside

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

    Func userdata()
    FileCopy($pfadlesen & "USERDATA.dat", @ScriptDir)
    EndFunc ;==>userdata
    ; Ende

    [/autoit]


    Edit: Anpassung vorgenommen. :thumbup:

  • also die datei heißt auch GTA.jpg bei mir. der name kam jzt nur vom Upload.
    Das mit der größe probier ich mal aus

    //Edit

    ne mit der größe geht auch nicht...