Есть такая функция
Нужно отобразить в GUI $input4 данные полученные после StringRegExp $X_res, $Y_res и $farming_now
Ломал голову целый день, обыскал форум ничего не получается. :stars:
Когда я использую это все выходит в Array.
Код:
Func searchcoordfish()
$server = "w1."
_IENavigate($oIE2, "http://" & $server & "dwar.ru/hunt_conf.php")
_IELoadWait( $oIE2 )
$readbody = _IEBodyReadText ( $oIE2 )
$name_res = "Каменный карп"
$text_site_test = '<item num="21" name="Каменный карп" pic="m-karp2.gif" swf="fish_red.swf" prof="4" quality="0" skill="0" artikul_id="721" x="1069" y="237" farming="0" action_title=""/>'
$X_res = StringRegExp($readbody, '<item num=".*" name="'&$name_res&'" pic=".*" swf=".*" prof=".*" quality=".*" skill=".*" artikul_id=".*" x="(.*?)"', 1)
$Y_res = StringRegExp($readbody, '<item num=".*" name="'&$name_res&'" pic=".*" swf=".*" prof=".*" quality=".*" skill=".*" artikul_id=".*" x=".*" y="(.*?)"', 1)
$farming_now = StringRegExp($readbody, '<item num=".*" name="'&$name_res&'" pic=".*" swf=".*" prof=".*" quality=".*" skill=".*" artikul_id=".*" x=".*" y=".*" farming="(.*?)"', 1)
If $farming_now > 1 Then
Local $polojeniye_resursa_sbor = "Занят"
EndIf
If $farming_now = 0 Then
Local $polojeniye_resursa_sbor = "Свободен"
EndIf
GUICtrlSetData( $input4 , $name_res&" X:"&$xres&" Y:"&$yres&" Ресурс: "& $farmingnow )
EndFunc
Нужно отобразить в GUI $input4 данные полученные после StringRegExp $X_res, $Y_res и $farming_now
Ломал голову целый день, обыскал форум ничего не получается. :stars:
Когда я использую это все выходит в Array.
Код:
_ArrayDisplay( $x_res )
_ArrayDisplay( $y_res )
_ArrayDisplay( $farming_now )