UoKit.com Форумы > Hint. Вывод динамического сообщения.

Помощь - Поиск - Пользователи - Календарь

Полная версия: Hint. Вывод динамического сообщения.

FREEON

2.8.2018, 1:46

Вопрос как можно повлиять на скорость смены показа строки? Есть ли какие команды, что бы управлять временем вывода оператора подсказки Hint?

Или влиять можно только командой 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

Жаль ток что перебор с текстом сделать низя

fontColor - цвет шрифта

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

cirus

2.8.2018, 2:10

Проще 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

FREEON

2.8.2018, 2:40

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

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

Сперва с wait и было перебирал всевозможные варианты и привел пример может линеделэй есть для хинта в пример.

Цитата

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

Конечно было бы хорошо...но как я увижу за пределами экрана

cirus

2.8.2018, 2:59

Код

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

Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.