Rausfinden wie oft ein Programm läuft

[DeddyH]

Nach einem kurzen Blick in die Unit sollte das so funktionieren:

Delphi-Quellcode:

var
  test: TJclAppInstances;
begin
  test := TJclAppInstances.Create;
  try
    ShowMessage(IntToStr(test.GetInstanceCount));
  finally
    test.Free;
  end;

[DelTurbo]

Nein. Dort kommt dann "Undefinierter Bezeichner TJclAppInstances". Die Unit steht aber in uses drinne.

Mit JvAppInstances1.AppInstances.InstanceCount klappt es auch sehr gut. Ich merke mir den wert beim start des programms. Schon habe ich was ich wollte.

Nochmal danke....

[himitsu]

Wenn JvAppInstances1 geht, dann hast du vermutlich ein TJvAppInstances auf die Form gezogen?
Wenn ja, dann braucht man es natürlich nich nochmal manuell zu instantiieren.

PS: Es gibt TJclAppInstances und auch eine TJvAppInstances, welcher vermutlich auch in unterschiedlichen Units rumgammeln (Jcl ist das nichtvisuelle Jedi-CL und Jv ist die visuelle JEDI-VCL)

Zitat:

TJvAppInstance encapsulates the TJclAppInstance class

JvAppInstances1.AppInstances.GetInstanceCount oder vielleicht sogar sowas wie JvAppInstances1.GetInstanceCount