Бегущая строка Опции

[Dead.MorozZ]

Подскажите как сделать в Делфе бегущую строку в обычном Лейбле

[#$# PaVeL #$#]

Попробуй копировать и удалять первый символ и вставлять его в конец.
Понимаю что способ неочень, однако, работает!
Иногда очень хорошо выглядит, но для постоянного спецэффекта - плох.

[Gothic_Snake]

Код

var
  s:string;
begin
  s:=label1.caption;
  s:=copy(s,2,length(s))+s[1];
  label1.caption:=s;
end;

попробуй это..

Gothic_Snake, это чем-то отличается от совета, который дал #$# PaVeL #$#? Тогда покажи, чем...

Volvo, по-моему GS просто проилюстрировал кодом совет #$# PaVeL #$#.

Там был предложен метод, я его реализовал и все...

Сообщение отредактировано: Gothic_Snake - 22.01.2006 23:21

[Dead.MorozZ]

У меня такая ситуация строка полностью не влазет в метку, поэтому решил сделать ее бегущей.
Как можно сделать бегущую строку по типу как в WinAmp'e. Чтоб после того, как последняя часть строки выползла процесс пошел в другую сторону(строка побежала обратно) а добежав до другого конца снова поворачивала и т.д. ...

[hardcase]

У меня такая ситуация строка полностью не влазет в метку, поэтому решил сделать ее бегущей.
Как можно сделать бегущую строку по типу как в WinAmp'e. Чтоб после того, как последняя часть строки выползла процесс пошел в другую сторону(строка побежала обратно) а добежав до другого конца снова поворачивала и т.д. ...

Я перемещаю битмапик по PaintBox'у. В принципе этот код можно в компоненту зашить.
Смотри проект.

Сообщение отредактировано: hardcase - 21.01.2006 1:51

[Dead.MorozZ]

А как можно сделать тоже самое с TLabel, а с PaintBox медленно работает, а мне нужа бег. строка как постоянный эффект??

[hardcase]

Ты скорость измени и/или период таймера.
А с Лэйблом - криво получается.
А там, где вызывается PaintBox1.Refresh можно поставить закраску обычным прямоугольником. PaintBox1.Canvas.Rectangle(PaintBox1.ClientRect)

Сообщение отредактировано: hardcase - 21.01.2006 19:36

[Gothic_Snake]

А как можно сделать тоже самое с TLabel, а с PaintBox медленно работает, а мне нужа бег. строка как постоянный эффект??

TPaintBox работает очень быстро, и позволяет, в отличии от TLabel, рисовать без мерцания.

[does viagra help premature ejacu]

Amoxicillin For Pets

[nishaknapp]

Why not settling on games that is fun and at the same time your earning. Well it'll make suspense because the game is well but dude just try it and it gave me hope while pandemic is real rn. 3 Things You Need to Know before Playing at Online Casinos