Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by himitsu,
8. Mär 2012
Daß einzige Problem an Application.On... := ...; ist...
Versuch dieses Ereignis mal mehrmals zu verwenden. Auch einige Fremdkomponenten hängen sich gerne an sowas dran.
Darum wurde TApplicationEvents auch erfunden, auch wenn dieses echt bescheuert implementiert ist.
(nämlich ewbenfalls auch auf diese Events, anstatt es Delphiintern direkt zu verbinden)
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by himitsu,
7. Mär 2012
Oder lagere den Code in einen Timer aus (Timer-Interval etwas länger, als das OnClick-Interval).
Im OnClick wird dann nur Timer.Enabled:=False; Timer.Enabled:=True; ausgeführt.
Im OnTimer dann Timer.Enabled:=False; und danach der eigentliche Code.