Прокрутка заголовка

[ZvEr_HaCkEr]

Всем привет.Необходимо реализовать прокрутку заголовка формы,но так чтобы он шел не сплошным текстом,а интервалом.То есть допустим заголовок идет так 1)form4form4form4,а надо так 2)form4(временной промежуток)form4.Как можно это сделать для 2 варианта?Для первого знаю вот

Procedure TForm1.Timer1Timer(sender:tobject);
begin
form4.caption:=ansimidstr(form4.caption,2,length(application.title)-1)+form4.caption[1];
end;

[chertovich]

Поясни, пожалуйсто, еще раз, а то я как-то не догнал кому это нужно)

[artemavd]

Бегущая строка чтоли нужна?

[Alex Cones]

Procedure TForm1.Timer1Timer(sender:tobject);
begin
form4.caption:=ansimidstr(form4.caption,2,length(application.title)-1)+form4.caption[1] + '          ';
end;

Так попробуйте, хотя я тоже ничего не понял.

[ZvEr_HaCkEr]

Сообщение от Alex Cones

Procedure TForm1.Timer1Timer(sender:tobject);
begin
form4.caption:=ansimidstr(form4.caption,2,length(application.title)-1)+form4.caption[1] + '          ';
end;

Нет не так.Так прокрутка начинается с первого символа заголовка+' 'Следующие символы.

Бегущая строка чтоли нужна?

Да.

[phphel]

http://forum.chertenok.ru/my_downloa...ion=show&id=22