[unit] TTextScroll

[shmia]

Zitat von Gerrit89:

Man kann alles auch noch auslesen anstatt setzen.
Einfach aus dem Set ein Get machen

Warum arbeitest du denn nicht mit Properties ??
Du verlierst mit Properties keine Geschwindigkeit gegenüber "normalen" Methoden.

Delphi-Quellcode:

  scroll.SetText('Der zu scrollende Text'); 
  // besser:
  scroll.Text := 'Der zu scrollende Text';

  scroll.SetDelay(1000); // Geschwindigkeite ( Standard 1000 ) 
  // besser:
  scroll.Delay := 1000;

  scroll.SetHandle(Form1.Handle) //Fensterhandle 
                                 //Funktioniert mit Edits, Buttons, Forms, Labels etc. 
  // Besser:
  scroll.Handle := Form1.Handle;

  scroll.SetStatus(True); //Ein oder aus ? Standard ist ein 
  // Besser:
  scroll.Visible := True;  // Unter Visible kann man sich mehr vorstellen, als unter SetStatus(True)