Thema: Delphi Ticker-Text

Einzelnen Beitrag anzeigen

tretmine

Registriert seit: 6. Jan 2003
36 Beiträge
 
Delphi 4 Standard
 
#2

Re: Ticker-Text

  Alt 7. Jan 2003, 00:35
Zitat von Privateer3000:
Hoi,

wie stellt man es unter Delphi an einen String
als Ticker auf einem Form von links nach rechts wiederholt
durchlaufen zu lassen.
Ich hätte da nicht mal ne Idee?!
Eine kleine Idee:

Nimm ein Label und eine TTime-Komponente.
Das Intervall von TTime legst du auf einen geeigneten Wert (z.B.: 100ms)
Tritt das Ereignis ein -also der Timer hat 100ms geliefert- (OnTimer) veränderst du die Caption des Labels.
Du schneidest vorne ein Zeichen des Strings der Caption ab und setzt hinten ein Zeichen deines Testes hin. Das müsste mit einer Zählvariablen gut klappen.

Leider kann ich dir keinen Source liefern, da ich die Hilfe für ttimer.ontimer nicht ganz verstanden habe. Schau es dir mal an. Falls du weißt wie man ein "TNotifyEvent"(siehe "Hilfe") behandelt, dürfte es kein Problem mehr sein.

MfG Phil
klein, rund und explosiv!
  Mit Zitat antworten Zitat