Timer in App feststellen möglich ?

[turboPASCAL]

Hi,

gibt es eine Möglichkeit festzustellen ob und ggf. wie viele Timer ein Programm hat bzw. verwendet ?

[mkinzler]

Wie meinst du das? Die Anzahl von Instanten von TTimer?

[turboPASCAL]

Nein, angenommen ein Prg. hat 5 Timer am laufen, kann man das feststellen ?

[mkinzler]

Ich versteh es immer noch nicht ganz, was du meinst. Dich interessiert die Anzahl von Timern, die gerdae aktiv sind?

[turboPASCAL]

Jupp. Bzw. Wie viele ein Programm gerade benutzt.

[mkinzler]

Delphi-Quellcode:

   for i := 0 to self.ComponentCount-1 do
   begin
   self.Components[i].ClassName = 'TTimer' then
      if (self.Components[i] as TTimer).Enabled then
         inc(anz);

Liefert dir die Anzahl aktiver Timer
Und dieses dann für alle Forulare um die Timer aller fenster zu bekommen.

[turboPASCAL]

Äh, ja für eine Zählung der Timer in einer App. (intern), mich iteressiert aber die Anzahl der Timer die zB. der Windows Explorer "verbraucht".

[mkinzler]

Ob du da rankommst? Wär doch ne Frage an Olli oder Luckie.

[Olli]

Also mir ist nichts bekannt, was das ermöglichen würde - außer natürlich unser allseits beliebtes API-Hooking. Eine Anwendung ala "ApiSpy" könnte da von Nutzen sein, indem sie die Anzahl von SetTimer()-Aufrufen zählt.

[himitsu]

Na ja, man könnte sich ja erstmal eine Liste aller Fenster (welcher zur Anwendung gehören) besorgen
und dann bei jedem Fenster alle TimerIDs testen, ob auch ein entsprechender Timer existiert.

Es würde halt nur etwas dauern

Wobei dort dann jeder Timer, der gefunden wird auch aktiv ist.
(TTimer erstellt ja auch nur einen, wenn es aktiv ist und beim Deaktivieren wird der Timer wieder freigegeben)