[GUICtrlCreatePic] keine Ausgabe.

[md88]

~Close

Erledigt

 Spoiler

Hallo Community,

Mein Problem ist das bei :

 Spoiler

FileCreateShortcut("C:\RootWay\te2t-Sicherheitskopie.exe", @DesktopDir & "test.lnk",)

keine Verknüpfung erstellt. Wie kann ich das beheben ?

Vielen dank im vorraus

Freundliche Grüße

md88

alter Thread:

 Spoiler

Hallo Community,

Mein Problem ist das bei :

 Spoiler

GUICtrlCreatePic("C:\Rootway\Pictures\gildenpapalo go.jpg", 0, 0, @DesktopWidth, @DesktopHeight)

kein Bild angezeigt wird. Wie kann ich das beheben ?

Hier einmal der komplette Code:

 Spoiler

#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Crypt.au3>
#include <StaticConstants.au3>
#include <Sound.au3>
#include <NomadMemory.au3>
#include <EPVP_HWID.au3>


MsgBox(48,"Please wait!", "I will check that you give an thanks me.")
$szxURL = 'http://www.elitepvpers.com/forum/s4-league-hacks-bots-cheats-exploits/3087795-release-s4l-mini-ingame.html' ;Test URL
Dim $a_szIgnoredIds[1] = ['x'] ;eigene UserID, Ausnahmen, etc.
_CheckThanks('', $szxURL, $a_szIgnoredIds)
Switch @error
Case 7
If MsgBox(52, 'Error ',' A Thanks would be desirable! open thread?') == 6 Then ShellExecute($szxURL)
Exit
Case Else
MsgBox(48, 'Danke', 'Thanks Have Fun!')
$handle = _SoundOpen(@ScriptDir & "\Dreaming.mp3")
_SoundPlay($handle)
SoundSetWaveVolume(40)
$F = GUICreate('MyGUI', @DesktopWidth, @DesktopHeight, 0, 0, BitOR($WS_POPUP, $WS_EX_TOPMOST))
GUICtrlCreatePic("C:\Rootway\Picturesgildenpapalog o.jpg", 0, 0, @DesktopWidth, @DesktopHeight)
_WinFade_BK($F, "In")
Sleep(3000)
_WinFade_BK($F, "out")
EndSwitch
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("[Team FTW] Have Fun Hack", 660, 452, @DesktopWidth / 2 - 330, @DesktopHeight / 2 - 226)
GUISetCursor (3)
$Label1 = GUICtrlCreateLabel("By Official Di!mar ", 560, 432, 87, 17)
GUICtrlSetColor(-1, 0x008080)
GUICtrlSetBkColor(-1, 0x000000)
$Button1 = GUICtrlCreateButton("Start", 326, 367,100, 50)
GUICtrlSetCursor (-1, 0)
$Button2 = GUICtrlCreateButton("Exit", 226, 367, 100, 50)
GUICtrlSetCursor (-1, 0)
$Checkbox9 = GUICtrlCreateCheckbox("God Mode", 40, 120, 97, 17)
$Checkbox14 = GUICtrlCreateCheckbox("1 hit kill", 40, 168, 97, 17)
$Checkbox8 = GUICtrlCreateCheckbox("Channel no lvl", 466, 144, 97, 17)
$Checkbox2 = GUICtrlCreateCheckbox("****", 160, 120, 97, 17)
$Checkbox13 = GUICtrlCreateCheckbox("Block HP", 160, 168, 97, 17)
$Checkbox1 = GUICtrlCreateCheckbox("200HP", 106, 144, 97, 17)
$Checkbox3 = GUICtrlCreateCheckbox("Inf sp", 280, 120, 97, 17)
$Checkbox11 = GUICtrlCreateCheckbox("Bind Range", 280, 168, 97, 17)
$Checkbox4 = GUICtrlCreateCheckbox("Damage x2", 226, 144, 97, 17)
$Checkbox5 = GUICtrlCreateCheckbox("H.Riffle no fail", 400, 120, 97, 17)
$Checkbox10 = GUICtrlCreateCheckbox("Inf Amo", 400, 168, 97, 17)
$Checkbox6 = GUICtrlCreateCheckbox("No laser", 346, 144, 97, 17)
$Checkbox7 = GUICtrlCreateCheckbox("WallJump teleport", 520, 120, 99, 17)
$Checkbox12 = GUICtrlCreateCheckbox("Instant Respawn", 520, 168, 99, 17)
$Slider1 = GUICtrlCreateSlider(32, 345, 99, 25)
$Button3 = GUICtrlCreateButton("Set Volume", 32, 367, 99, 15, 0)
GUICheckBoxSetColor($Checkbox1,0x000000,$GUI_BKCOL OR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox2,0x000000,$GUI_BKCOL OR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox3,0x000000,$GUI_BKCOL OR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox4,0x000000,$GUI_BKCOL OR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox5,0x000000,$GUI_BKCOL OR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox6,0x000000,$GUI_BKCOL OR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox7,0x000000,$GUI_BKCOL OR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox8,0x000000,$GUI_BKCOL OR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox9,0x000000,$GUI_BKCOL OR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox10,0x000000,$GUI_BKCO LOR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox11,0x000000,$GUI_BKCO LOR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox12,0x000000,$GUI_BKCO LOR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox13,0x000000,$GUI_BKCO LOR_TRANSPARENT )
GUICheckBoxSetColor($Checkbox14,0x000000,$GUI_BKCO LOR_TRANSPARENT )
_WinFade_B($Form1, "in")
$Pic1 = GUICtrlCreatePic("main\ftw11.jpg", 0, -8, 660, 113)
$Pic2 = GUICtrlCreatePic("main\Addictive-Computer-Have-fun_www.FullHDWpp.com_.jpg", 0, 104, 660, 348)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
MsgBox(4096, "03.03.2014", "Script By : D!eMar//xLoader", 0)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $button2
Exit
Case $GUI_EVENT_CLOSE
Exit
Case $button1
_something()
Case $Button3
$Read=GUICtrlRead($Slider1)
ToolTip($Read)
SoundSetWaveVolume($Read)
EndSwitch
WEnd



