Laufschrift flüssig bewegen

[SkyLord]

Hallo,

ich will mit Delphi 5 ein Programm schreiben in dem sich auf der Oberfläche flüssig eine Laufschrift bewegt.
Die Schrift ist in einem Label drin.
Wenn ich das ganze mit einem Timer mache dann läuft es total ruckelig, weil der Timer ja bekanntlicherweise nur in gewissen Abständen die Befehle ausführt.

Wäre echt nett wenn jemand eine Lösung weiß.

Vielen vierlen dank

[Chewie]

Schreib einen Extrathread, der in einer Endllosschleife die Schrift bewegt (evtl. mit einem kurzen Sleep drin, damits nicht so flackert).

[SkyLord]

Sorry, aber das sagt mir jetzt überhaupt nichts.
Wäre nettt von dir wenn du (oder jemand anders) sich kurz die Mühe machen würde und den Befehl hier hinschreiben würde und mir sagen könnte wo ich den einfügen muss.

Danke nochmal

[Christian Seehase]

Moin Skylord,

such' hier mal nach Ticker
Da sollte was passendes für Dich dabei sein.

[Robert Marquardt]

Vermutlich machst du mit den Buchstaben des Labels rum. Ein Timer ist naemlich nicht prinzipiell ruckelig. Er muss nur schnell genug laufen.
Vorne Buchstabe weg und hinten dran ist immer ruckelig, da die Buchstaben unterschiedlich breit sind. Das gibt eine unangenehme Bewegung.

[SkyLord]

Hallo.
Also dieser Befel hier löst eigentlich genau mein Problem:

Text := Copy (Label4.Caption,2,length(Label4.Caption)-1)+
Label4.Caption[1];
Label4.Caption := Text;


Dabei ist jetzt allerdings noch ein neues PRoblem aufgetaucht:
Meine Laufschrift lautet: 'Hallo Freunde'.
In der Laufschrift sieht das ganze jetzt so aus: 'Hallo FreundeHallo FreundeHallo Freunde'.
Ich möchte aber gerne, dass zwischen dem Freunde und dem neuen Hallo immer 5 Leerzeichen
stehen.

Versteht ihr das Problem?

Habt ihr eine Lösung? Ich finde nichts.

danke

[Jens Schumann]

Hallo,
dafür habe ich mir vor einiger Zeit mal eine Komponente gebastelt.

[SkyLord]

Hallo Jens,

dein Programm ist echt Super.
Ich kann den Quelltext allerdings überhaupt nicht nachvoll ziehen, weil ich noch nicht so fit in Delphi bin.
Ist es nicht möglich, dass du mir den Befehl den ich dafür brauche nicht einfach hinschreibst?

Oder weiß jemand anders rat?

Ich brauche das unbedingt für nächsten Montag, weil ich dann mein referat für die Schule abgeschlossen haben muss.

Vielen Dank für eure Unterstützung

[Jens Schumann]

Hallo SkyLord,
in der Datei komponente.zip ist die Komponente. Diese musst Du installieren.
Die Namen der Eigenschaften im Objektinspektor sind hoffentlich selbsterklärend.
Die Befehle sind in dem Testprojekt.

Wie man eine Komponente installiert findet man in der Delphi-Hilfe.

[Alexander]

@SkyLord Hast du auch das Intervall des Timers relativ gering eingestellt, denn dann sollte es eiegntlich nicht ruckeln.
Sonst kuck dir auch mal die JEDI-Komponenten-Sammlung an, da müsste auch solch eine Komponente bei sein.