Hallo liebe Community.
Ich habe nun ein Problem, und zwar ich lese aus Programmen Zahlen aus. Sie werden ins Laben reingeschrieben.
Wenn ich nun das Programm ausgewählt habe & die Zahlen dort stehen, soll wenn Sie sich verändern. In der Edit1 Box
Die Zeit stehen und z.B. "+ 4500" "-100" "+5100" , dass ich sehe wie viel ich + oder - gemacht habe
Hier mal mein Script. Es klappt alles , aber ich weiß nicht wie ich das Problem löse. Am besten mit Beispielen antworten
Edit: Es wird kein Bot oder ähnliches in der Art
Spoiler anzeigen
;= Gold + -
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <String.au3>
#include <StructureConstants.au3>
#include <Date.au3>
$GOLD = "148"
$vStaticChar = "144"
$Status = "0"
$vWinCount = 0
#Region ### START Koda GUI section ### Form=
$hGui = GUICreate("", 158, 226, 434, 374,$WS_SIZEBOX +$WS_EX_TOOLWINDOW+$WS_EX_TOPMOST+$WS_EX_WINDOWEDGE + $WS_EX_TOPMOST + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$List1 = GUICtrlCreateListView("", 0, 0, 155, 59,BitOR($LVS_LIST,$LVS_SHOWSELALWAYS,$WS_BORDER,$WS_VSCROLL))
_GUICtrlListView_SetExtendedListViewStyle($List1, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
$Label1 = GUICtrlCreateLabel("", 43, 114, 101, 18)
GUICtrlSetFont(-1, 10, 800, 0, "Transformers")
$Label2 = GUICtrlCreateLabel("Gold:", 60, 90, 34, 18)
GUICtrlSetFont(-1, 10, 800, 4, "Transformers")
$Button1 = GUICtrlCreateButton("Refresh", 12, 64, 131, 19, $BS_PUSHLIKE)
#EndRegion ### END Koda GUI section ###
$Edit1 = GUICtrlCreateEdit("", 16, 136, 129, 53, BitOR($ES_CENTER,$ES_AUTOVSCROLL,$ES_READONLY,$ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_WANTRETURN,$WS_BORDER,$WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE,0x8000000))
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlSetBkColor(-1, 0x696969)
$zeit = _NowTime()
GuiCtrlSetData($Edit1,"[" & $zeit & "]" & " ",@CRLF)
GuiCtrlSetData($Edit1, @CRLF , @CRLF)
GUICtrlSetFont(-1, 9, 400)
GUICtrlSetCursor (-1, 11)
GUISetState(@SW_SHOW)
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
Global $hListView1 = GUICtrlGetHandle($List1)
_StartListRefresh()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_StartListRefresh()
EndSwitch
WEnd
Func _StartListRefresh()
_GUICtrlListView_DeleteAllItems(GUICtrlGetHandle($List1))
$vWinCount = 0
$vWinList = WinList("[CLASS:wxWindowClassNR]")
For $i1 = 1 To $vWinList[0][0]
If StringInStr($vWinList[$i1][0], "[") And StringInStr($vWinList[$i1][0], "]") Then
$vWinCount += 1
$vCharname = ControlGetText($vWinList[$i1][1], "", "Static" & $vStaticChar)
$vWinCount = _GUICtrlListView_AddItem($List1, $vCharname)
EndIf
Next
EndFunc
Func WM_NOTIFY($hWnd, $iMsg, $iwParam, $ilParam)
#forceref $hWnd, $iMsg, $iwParam
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR, $tInfo
$tNMHDR = DllStructCreate($tagNMHDR, $ilParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView1
Switch $iCode
Case $NM_DBLCLK
$tInfo = DllStructCreate($tagNMITEMACTIVATE, $ilParam)
$vCharHandle = _SH_GetCharHandle(_GUICtrlListView_GetItemText($hListView1,DllStructGetData($tInfo, "Index")))
$vWinState = WinGetState($vCharHandle)
If BitAND($vWinState, 2) Then
GUICtrlSetData($Label1, _StringAddThousandsSep(ControlGetText($vCharHandle, "", "[CLASS:Static; INSTANCE:" & $GOLD & "]"), "."))
Else
GuiCtrlSetData($Label1,"")
GUICtrlSetData($Label1, _StringAddThousandsSep(ControlGetText($vCharHandle, "", "[CLASS:Static; INSTANCE:" & $Status & "]"), "."))
EndIf
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY
Func _SH_GetCharHandle($vName)
$vWinList = WinList("[CLASS:wxWindowClassNR]")
For $i5 = 1 To $vWinList[0][0]
If StringInStr($vWinList[$i5][0], "SApfel") And StringInStr($vWinList[$i5][0], "[") And StringInStr($vWinList[$i5][0], "]") Then
$vCharname = ControlGetText($vWinList[$i5][1], "", "Static" & $vStaticChar)
If $vName = $vCharname Then
Return $vWinList[$i5][1]
EndIf
EndIf
Next
Return -1
EndFunc ;==>_SH_GetCharHandle