G
GenoTIP
Гость
Помогите наложить radiobox на картинку так, чтобы он появлялся на картинки, а не только когда на него наводишь (желательно, чтобы фон самого RB использовал картинку что под RB, то есть в результате получить хотелось бы картинку, а на ней точка и текст)
+ вопрос оп поводу RB, если я динамично вывожу RB в гуи, как определить id того RB, что выбран для дальнейших действий. спасибо
man.txt переименуйте в html
+ вопрос оп поводу RB, если я динамично вывожу RB в гуи, как определить id того RB, что выбран для дальнейших действий. спасибо
Код:
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
Opt("GUICoordMode",1)
$exit_lastline = 0
$line_count = 0
Dim $art_arr[1] = ['Массив артов']
$file = FileOpen("man.html", 0)
While $exit_lastline <> 1
$line = FileReadLine($file)
If @error = -1 Then $exit_lastline = 1
$line_count += 1
$art_find = StringRegExp($line,"Арт: (\d+)",3)
if @error = 0 Then _ArrayAdd($art_arr,$art_find[0])
WEnd
$U_artcout = UBound($art_arr)-1
;~ _ArrayDisplay($art_arr)
FileClose($file)
#Region ### START Koda GUI section ### Form=c:\my documents\allscripts\textil_admin\form.kxf
$Form1_1 = GUICreate("Админка для textil.tom.ru", 468, 321, -1, -1)
$Combo1 = GUICtrlCreateCombo("Combo1", 8, 8, 201, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
$isint_count = 1
$iLine = 1
$save_column = -1
For $iColumn = 1 To $U_artcout
$save_column +=1
GUICtrlCreateRadio($art_arr[$iColumn], 52*$save_column, 52*$iLine, 48,10)
$Pic1 = GUICtrlCreatePic(@ScriptDir & "\start.gif",52*$save_column, 52*$iLine, 48, 48)
If IsInt($iColumn / 9) Then
$save_column = -1
$iLine += 1
EndIf
Next
$Button1 = GUICtrlCreateButton("Редактировать", 216, 8, 83, 23)
$Button2 = GUICtrlCreateButton("Удалить", 304, 8, 59, 23)
$Button3 = GUICtrlCreateButton("Добавить", 401, 8, 59, 23)
$Button4 = GUICtrlCreateButton("Назад", 329, 288, 59, 23)
$Button5 = GUICtrlCreateButton("Вперёд", 401, 288, 59, 23)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
man.txt переименуйте в html