Здравствуйте, гость ( Вход | Регистрация )

 
Ответить в эту темуОткрыть новую тему
> Hint. Вывод динамического сообщения.
FREEON
сообщение 2.8.2018, 1:46
Сообщение #1


*****

Journeyman
Сообщений: 365
Регистрация: 14.2.2017
Группа: Пользователи
Наличность: 1319
Пользователь №: 18.346
Возраст: 25



Вопрос как можно повлиять на скорость смены показа строки? Есть ли какие команды, что бы управлять временем вывода оператора подсказки Hint? (IMG:style_emoticons/default/huh.gif) Или влиять можно только командой linedelay?
Код

if  KB.GetKeyState(q) = 1   // если нажали клавишу Q
    init_arr %rang 900 1050 1200 1350 1500 1650 1800 1950 2100 2250 2450 2650 2850 3050 3250 3500 3750 4000 4250 4500 4800 5100 5400 5700 6000  //
    set linedelay 50 //Установить скорость отображения сообщения
    for #j 1 size(%rang)
        set #a %rang [#j]
        hint  Ранг: #a
    end_for
    set linedelay 1 //Вернуть паузу меж.строк в рабочий вид
end_if
end_script

Забавно что с динамической подсказкой можно побаловаться меняя его цвет...конечно пользы никакой не нисет но забавен сам факт. Цвет можно указывать ввиде TColor или обычный color

Код

init_arr %rang 900 1050 1200 1350 1500 1650 1800 1950 2100 2250 2450 2650 2850 3050 3250 3500  3750  //
init_arr %fC clBlack clMaroon clMaroon clGreen clOlive clNavy clPurple clTeal clGray clSilver clRed clLime clBlue clYellow clFuchsia clAqua clWhite 10092441
set linedelay 50
for #j 1 size(%rang)
    set #a %rang [#j]
    set #b %fC [#j]
    hint (10 #b 1 1 (Ранг: #a  ))
end_for
set linedelay 1
end_script

Жаль ток что перебор с текстом сделать низя (IMG:style_emoticons/default/sad.gif)
fontColor - цвет шрифта

clBlack Черный
clMaroon Темно-бордовый
clGreen Зеленый
clOlive Оливково-зеленый
clNavy Темно-синий
clPurple Пурпурный
clTeal Морской воды
clGray Серый
clSilver Серебряный
clRed Красный
clLime Лимонно-зеленый
clBlue Синий
clYellow Желтый
clFuchsia Сиреневый
clAqua Голубой
clWhite Белый



Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
cirus
сообщение 2.8.2018, 2:10
Сообщение #2


**********

Elder
Сообщений: 3.480
Регистрация: 18.8.2014
Группа: Пользователи
Наличность: 26540
Пользователь №: 16.971
Возраст: 29



Проще wait добавить в цикл, чем играться с linedelay.
Если нужно убрать hint с экрана, не дожидаясь 5 сек, то вывести его за пределами экрана.
Цитата
Жаль ток что перебор с текстом сделать низя

Код
if  KB.GetKeyState(q) = 1   // если нажали клавишу Q
    init_arr %rang qwe rty asd fgh zxc vbn
    for #j 1 size(%rang)
        hint  Ранг: %rang [#j]
        wait 200
    end_for
end_if
wait 100
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
FREEON
сообщение 2.8.2018, 2:40
Сообщение #3


*****

Journeyman
Сообщений: 365
Регистрация: 14.2.2017
Группа: Пользователи
Наличность: 1319
Пользователь №: 18.346
Возраст: 25



Цитата(cirus @ 2.8.2018, 2:10) *

Проще wait добавить в цикл, чем играться с linedelay.

Сперва с wait и было перебирал всевозможные варианты и привел пример может линеделэй есть для хинта в пример.
Цитата
Если нужно убрать hint с экрана, не дожидаясь 5 сек, то вывести его за пределами экрана.

Конечно было бы хорошо...но как я увижу за пределами экрана (IMG:style_emoticons/default/laugh.gif)
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
cirus
сообщение 2.8.2018, 2:59
Сообщение #4


**********

Elder
Сообщений: 3.480
Регистрация: 18.8.2014
Группа: Пользователи
Наличность: 26540
Пользователь №: 16.971
Возраст: 29



Код
init_arr %rang qwe rty asd fgh zxc vbn
for #j 1 size(%rang)
    hint  Ранг: %rang [#j]     // вывели хинт
    wait 200
end_for
hint (10 0 1920 0 -1 -1 (""))   // убрали с экрана
end_script
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения

Ответить в эту темуОткрыть новую тему
2 чел. читают эту тему (гостей: 2, скрытых пользователей: 0)
Пользователей: 0

 

- Текстовая версия | Версия для КПК Сейчас: 29.3.2024, 0:57
Designed by Nickostyle