Beiträge von Teare

Teare

Zu deinem ersten Problem.

Frag den Slider einfach nach dem erstellen ab und setzte die Bars dementsprechend :

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#include <SendMessage.au3>
#include <ProgressConstants.au3>
#Include <WinAPI.au3>

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

$Form1 = GUICreate("Progress Bars", 263, 286)
;--Bar1--
$Label1 = GUICtrlCreateLabel("Bar 1:", 8,
$Progress1 = GUICtrlCreateProgress(8, 24, 246, 25)
;--Bar2--
$Label2 = GUICtrlCreateLabel("Bar 2:", 8, 64)
$Progress2 = GUICtrlCreateProgress(8, 80, 246, 25)
_SendMessage(GUICtrlGetHandle($Progress2),$PBM_SETSTATE, 2)
;--Bar3--
$Label3 = GUICtrlCreateLabel("Bar 3:", 8, 120)
$Progress3 = GUICtrlCreateProgress(8, 136, 246, 25)
_SendMessage(GUICtrlGetHandle($Progress3),$PBM_SETSTATE, 3)
;--Bar4--
$Label4 = GUICtrlCreateLabel("Bar 4:", 8, 176)
$Progress4 = GUICtrlCreateProgress(8, 192, 246, 25,$PBS_MARQUEE)
_SendMessage(GUICtrlGetHandle($Progress4),$PBM_SETMARQUEE, True, 30)
;----
$Slider1 = GUICtrlCreateSlider(8, 240, 246, 37)
GUICtrlSetLimit($Slider1, 100, 0)
GUICtrlSetData($Slider1, 50)
GUISetState(@SW_SHOW)
$OldPercent=0

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

GUICtrlSetData($Progress1,GUICtrlRead($Slider1))
GUICtrlSetData($Progress2,GUICtrlRead($Slider1))
GUICtrlSetData($Progress3,GUICtrlRead($Slider1))

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

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

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

$NewPercent=GUICtrlRead($Slider1)
If $NewPercent<>$OldPercent Then
$OldPercent=$NewPercent
GUICtrlSetData($Progress1,$NewPercent)
GUICtrlSetData($Progress2,$NewPercent)
GUICtrlSetData($Progress3,$NewPercent)
EndIf
WEnd

[/autoit]

Teare

wenn du Vollbild ohne Rahmen willst empfehle ich dir das erste

Spoiler anzeigen

[Blockierte Grafik: http://www.abload.de/img/bitorws_sysmenuws_popa6kh2.png]

Spoiler anzeigen

[Blockierte Grafik: http://www.abload.de/img/bitorws_ex_toolwindowzfjai.png]

Spoiler anzeigen

[Blockierte Grafik: http://www.abload.de/img/bitorws_minimizeboxwszjjvj.png]

Teare

Genau.

Ich als Ordnungsfreak hätts so gemacht :

[autoit]

$sVideoID = GUICtrlRead($inp_videoid)
GUICtrlSetData($out_code, 'erster teil'&$sVideoID&'zweiter teil')

[/autoit]

Teare

Versuchs mal mit
_ChooseColor
FileOpenDialog
FileSaveDialog

Das lässt die "hässlichen" Inputboxen verschwinden

Teare

Außerdem solltest du auf die Rechtschreibung achten :
Ziel wird ohne h geschrieben .

Teare

Weis keiner bescheid?

Teare

Poribier das Mal:

http://pastebin.com/HKRRgQWw

Teare

Ich habe mit die 7Zip UDF heruntergeladen und wollte sie mit dem Beispielscript = Extract ausprobierren aber es funktioniert nicht.

Beispielscript:

Spoiler anzeigen

[autoit]

#include <7Zip.au3>
;Example #1$ArcFile = FileOpenDialog("Select archive", "", "Archive Files (*.7z;*.zip;*.gzip;*.bzip2;*.tar)")If @error Then Exit
$Output = FileSelectFolder("Select output folder", "")If @error Then Exit
$retResult = _7ZIPExtract(0, $ArcFile, $Output)If @error = 0 Then MsgBox(64, "_7ZIPExtractEx", $retResult)Else MsgBox(64, "_7ZIPExtractEx", "Error occurred")EndIf
;Example #2$ArcFile = FileOpenDialog("Select archive", "", "Archive Files (*.7z;*.zip;*.gzip;*.bzip2;*.tar)")If @error Then Exit
$Output = FileSelectFolder("Select output folder", "")If @error Then Exit
$retResult = _7ZIPExtract(0, $ArcFile, $Output, 0, 0, 1, 0, 0, 0, "*.wav")If @error = 0 Then MsgBox(64, "_7ZIPExtractEx", $retResult)Else MsgBox(64, "_7ZIPExtractEx", "Error occurred")EndIf

[/autoit]

In der Console kommt nur :

Spoiler anzeigen

>"C:\Program Files (x86)\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "C:\Program Files (x86)\AutoIt3\Include\_7ZIPExtract_Example.au3" /autoit3dir "C:\Program Files (x86)\AutoIt3" /UserParams
+>17:38:20 Starting AutoIt3Wrapper v.2.0.3.0 Environment(Language:0407 Keyboard:00000407 OS:WIN_7/Service Pack 1 CPU:X64 OS:X64)
>Running AU3Check (1.54.19.0) from:C:\Program Files (x86)\AutoIt3
+>17:38:20 AU3Check ended.rc:0
>Running:(3.3.6.1):C:\Program Files (x86)\AutoIt3\autoit3_x64.exe "C:\Program Files (x86)\AutoIt3\Include\_7ZIPExtract_Example.au3"
->17:38:20 AutoIT3.exe ended.rc:1

Die UDF liegt natürlich hier:
C:\Program Files (x86)\AutoIt3\Include

Hier nochmal bei Pastebin.com http://pastebin.com/vtRA21nh
Ich hoffe ihr konnt mir helfen

Teare

Wie mach ich das nun mit dem Download?
Inetget ja aber wie?

und wie krieg ich den Wert für die Progressbar?

Aktuelles Script

Teare

Danke, kalppt super!

Teare

Zitat von TheLuBu

Habe dir mal WM_Notify eingebaut, teste mal und achte auf den index, ich denke das sollte dir schonmal weiterhelfen

Spoiler anzeigen

[autoit]
#include
#include
#include
#include
#include
#include
#include
#include
[/autoit] [autoit][/autoit] [autoit]
Global $hListView, $Texturearray[2][5]
$pingcheck = Ping("www.google.de")
If @error Then
MsgBox(0, "Internet", "Du hast keine verbindung zum Internet! Bitte verbinde dich mit dem Internet um dieses Tool zu benutzen!")
Exit
EndIf
[/autoit] [autoit][/autoit] [autoit]
$Texturearray[0][0] = "Texturenpack1"
$Texturearray[0][1] = "32x32"
$Texturearray[0][2] = "20 MB"
$Texturearray[0][3] = "LINK/Pfad ZUM BILD"
$Texturearray[0][4] = "LINK ZUM DOWNLOAD"
$Texturearray[1][0] = "Texturenpack2"
$Texturearray[1][1] = "64x64"
$Texturearray[1][2] = "20 MB"
$Texturearray[1][3] = "LINK/Pfad ZUM BILD"
$Texturearray[1][4] = "LINK ZUM DOWNLOAD"
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$GUI = GUICreate("Form1", 547, 513, 192, 117)
$Button1 = GUICtrlCreateButton("Donate", 352, 464, 65, 25, $WS_GROUP)
$Progress1 = GUICtrlCreateProgress(24, 392, 497, 25)
$Group1 = GUICtrlCreateGroup("Vorschau", 24, 112, 497, 257)
$Pic = GUICtrlCreatePic("", 24,112,497,257)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button2 = GUICtrlCreateButton("Download", 24, 448, 97, 25, $WS_GROUP)
$Label1 = GUICtrlCreateLabel("Texturenpack #", 24, 424, 80, 17)
$Label2 = GUICtrlCreateLabel("Größe #", 120, 424, 43, 17)
$Label3 = GUICtrlCreateLabel("# %", 256, 424, 30, 17)
$hListView = _GUICtrlListView_Create($GUI, "", 24, 16, 497, 89)
_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES))
_GUICtrlListView_InsertColumn($hListView, 0, "Name", 165)
_GUICtrlListView_InsertColumn($hListView, 1, "Auflösung", 165)
_GUICtrlListView_InsertColumn($hListView, 2, "Größe", 165)
; Fügt die Items hinzu
_GUICtrlListView_AddItem($hListView, "Texturenpack1", 0)
_GUICtrlListView_AddSubItem($hListView, 0, "32x32", 1)
_GUICtrlListView_AddSubItem($hListView, 0, "20 MB", 2)
_GUICtrlListView_AddItem($hListView, "Texturenpack2", 1)
_GUICtrlListView_AddSubItem($hListView, 1, "64x64", 1)
_GUICtrlListView_AddSubItem($hListView, 1, "20 MB", 2)
GUISetState(@SW_SHOW)
[/autoit] [autoit][/autoit] [autoit]
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func WM_NOTIFY($hWnd, $iMsg, $iwParam, $ilParam)
#forceref $hWnd, $iMsg, $iwParam
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR, $hWndListView, $tInfo
$hWndListView = $hListView
If Not IsHWnd($hWndListView) Then $hWndListView = GUICtrlGetHandle($hListView)
$tNMHDR = DllStructCreate($tagNMHDR, $ilParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hWndListView
Switch $iCode
Case $NM_DBLCLK ; Wird vom ListView gesendet, wenn der Benutzer ein Item mit der linken Maustaste doppelklickt
$tInfo = DllStructCreate($tagNMITEMACTIVATE, $ilParam)
_DebugPrint("$NM_DBLCLK" & @LF & "-->hWndFrom:" & @TAB & $hWndFrom & @LF & _
"-->IDFrom:" & @TAB & $iIDFrom & @LF & _
"-->Code:" & @TAB & $iCode & @LF & _
"-->Index:" & @TAB & DllStructGetData($tInfo, "Index") & @LF & _
"-->SubItem:" & @TAB & DllStructGetData($tInfo, "SubItem") & @LF & _
"-->NewState:" & @TAB & DllStructGetData($tInfo, "NewState") & @LF & _
"-->OldState:" & @TAB & DllStructGetData($tInfo, "OldState") & @LF & _
"-->Changed:" & @TAB & DllStructGetData($tInfo, "Changed") & @LF & _
"-->ActionX:" & @TAB & DllStructGetData($tInfo, "ActionX") & @LF & _
"-->ActionY:" & @TAB & DllStructGetData($tInfo, "ActionY") & @LF & _
"-->lParam:" & @TAB & DllStructGetData($tInfo, "lParam") & @LF & _
"-->KeyFlags:" & @TAB & DllStructGetData($tInfo, "KeyFlags"))
GUICtrlDelete($Pic)
$Pic = GUICtrlCreatePic($Texturearray[DllStructGetData($tInfo, "Index")][3], 24,112,497,257)
ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $Pic = ' & $Pic & @crlf & '>Error code: ' & @error & @crlf) ;### Debug Console
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY
Func _DebugPrint($s_text, $line = @ScriptLineNumber)
ConsoleWrite( _
"!===========================================================" & @LF & _
"+======================================================" & @LF & _
"-->Zeile(" & StringFormat("%04d", $line) & "):" & @TAB & $s_text & @LF & _
"+======================================================" & @LF)
EndFunc ;==>_DebugPrint
[/autoit]

Alles anzeigen

Und wo füge ich das bild ein?

Achja und In den Credits kommt jeder rein der mir geholfen hat, also fleißig helfen!

Teare

danke aber wie mache ich es, dass er immer das bild lädt welches er grade angeklickt hat?

Also ich hab tp1 an er soll vorschau 1 laden
ich hab tp2 an er soll vorschau 2 laden

Teare

@BLinz : Danke

BTT
Ich weis leider immernochnicht weiter

Teare

Zitat von Protex

Zitat von Protex

Servous, du hast viele unnötige Includes in deinem Script
[autoit]

#include <GUIConstantsEx.au3>
#include <GuiListView.au3>
#include <ListViewConstants.au3>
#include <WindowsConstants.au3>
[/autoit]

diese reichen völlig aus

Gruß

Da ich mich damit nicht wirklich auskenne

Teare

Habs jetzt schonmal soo:

Spoiler anzeigen

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiListView.au3>
#include <GuiImageList.au3>
#include <ListViewConstants.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

$pingcheck = Ping("www.google.de")
If @error Then
MsgBox(0,"Internet", "Du hast keine verbindung zum Internet! Bitte verbinde dich mit dem Internet um dieses Tool zu benutzen!")
Exit

EndIf

$GUI = GUICreate("Form1", 547, 513, 192, 117)
$Button1 = GUICtrlCreateButton("Donate", 352, 464, 65, 25, $WS_GROUP)
$Progress1 = GUICtrlCreateProgress(24, 392, 497, 25)
$Group1 = GUICtrlCreateGroup("Vorschau", 24, 112, 497, 257)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button2 = GUICtrlCreateButton("Download", 24, 448, 97, 25, $WS_GROUP)
$Label1 = GUICtrlCreateLabel("Texturenpack #", 24, 424, 80, 17)
$Label2 = GUICtrlCreateLabel("Größe #", 120, 424, 43, 17)
$Label3 = GUICtrlCreateLabel("# %", 256, 424, 30, 17)
$hListView = _GUICtrlListView_Create($GUI, "", 24, 16, 497, 89)
_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES))
_GUICtrlListView_InsertColumn($hListView, 0, "Name", 165)
_GUICtrlListView_InsertColumn($hListView, 1, "Auflösung", 165)
_GUICtrlListView_InsertColumn($hListView, 2, "Größe", 165)
; Fügt die Items hinzu
_GUICtrlListView_AddItem($hListView, "Texturenpack1", 0)
_GUICtrlListView_AddSubItem($hListView, 0, "32x32", 1)
_GUICtrlListView_AddSubItem($hListView, 0, "20 MB", 2)
_GUICtrlListView_AddItem($hListView, "Texturenpack2", 1)
_GUICtrlListView_AddSubItem($hListView, 1, "64x64", 1)
_GUICtrlListView_AddSubItem($hListView, 1, "20 MB", 2)
GUISetState(@SW_SHOW)

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

Kannst du mir was über WM_NOTIFY() sagen?

Teare

Sind es immer die gleichen Dateipfade?

Teare

Hallo.

ich möchte einen Minecraft TP Downloader erstellen und hab folgende frage:

Wie kann ich es machen, dass wenn ich ein Item in Listview anklicke er ein bild in die gui Lädt?
Wie kann ich es machen, dass wenn ich ein Item in Listview anklicke er mir den Download des TP's anbietet?

Das Script

[autoit]

#include <ButtonConstants.au3>#include <GUIConstantsEx.au3>#include <ListViewConstants.au3>#include <ProgressConstants.au3>#include <StaticConstants.au3>#include <WindowsConstants.au3>

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

$pingcheck = Ping("www.google.de")If @error Then MsgBox(0,"Internet", "Du hast keine verbindung zum Internet! Bitte verbinde dich mit dem Internet um dieses Tool zu benutzen!") Exit
EndIf

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

$Form1_1 = GUICreate("Form1", 547, 513, 192, 117)$Button1 = GUICtrlCreateButton("Donate", 352, 464, 65, 25, $WS_GROUP)$Progress1 = GUICtrlCreateProgress(24, 392, 497, 25)$Group1 = GUICtrlCreateGroup("Vorschau", 24, 112, 497, 257)GUICtrlCreateGroup("", -99, -99, 1, 1)$Button2 = GUICtrlCreateButton("Download", 24, 448, 97, 25, $WS_GROUP)$Label1 = GUICtrlCreateLabel("Texturenpack #", 24, 424, 80, 17)$Label2 = GUICtrlCreateLabel("Größe #", 120, 424, 43, 17)$Label3 = GUICtrlCreateLabel("# %", 256, 424, 30, 17)$ListView1 = GUICtrlCreateListView("Name |Größe |Auflösung", 24, 16, 497, 89, -1, BitOR($WS_EX_CLIENTEDGE,$LVS_EX_TRACKSELECT))GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 50)GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 50)GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 2, 50)$ListView1_0 = GUICtrlCreateListViewItem("Texturenpack1|20MB|64x64", $ListView1)$ListView1_1 = GUICtrlCreateListViewItem("Texturenpack2|30MB|32x32", $ListView1)GUISetState(@SW_SHOW)

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

