Einzelnen Beitrag anzeigen

Benutzerbild von Woodman
Woodman

Registriert seit: 17. Mär 2007
74 Beiträge
 
Delphi 10.1 Berlin Starter
 
#12

AW: Hässlicher Effekt beim Scrollen

  Alt 22. Mai 2015, 12:02
@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.


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.
Ich habe keine Ahnung, was es bedeutet, aber es funktioniert.
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.
Keep
Horst
Delphi 10.1 Berlin Starter unter Windows 10 - 1803
  Mit Zitat antworten Zitat