Einzelnen Beitrag anzeigen

ReDoX
(Gast)

n/a Beiträge
 
#2

Re: Ticker erstellen (Text läuft durch)

  Alt 27. Feb 2005, 15:57
hi,
Herzlich willkomen in der Delphi-Praxis

Delphi-Quellcode:
var hilf,hilfbuchstabe: string;
begin
  hilf:= Form1.Caption;
  hilfbuchstabe:= hilf[1];
  delete(hilf,1,1);
  hilf:= hilf + hilfbuchstabe;
  Form1.Caption:= hilf;
  application.ProcessMessages;
end;
Das in das OnTimer event eines TTimer schreiben und fertig.

Mfg ReDoX
  Mit Zitat antworten Zitat