While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit
Case $ListView1_0GUICtrlCreatePic("C:\Users\Christian\Desktop\minecraftlogo.jpg", 40, 136, 465, 217, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
EndSwitchWEnd

[/autoit]

Teare

Flyff Privatserver wa?

Teare

Danke nochmal, chip

Kann geclosed werden!

Teare

Also nochmal ich mochte es soo:

Ich habe das Programmm, welches bei Programmstart die Links aufruft.
Da ich die neuen Links nicht immer wieder neu adden mochte, (in dem Quellcode) und das Programm dann als "neue" version zum download geben möchte, würde ich es gerne so machen:

Programm start
Programm liest Links aus einer txt oder ini oder was auch immer im Internet
Programm öffnet die links mit ShellExecute("http://google.de")
Das wars

Alternativ würde auch gehen
Programm start
Programm lädt die liste runter
Programm öffnet die links mit ShellExecute("http://google.de")

Das Wars

Beiträge von Teare

Problem mit bunten Progressbars

Vollbild

Wert aus einer Variable in GuiCtrlSetData anzeigen.

Paint.DE - Ein kleiner Ansatz

mini spiel

Hilfe mit UDF

Inputbox löschen

Hilfe mit UDF

Texturenpack Downloader

Texturenpack Downloader

Texturenpack Downloader

Texturenpack Downloader

Texturenpack Downloader

Texturenpack Downloader

Texturenpack Downloader

Einlesen von Dateipfaden und Dateikonvertierung

Texturenpack Downloader

.exe dateien in verschiedenen ordnern liegend öffnen

Datei aus dem internet auslesen?

Datei aus dem internet auslesen?