Что нового

Разный цвет текста в GUICtrlCreateList

Tuxzer92

Новичок
Сообщения
62
Репутация
0
Здравствуйте, как сделать так, чтобы в GUICtrlCreateList фон был черный, текст ошибок выводился красным, а текст успешного выполнения зеленым?
Я присваивал, но у меня весь текст был либо зеленым, либо красным, а отдельно не получается.
Извиняюсь. А можно еще сделать так: чтобы при запуске скрипта можно было нажать на кнопку и проигрывать аудио файл, но при этом чтобы можно было нажать на другие кнопки и скрипт выполнялся? Т.е. чтобы он одновременно мог проигрывать файл и выполнять сам скрипт? Я пытался, но когда запускал воспроизведение файла, то кнопки уже не работали, пока не остановишь музыку.
 

ra4o

AutoIT Гуру
Сообщения
1,164
Репутация
244
поменять цвет строки в ListView:
Код:
#include <GUIConstantsEx.au3>
#Include <GuiListView.au3>

$Form1 = GUICreate("Form1", 484, 192, 258, 187)
$hListView =  GUICtrlCreateListView ("Колонка 1:|Колонка 2:", 24, 16, 433, 97)
_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES, $LVS_EX_CHECKBOXES))
GUICtrlCreateListViewItem('A|A' , $hListView)
GUICtrlCreateListViewItem('B|B' , $hListView)
GUICtrlCreateListViewItem('C|C' , $hListView)

$btB = GUICtrlCreateButton("B", 200, 152, 75, 25)

GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $btB
            $iIndex=_GUICtrlListView_FindInText($hListView, 'B')
            $aParametr=_GUICtrlListView_GetItem($hListView, $iIndex)
            $ID=$aParametr[5]
            GUICtrlSetColor( $ID,0x00FF00)
    EndSwitch
WEnd
Т.е. чтобы он одновременно мог проигрывать файл и выполнять сам скрипт?
Как вы проигрываете файл ? Ведь функция "SoundPlay" с флагом по умолчанию не останавливает выполнение скрипта:
0 = (по умолчанию) продолжить выполнение скрипта немедленно
Можете проверить (только путь к аудио файлу не забудьте свой подставить) :
Код:
#include <GUIConstants.au3>

$hMain_GUI=GUICreate("",250,120)
$Button1=GUICtrlCreateButton('Play Sound',10,10,100,30)
$Button2=GUICtrlCreateButton('Add 1 to $i',10,50,100,30)
$Label=GuiCtrlCreateLabel('',120,20,100,50)
GUICtrlSetFont(-1,10,600)
GUISetState (@SW_SHOW)

Local $i=0
Local $MyAudioFile ='D:\********************.mp3'

while 1

   $msg1 = GUIGetMsg()
  Switch $msg1
     Case  $GUI_EVENT_CLOSE
	     Exit
	  Case $Button1
		  SoundPlay($MyAudioFile)
	  Case $Button2
		  $i+=1
		  GUICtrlSetData($Label,'$i= '&$i)
  EndSwitch

Wend
 
Верх