Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Программы » AutoIT (Часть 2)

Модерирует : gyra, Maz

Widok (01-06-2010 13:08): Лимит страниц. Продолжаем здесь.  Версия для печати • ПодписатьсяДобавить в закладки
На первую страницук этому сообщениюк последнему сообщению

   

ViSiToR



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору

Код:
#include <GUIConstantsEx.au3>
#include <GUIEdit.au3>
;
 
Opt("GUIOnEventMode", 1)
 
$Form = GUICreate("Только как пример", 524, 204, 203, 181)
GUISetOnEvent($GUI_EVENT_CLOSE, "Close")
 
$Edit = GUICtrlCreateEdit("", 8, 8, 249, 153)
GUICtrlSetColor(-1, 0xff0000)
GUICtrlSetFont(-1, 10, 800)
 
$Button1 = GUICtrlCreateButton("Добавить текст в поле Edit", 8, 168, 249, 25, 0)
GUICtrlSetOnEvent(-1, "AddEdit")
 
$List = GUICtrlCreateList("", 272, 8, 241, 149)
GUICtrlSetColor(-1, 0xff0000)
GUICtrlSetFont(-1, 10, 800)
 
$Button2 = GUICtrlCreateButton("Добавить текст в поле List", 272, 168, 241, 25, 0)
GUICtrlSetOnEvent(-1, "AddList")
 
GUISetState(@SW_SHOW)
 
While 1
    Sleep(30)
WEnd
 
Func
Close()
    GUIDelete($Form)
    Exit
EndFunc
 
Func
AddEdit()
    _GUICtrlEdit_AppendText($Edit, "Этот текс должен быть красным" & @CRLF)
    _GUICtrlEdit_AppendText($Edit, "Этот текс должен быть черным" & @CRLF)
EndFunc
 
Func
AddList()
    GUICtrlSetData($List, "Этот текс должен быть красным" & @CRLF, "-")
    GUICtrlSetData($List, "Этот текс должен быть черным" & @CRLF, "-")
EndFunc

Всего записей: 3251 | Зарегистр. 01-04-2006 | Отправлено: 22:15 20-04-2009 | Исправлено: ViSiToR, 22:22 20-04-2009
   

На первую страницук этому сообщениюк последнему сообщению

Компьютерный форум Ru.Board » Компьютеры » Программы » AutoIT (Часть 2)
Widok (01-06-2010 13:08): Лимит страниц. Продолжаем здесь.


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru