-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
10. Mär 2021
Die Komponente ist TChromeTabs.
Glaskugel-Raten ist natürlich ganz nett, aber wir spielen hier nicht Bingo, sondern entwickeln Software ... ähem. :zwinker:
Mir ging es ja von Anfang an darum, ob man die Ursache irgendwie systematisch ermitteln kann. Wenn es wie hier nicht mal den eigenen Code betrifft, ist es eben umso schwerer. Wie gesagt war AQTime dafür zumindest im Ansatz nicht verkehrt,...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
9. Mär 2021
Tut mir leid für die sehr späte Rückmeldung...
AQTime hatte mich nur bedingt weitergebracht. Da es leider nur Laufzeiten und nicht irgendeine Form von Auslastung misst (zumindest habe ich nichts dergleichen gefunden), hatte ich darin nur als Bestätigung erkennen können, welche Threads dauerhaft laufen. Das hatte ich im Grunde auch vorher schon eingrenzen können, aber nun hatte ich zumindest eine...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
10. Feb 2021
In meinem Projekt habe ich das nicht gefunden. Bei den Komponenten habe ich WM_NULL bei Indy nur in Kommentaren gefunden (wird ohnehin nicht automatisch nach dem Programmstart verwendet). Aber theoretisch könnte es ja auch als "0" und nicht als "WM_NULL" im Quelltext irgendwo enthalten sein.
Dann anders formuliert: Können 33 Null-Messages pro Sekunde Grund für eine Auslastung von 2-3% auf...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
10. Feb 2021
Sorry, ja, auch Msg.Msg.
So sieht der Log von OutputDebugString(PChar('### MSG App ' + GetTickCount.ToString + ' ' + Msg.Msg.ToString)); aus:
Debug Output: ### MSG App 1484513750 0 Process App.exe (16484)
Debug Output: ### MSG App 1484513781 0 Process App.exe (16484)
Debug Output: ### MSG App 1484513812 0 Process App.exe (16484)
Debug Output: ### MSG App 1484513843 0 Process App.exe...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
10. Feb 2021
Ich habe jetzt mal analysiert, wo/wie die Messages in der Anwendung verarbeitet werden. Es existiert eine zentrale Prozedur, wo alle Messages erst durchgehen:
Application.HookMainWindow(HookAppProc);
function TKlasse.HookAppProc(var Msg: TMessage): Boolean;
begin
OutputDebugString(PChar('### MSG App ' + Msg.WParam.ToString +'/'+ Msg.LParam.ToString)); //Das habe ich jetzt hinzugefügt...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
10. Feb 2021
Oh, vielen Dank! :o
Das zweite Video hatte ich also im Prinzip zuvor richtig verstanden und auch geschaut, was danach passiert. (dazu gleich mehr)
Das erste Video hat mir aber schon mal ein bisschen weitergeholfen.
Der Haupt-Thread (TID auch mit Process Explorer abgeglichen), der die Auslastung verursacht landet beim Anhalten immer hier:
win32u.NtUserWaitMessage:
762E10C0 B80C100100 ...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
10. Feb 2021
Keine Verwendung von MDI oder TAction.
Ich habe alle Timer, die im gesamten Projekt vorkommen (Fremdkomponenten ausgenommen), in die Watch List hinzugefügt und das Programm im Debugger im Leerlauf angehalten: Alle Timer sind entweder Enabled:=False oder Inaccessible value, da in nicht initialisierten Forms oder Objekten.
Threads werden theoretisch verwendet, aber nicht automatisch nach dem...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
10. Feb 2021
Nein, "leider" nicht.
Danke, dann werde ich das mal so machen und mich vorher erstmal zu AQTime einlesen. Hoffentlich komme ich damit auf den Grund.
Falls jemand noch einen anderen Ansatz weiß, was man z.B. direkt mit der Delphi IDE versuchen könnte, gerne her damit!
Oder wenn jemand noch eine Idee hat, was es mit der Stack-Info "TMethodImplementationIntercept" im Process Explorer auf...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
10. Feb 2021
Danke für den Hinweis. Aber verstehe ich das richtig, dass die Standard Version (die bei Delphi irgendwo dabei ist), zu Problemen in der IDE führt, aber die kostenpflichtige Pro Version nicht? Klingt irgendwie seltsam...
Oder gar nicht in die IDE integrieren, sondern (was wohl auch geht) von extern das kompilierte Programm analysieren? Aber da gehen doch ganz viele Möglichkeiten verloren, die...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
10. Feb 2021
Die Herstellerseite und dessen verschiedene Produktvarianten habe ich natürlich als erstes gesehen. Aber ich habe beim Weitersuchen auch gesehen, dass eine spezielle Version kostenlos bei der Delphi-Lizenz dabei ist. Wäre es nicht sinnvoller, die kostenfreie dauerhafte Version zu intallieren als eine 7-Tage-Trial? Da ich diese aus unbekannten Gründen nirgends finden kann, hatte ich die Hoffnung,...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
10. Feb 2021
Bitte keine Glaskugeln ... im Projekt selbst wird soweit ich das sehen kann, kein Quatsch gemacht. Vielleicht in irgendeiner der verwendeten Komponenten.
Ich brauche ein gezielte Möglichkeit, die Ursache herauszufinden.
Das allererste Stichwort hier "AQTime" scheint mir immer noch eine gute Möglichkeit zu sein und es müsste kostenfrei verfügbar sein, aber ich weiß einfach nicht, wo ich das...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
9. Feb 2021
Habe jetzt eine Weile mit dem Process Monitor draufgeschaut. Die Anwendung macht im minimierten Zustand rein gar nichts. Zumindest nichts, was sich dort anzeigen ließe.
Und ich habe natürlich keinen Idle-Loop, der auf eine Eingabe wartet, sonst wüsste ich ja, wo das Problem zu suchen ist. Falls irgendsowas in einer Delphi-Unit drin ist, wäre ja genau das herauszufinden.
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
9. Feb 2021
Wenn die Anwendung etwas tun soll, dann darf sie das auch. Hier tut sie im minimierten Zustand aber nichts.
Wenn das jeder Prozess im Hintergrund so tun würde, dann wäre die CPU dauerhaft ausgelastet. Alle anderen inaktiven (Hintergrund-)Prozesse sind ja konstant bei 0%. Warum dann meiner nicht? Warum ist das ein "angeblicher" Fehler? Eine Anwendung, die nichts tut und nicht sichtbar ist, darf...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
9. Feb 2021
Vermutlich könnte mir das weiterhelfen. Habe jetzt ein bisschen was dazu nachgelesen und ein Video bei YT angeschaut. Im GetIt sind 262 Pakete vorhanden, aber AQTime ist nicht darunter. Bei den Embarcadero Downloads finde ich nur Versionen für Delphi bis XE8.
Wo kriege ich denn eine funktionierende Standard Version für 10.3 her?
So wie ich das deute, handelt es sich ja um den Main-Thread,...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by CodeX,
8. Feb 2021
Ich habe hier ein relativ großes Delphi-Projekt vor mir, wo das Programm minimiert im Tray ohne jegliche Aufgabe eine dauerhafte CPU-Auslastung von 0,1% - 0,2% im Task-Manager anzeigt (andere im Hintergrund laufenden Anwendungen haben 0%). Das mag erstmal nicht schlimm erscheinen, aber normalerweise ist das ein Zeichen dafür, dass irgendetwas nicht passt und dann an anderer Stelle Probleme machen...
