VPF::Мерцание текста в бегущей строке

Anikmar

Дата 17.2.2007, 00:58 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2513
Регистрация: 26.11.2006
Где: Санкт-Петербург

Репутация: 34
Всего: 59

Хм... А как проверять?

Может вам проще билдер поставить?

В общем то метод движения текста мне кажется достаточно громоздким (опустим навороты вроде автоматического определения размера шрифта при изменении размера панели).

У меня реализовано это буквально в несколько строк:

Код


void __fastcall TF_RunString::Timer1Timer(TObject *Sender)
{
   // Сначала пишу текст цветом фона
    Label1->Canvas->Font->Color = clBtnFace;
    Label1->Canvas->TextOutA(CurX,0,Str);
  // Сдвигаю позицию вывода
    CurX-=1;
    if (CurX < -(Label1->Canvas->TextWidth(Str))) CurX = Label1->Canvas->ClipRect.Width();
// Рисую текст нужным цветом
    Label1->Canvas->Font->Color = clBlack;
    Label1->Canvas->TextOutA(CurX,0,Str);
}

Естественно, можно обернуть в самостоятельный класс и т.п.
Но сам процесс движения происходит достаточно плавно - мерцание есть, но не раздражающее.

Mihey737

Дата 17.2.2007, 01:09 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 11
Регистрация: 15.2.2007

Репутация: нет
Всего: нет

Цитата(Anikmar @ 17.2.2007, 00:58)

Код


void __fastcall TF_RunString::Timer1Timer(TObject *Sender)
{
   // Сначала пишу текст цветом фона
    Label1->Canvas->Font->Color = clBtnFace;
    Label1->Canvas->TextOutA(CurX,0,Str);
  // Сдвигаю позицию вывода
    CurX-=1;
    if (CurX < -(Label1->Canvas->TextWidth(Str))) CurX = Label1->Canvas->ClipRect.Width();
// Рисую текст нужным цветом
    Label1->Canvas->Font->Color = clBlack;
    Label1->Canvas->TextOutA(CurX,0,Str);
}

Если человек который писал прогу, найдет время по вашему образцу исправить код, то я отпишу. Неплохо было бы если на форуме был человек у которого есть rxLib и FibPlus3. Может есть такой? smile

а то наврятли у меня получится добится того что бы человек исправил код по вашему шаблону...

FFFFFFF7

Дата 17.2.2007, 11:58 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 167
Регистрация: 13.10.2006

Репутация: 2
Всего: 2

Мне встречался подобный баг... Решил вопрос "методом тыка": выставил TransparentColor в труе и TransparentColorValue выставил в "левый" цвет.
Мерцания не стало.
Почему так - не знаю.
М.к. знает, интересно?

--------------------

Да помоги кодеру, а значит - ближнему своему!

Mihey737

Дата 18.2.2007, 08:50 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 11
Регистрация: 15.2.2007

Репутация: нет
Всего: нет

Помочь никто не желает? smile

Anikmar

Дата 18.2.2007, 17:00 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2513
Регистрация: 26.11.2006
Где: Санкт-Петербург

Репутация: 34
Всего: 59

Цитата(Mihey737 @ 18.2.2007, 08:50

)

Помочь никто не желает?

Да можно помочь, только условия слишком суровые (для меня).

Если вы хотите за деньги получить помощь - вам в центр помощи или в предложение работы.

Лично мне от вас деньги не нужны - я готов помочь и так, если смогу.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »