Simple-Scada forum

Simple-Scada 2 => Ваши вопросы => Тема начата: Олег Анатольевич от 19 Ноября 2024, 09:12:39

Название: Бегущая строка
Отправлено: Олег Анатольевич от 19 Ноября 2024, 09:12:39
День добрый. Как реализовать бегущую строку на экранной форме. Хочу выводить сообщения в таком виде
Название: Re: Бегущая строка
Отправлено: ARV от 19 Ноября 2024, 13:21:32
Например так.
Но, по-моему, это не красиво, не удобно и ресурсозатратно.
Название: Re: Бегущая строка
Отправлено: Олег Анатольевич от 19 Ноября 2024, 14:25:16
Код: (delphi)
Begin
   S.Value := Copy(S.Value, 2, Length(S.Value)) + Copy(S.Value, 1, 1);
   Text1.Text := S.Value;
   RunDelay(200, 1);
End;

Тоже ничего) Хочу красивее)
Название: Re: Бегущая строка
Отправлено: ARV от 19 Ноября 2024, 15:21:12
Ваш вариант скроллит по целой букве, что не фонтан на обычном (не дискретном) дисплее.
Мой скроллит попиксельно, но идеальной плавности не получается из-за самого движка скады.
Что красивее - вам решать.