Ja, bei mir geht DWM auf 2-4% bei folgender Routine (5 ms Timerinterval):
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
var
x, y : integer;
c : TColor;
begin
x := Random(ClientWidth);
y := Random(ClientHeight);
Canvas.MoveTo(x,y);
x := Random(ClientWidth);
y := Random(ClientHeight);
c := Random(High(TColor));
Canvas.Pen.Color := c;
Canvas.LineTo(x, y);
end;
Das hier ist wichtig:
Zitat von
MSDN:
Disabling DWM Composition
Note As of Windows 8, the information in this section is no longer valid. DWM can no longer be programmatically disabled, nor is it disabled when an application attempts to draw to the primary display surface. The following information applies to only Windows 7 and earlier systems.