Zitat von
Nils_13:
Der Timer ist dazu gut, schnell sachen zu aktualisieren.
Es hat mit keinem der Vorschläge zu tun, es tritt so oder so auf.
Wäre es so nicht deutlich schneller, besser und eleganter?
Delphi-Quellcode:
procedure TForm1.UpdateLabel;
begin
Label1.Caption := PageControl1.ActivePage.Caption;
end;
procedure TForm1.PageControl1Change(Sender: TObject);
begin
UpdateLabel;
end;
// Prozedur, die die Caption der TabSheets ändert
procedure blubb;
begin
// ...
UpdateLabel;