Zitat von
Jelly:
Was soll denn der Quatsch mit dem Timer
Hallo,
das sehe ich genauso.
Zitat von
Jelly:
Hawkeye bietet doch die wunderbare Lösung. Also erstell dir eine neue Komponente, installier sie in ein
Package und nutze diese neue Label.
Zitat von
Hawkeye219:
Delphi-Quellcode:
type
TLabel = class (StdCtrls.TLabel)
Er braucht noch nicht mal eine Komponente installieren, denn alle TLabel die sich auf dem Formular befinden, haben jetzt schon das onChange Event.
Das Einzige was man jetzt noch mache muss, ist das onChange Event zur Laufzeit zuzuweisen. Das ist praktisch Copy & Paste Code.
Zitat von
Hawkeye219:
Delphi-Quellcode:
procedure TForm1.FormCreate (Sender: TObject);
begin
Label1.OnChange := LabelChanged;
end;