Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi [Erledigt]Hässlicher Effekt beim Scrollen (https://www.delphipraxis.net/185203-%5Berledigt%5Dhaesslicher-effekt-beim-scrollen.html)

rwalper 22. Mai 2015 09:15

AW: Hässlicher Effekt beim Scrollen
 
Hi, ich hatte einen ähnlichen Effekt (Paintbox auf Scrollbox). Mir hat dabei Folgendes geholfen:
Delphi-Quellcode:
var
  ExStyle: DWORD;
  ...
  Scrollbox.DoubleBuffered := false;

  ExStyle := GetWindowLong(Scrollbox.Handle, GWL_EXSTYLE);
  ExStyle := ExStyle or WS_EX_COMPOSITED
  SetWindowLong(Scrollbox.Handle, GWL_EXSTYLE, ExStyle);

Woodman 22. Mai 2015 11:02

AW: Hässlicher Effekt beim Scrollen
 
@Perlsau: Ich brauch aber das Panel, da ich darauf noch verschiedenes anderes platziere (Z.B. Label, Checkbox und natürlich das Image) und für ein komplettes Redesign habe ich jetzt keine Lust.:o


Zitat:

Zitat von rwalper (Beitrag 1302555)
Hi, ich hatte einen ähnlichen Effekt (Paintbox auf Scrollbox). Mir hat dabei Folgendes geholfen:
Delphi-Quellcode:
var
  ExStyle: DWORD;
  ...
  Scrollbox.DoubleBuffered := false;

  ExStyle := GetWindowLong(Scrollbox.Handle, GWL_EXSTYLE);
  ExStyle := ExStyle or WS_EX_COMPOSITED
  SetWindowLong(Scrollbox.Handle, GWL_EXSTYLE, ExStyle);

Na das ist aber ein tiefer Griff in die Trickkiste:lol:.
Ich habe keine Ahnung, was es bedeutet, aber es funktioniert.:thumb:
Dieser Trick bewirkt, dass das Verschieben des Scrollbalkens gebremst wird, aber damit kann ich Leben. Besonders in Verbindung mit dem vorher beschrieben Trick mit dem Scroll-Rad der Maus.

Ich Danke Euch für Eure Beiträge und betrachte die Sache für mich erledigt.:cheer:

Perlsau 22. Mai 2015 12:43

AW: Hässlicher Effekt beim Scrollen
 
Zitat:

Zitat von Woodman (Beitrag 1302566)
@Perlsau: Ich brauch aber das Panel, da ich darauf noch verschiedenes anderes platziere (Z.B. Label, Checkbox und natürlich das Image) und für ein komplettes Redesign habe ich jetzt keine Lust.:o

Deinen ersten Einwand habe ich bereits mit dem Hinweis, daß du in das Objekt TBild bei Bedarf noch weitere Komponenten aufnehmen kannst, widerlegt. Gegen den zweiten Einwand ist natürlich nichts zu sagen: Wenn du keine Lust dazu hast, kann dir selbige auch niemand verschaffen oder gar aufzwingen. Viel Erfolg.

himitsu 22. Mai 2015 12:46

AW: [Erledigt]Hässlicher Effekt beim Scrollen
 
Es wird einfach nur in MSDN-Library durchsuchenGWL_EXSTYLE das Flag MSDN-Library durchsuchenWS_EX_COMPOSITED aktiviert. (aktuelle Flags auslesen, das eine Flag setzen und dann zurückschreiben)

Und was das macht, das kann man natürlich im MSDN nachlesen. :zwinker:
https://msdn.microsoft.com/en-us/lib.../ff700543.aspx

Woodman 23. Mai 2015 16:24

AW: [Erledigt]Hässlicher Effekt beim Scrollen
 
Vielen Dank für die erhellende Worte.:-D

EWeiss 23. Mai 2015 18:38

AW: [Erledigt]Hässlicher Effekt beim Scrollen
 
Zitat:

Dieser Trick bewirkt, dass das Verschieben des Scrollbalkens gebremst wird, aber damit kann ich Leben.
Auch wen von dir schon als erledigt angesehen.

Warum wohl?
Schon mal auf die Auslastung deiner CPU geschaut?

Aktiviere DoubleBuffer in deiner Anwendung und dem Panel.
Hat das Panel kein DoubleBuffer dann erstell dir einen.

Zitat:

Die betreffenden Komponenten sind auf "DoubleBuffered=True" gesetzt.
Na ja ok hast du ja anscheinend schon.

Destotrotz WS_EX_COMPOSITED ist keine gute Lösung.

gruss


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:44 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz