Hohe CPU Auslastung bei 64Bit Anwendungen

[EWeiss]

Ich versuche es noch einmal ohne über den Compiler zu schimpfen. :)
Die Ausgangssituation ist diese das die gleiche Anwendung gleicher Quelltext unter 32Bit 0% und mit 64Bit 25% Cpu Auslastung produziert.
Bei 32Bit könnt ihr die Geschwindigkeit auf Maximum stellen und es bleibt bei fast 0% Auslastung wenn die Durchsichtigkeit ausgeschaltet ist.

Was ich versucht habe.

Zitat:

Dort habe ich jetzt schon versucht MMTimer (Hochauflösender Timer vom MMSystem inkl. QueryPerformanceFrequency Callback usw.
Ein Sleep(0) oder Sleep(1) bringt auch nichts.
Den Timer auf 25ms zu setzen bremst das gesamte zeichnen aus.

Mein Problem ist zu ergründen warum das so ist.
Die Anwendung zum testen das es so ist kann man sich hier anschauen.

Es tritt nur dann auf wenn diese Funktion aufgerufen wird.

Delphi-Quellcode:

      if (ObjItem.angle <> 0) then
       begin
         GdipSetInterpolationMode(graphics, ObjItem.quality);

         GdipRotateWorldTransform(graphics, ObjItem.angle + 180, MatrixOrderAppend); //<<<< hier 
         GdipTranslateWorldTransform(graphics, xD + (wD div 2), yD + (hD div 2), MatrixOrderAppend); //<<<<< und hier

         GdipDrawImageRectRectI(graphics, img, wD div 2, hD div 2, -wD, -hD, xS, yS, wS, hS, 2, imgAttr,
           ImgAbort, nil);
       end else
       begin
         GdipSetInterpolationMode(graphics, ObjItem.quality);
         GdipDrawImageRectRectI(graphics, img, PosX, PosY, wD, hD, xS, yS, wS, hS, 2, imgAttr, ImgAbort, nil);
       end;

Das kann man leicht testen indem man einfach die "eigene Rotation und die 3D tiefe ausschaltet" beide Eigenschaften verwenden im etwas abgeänderte form die gleiche Funktion.

Meine Vermutung ist das dieses Problem von der GDIPlus 64Bit selbst verursacht wird oder aber wie zuvor schon öfters eine der Typen nicht korrekt für 64Bit definiert ist.

Vielleicht hat ja doch noch jemand eine Idee falls es an der Anwendung selbst liegt.
Bei der DLL werde ich es dann wohl selbst finden müssen obwohl ich nicht erkennen kann das es hier ein Type Problem geben könnte. (Etwas fehlt mir auch die Erfahrung ;) )

Hier noch dir Funktionen

Delphi-Quellcode:

GdipTranslateWorldTransform: function(Graphics: LONG_PTR; dx: Single; dy: Single; order: GpMatrixOrder): GPSTATUS; stdcall;
GdipRotateWorldTransform: function(Graphics: LONG_PTR; angle: Single; order: GpMatrixOrder): GPSTATUS; stdcall;

Die übergebenen Typen sind alle identisch..
Habe es auch schon mit Pointer versucht bringt keine Verbesserung.

gruss

[EWeiss]

Hat sich erledigt.
Jemand hat sich bereit erklärt das Problem zu analysieren. (Wenn es jemand kann dann er ;) )

Bei ihm ist die Auslastung 32Bit vs. 64Bit die gleiche so um 0 > 3 Prozent. (Win10)
Es scheint so das es nicht an Delphi (Compiler) sondern an meiner älteren Hardware liegt.
Das Problem ist bei mir unter 32Bit nie aufgetreten, warum es mit der 64Bit Version nicht geht, nun da bin ich nicht der Spezialist um das zu analysieren.
Es scheint tiefer zu gehen als der Code selbst.

Von daher denke ich das ich es so hinnehmen muss wie es ist.
Programmtechnisch gesehen kann ich auf die angesprochenen Funktionen die in GDIPlus verwendet werden keinen Einfluss nehmen.
GDIPlus64 <> GDIPlus32

PS:
Zumindest kann ich davon ausgehen das es nicht an meiner Programmierung oder den 64Bit Compiler von Delphi liegt. ;)

gruss

[Fritzew]

Schön das es geklärt ist,
hatte es gerade compilert und wollte da mal reinschauen.
Kann ich es mir sparen... ;-)

[EWeiss]

Zitat:

Zitat von Fritzew (Beitrag 1411833)

Schön das es geklärt ist,
hatte es gerade compilert und wollte da mal reinschauen.
Kann ich es mir sparen... ;-)

Da kannst du nicht reinschauen weil das Problem innerhalb der DLL zu finden ist.
Trotzdem Danke.

gruss

[Fritzew]

Jetzt ist es wohl klar........
Aber nur zur Info: Auf meinem Rechner pendeln beide Versionen zwischen 0 und 1 %

[EWeiss]

Zitat:

Zitat von Fritzew (Beitrag 1411836)

Jetzt ist es wohl klar........
Aber nur zur Info: Auf meinem Rechner pendeln beide Versionen zwischen 0 und 1 %

Hervorragend ;) Danke für die Info
Denke Win10 oder?

Bei mir auf dem Rechner Win7 wie schon gesagt 64Bit 25% andere 0.
Meine CPU Core2 Quad Q9650 3GHZ.

gruss

[Fritzew]

Grafikkarte:
NVidia QUADRO P600
Intel Core i7-8700K 3.7 Ghz
64 GB Ram
Windows 10 ja

[EWeiss]

Zitat:

Zitat von Fritzew (Beitrag 1411841)

Grafikkarte:
NVidia QUADRO P600
Intel Core i7-8700K 3.7 Ghz
64 GB Ram
Windows 10 ja

Ok PowerPC ;)
Meine Graka NVidia GTX 780 TI

Danke nochmals.

gruss

[EWeiss]

Sorry eins wollte ich noch nachfragen.
Wenn du das teil mit voller Leistung laufen lässt wie ist die CPU Auslastung dann?
Also alles an inklusive Speed auf Maximum.

Nebenbei bei mir auf Win10 externe Festplatte über USB 2 85% CPU Auslastung. :)
Bis mein System vollständig gestartet ist benötige ich etwa 10 Min.

gruss

[Fritzew]

Tja, pendelt bei beiden Version zwischen 3 und 4%
Das hast Du echt gut gemacht.
Wobei mein Rechner ja eher am oberen Rand anzusiedeln ist. Arbeite halt im CAD Bereich und da ist Speed alles.....