Hi @ all
habe mal wieder ein problem und zwar will ich das es für eine Anzahl an Prozesse jeweils ein eigenes Tab ertellt wird. Dies ist auch kein Problem sondern es sollen immer die gleichen Items im Tab stehen also z.b. in jedem Fenster eine prozssbar.
Mein zweites Problem ist wie ich z.b. für jeden einzelnen Tab die (jetzt in diesem beispiel) Prozessbar individuell einstellen kann.
Hoffe ihr könnt mir helfen. ![]()
Soweit bin ich:
GUI:
Spoiler anzeigen
$Form2 = GUICreate("Form1", 613, 418, 265, 208)
GUISetBkColor(0x99B4D1)
$Tab1 = GUICtrlCreateTab(8, 8, 377, 201)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
GUISetState(@SW_SHOW)
Funktion:
Spoiler anzeigen
Func _refresh()
Dim $infoarray[1][1] = [["0"]]
Local $error = 0
_GUICtrlTab_DeleteAllItems($Tab1)
Sleep(50)
$sro_client = ProcessList("sro_client.exe")
If $sro_client[0][0] <> 0 Then
ReDim $infoarray[$sro_client[0][0] + 1][2]
$infoarray[0][0] = $sro_client[0][0]
EndIf
If $sro_client[0][0]= 0 Then
$TabSheet1 = GUICtrlCreateTabItem("Error")
GUICtrlCreateLabel("Kein Client",28, 42, 75, 25)
GUICtrlCreateTabItem("")
EndIf
For $i = 1 To $sro_client[0][0]
_GUICtrlTab_InsertItem($Tab1,$sro_client[$i][0],"")
$Hide[$i] = GUICtrlCreateButton("Hide", 28, 42, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Show[$i] = GUICtrlCreateButton("Show", 116, 42, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Name[$i] = GUICtrlCreateButton("Name ändern", 204, 42, 91, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Prozessclose[$i] = GUICtrlCreateButton("Prozess beenden", 204, 74, 91, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Minimieren[$i]= GUICtrlCreateButton("Minimieren", 28, 74, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Uberprufen[$i] = GUICtrlCreateButton("Dc prüfen", 116, 74, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$HPbar[$i] = GUICtrlCreateProgress(84, 111, 230, 17)
$MPbar[$i] = GUICtrlCreateProgress(84, 143, 230, 17)
$Expbar[$i] = GUICtrlCreateProgress(84, 175, 230, 17)
GUICtrlCreateLabel("MP:", 28, 143, 23, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("HP:", 28, 111, 22, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("Exp:", 28, 175, 25, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$HP[$i] = GUICtrlCreateLabel("0%", 212, 111, 19, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$MP[$i] = GUICtrlCreateLabel("0%", 212, 143, 20, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Exp[$i] = GUICtrlCreateLabel("0%", 212, 175, 22, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("Position:", 324, 47, 44, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("X:", 324, 71, 14, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("Y:", 324, 95, 14, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$X[$i] = GUICtrlCreateLabel("X", 356, 71, 11, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Y[$i] = GUICtrlCreateLabel("Y", 356, 95, 11, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Next
GUICtrlSetState($refresh,$GUI_FOCUS)
EndFunc
Damit jetzt keine Beiträge kommen zum Thema "Bot-Coding", will ich euch sagen es ist zwar für ein Spiel, aber es bringt keinen spielerischen Vorteile! Deshalb denke ich das ist ok, oder? Wenn nicht sagt es mir.