Func GUICheckBoxSetColor(ByRef $CtrlID,$iColor,$iBkColor=0xF1EDED)
$CtrlHWnd = $CtrlID
If Not IsHWnd($CtrlHWnd) Then $CtrlHWnd = GUICtrlGetHandle($CtrlID)
$aParent = DllCall("user32.dll", "hwnd", "GetParent", "hwnd", $CtrlHWnd)
$aCPos = ControlGetPos($aParent[0],"",$CtrlID)
$sOldT = GUICtrlRead($CtrlID,1)
GUICtrlDelete($CtrlID)
DllCall('uxtheme.dll', 'none', 'SetThemeAppProperties', 'int', 0)
$CtrlID = GUICtrlCreateCheckbox($sOldT,$aCPos[0],$aCPos[1],$aCPos[2],$aCPos[3])
GUICtrlSetColor(-1,$iColor)
GUICtrlSetBkColor(-1,$iBkColor)
DllCall('uxtheme.dll', 'none', 'SetThemeAppProperties', 'int', 7)
EndFunc

Func _WinFade_BK($WinTitle, $Fade = "out", $BkColor = "", $iTime = 250, $Exit = True)
If $Fade = "in" Then
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $WinTitle, "int", 2600, "long", 0x00080000)
ElseIf $Fade = "out" or $Fade = "" Then
If Not $BkColor = "" Then
GUISetBkColor($BkColor)
EndIf
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $WinTitle, "int", $iTime, "long", 0x00090000)
EndIf
EndFunc

Func _WinFade_B($WinTitle, $Fade = "out", $BkColor = "", $iTime = 250, $Exit = True)
If $Fade = "in" Then
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $WinTitle, "int", 1000, "long", 0x00080000)
ElseIf $Fade = "out" or $Fade = "" Then
If Not $BkColor = "" Then
GUISetBkColor($BkColor)
EndIf
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $WinTitle, "int", $iTime, "long", 0x00090000)
EndIf
EndFunc


Func _something()
ToolTip("Waiting for S4Client...", 0, 0)
$wait = ProcessWait("S4Client.exe")
$pid = ProcessExists("S4Client.exe")
Sleep(1000)
$open = _memoryopen($pid)
If GUICtrlRead($Checkbox1) = 1 Then
_memorywrite(5414004, $open,"1166868842", "long")
EndIf
If GUICtrlRead($checkbox2) = 1 Then
_memorywrite(7945525, $open, 2374697578, "long")
EndIf
If GUICtrlRead($checkbox3) = 1 Then
_memorywrite("0x0048D1E2", $open,"2348565979", "long")
EndIf
If GUICtrlRead($checkbox4) = 1 Then
_memorywrite(4919227, $open, 1300955754, "long")
EndIf
If GUICtrlRead($checkbox5) = 1 Then
_memorywrite(15179559, $open, 2348565979, "long")
EndIf
If GUICtrlRead($checkbox6) = 1 Then
_memorywrite(5421333, $open, 1301115242, "long")
EndIf
If GUICtrlRead($checkbox7) = 1 Then
_memorywrite("0x0048D6E9", $open, "3641722331", "long")
EndIf
If GUICtrlRead($checkbox8) = 1 Then
_memorywrite(10549654, $open, 837533829, "long")
EndIf
If GUICtrlRead($Checkbox9) = 1 Then
_memorywrite(0x0052C2A5, $open,"3135869072", "long")
EndIf
If GUICtrlRead($checkbox10) = 1 Then
_memorywrite(7882049, $open, 3555299472, "long")
EndIf
If GUICtrlRead($checkbox11) = 1 Then
_memorywrite(4896399, $open, 2047263990, "long")
EndIf
If GUICtrlRead($checkbox12) = 1 Then
_memorywrite(6270386, $open, 989874827, "long")
EndIf
If GUICtrlRead($checkbox13) = 1 Then
_memorywrite(7945565, $open, 2374697834, "long")
EndIf
If GUICtrlRead($checkbox14) = 1 Then
_memorywrite(5417417, $open, 1593591259, "long")
EndIf
Exit
EndFunc

das Bild ist auch im richtigen Pfad :

 Spoiler

Vielen dank im vorraus

Freundliche Grüße

md88

p.s. bitte beachtet die MemoryWrite Funktion nicht da ich davon keine Ahnung habe. Falls sich allerdings jemand kurz die Zeit nähmen, könnte, um es mir zu erklären, würde ich mich freuen.

[Paraly]

Ich würde einfach mal sagen du hast das Backslash vor dem Dateinamen vergessen

PHP Code:

FileCreateShortcut("C:\RootWay\te2t-Sicherheitskopie.exe", @DesktopDir & "\test.lnk") 


[md88]

Originally Posted by Paraly

Ich würde einfach mal sagen du hast das Backslash vor dem Dateinamen vergessen

PHP Code:

FileCreateShortcut("C:\RootWay\te2t-Sicherheitskopie.exe", @DesktopDir & "\test.lnk") 


Oww ^^' Ja danke