Einzelnen Beitrag anzeigen

Der schöne Günther
Online

Registriert seit: 6. Mär 2013
6.159 Beiträge
 
Delphi 10 Seattle Enterprise
 
#1

TScrollingWinControl: Nicht dich, sondern dein Parent scrollen

  Alt 29. Nov 2013, 17:50
Die gute VCL und Multitouch.

Man nehme eine TScrollBox "Parent" und packe Dinge (beispielsweise TImages ) hinein. Zu scrollen funktioniert traumhaft.

Nun packe man aber TScrollingWinControl -Unterklassen (Die TScrollBox selbst ist auch eine) hinein. Wenn man den Inhalt der TScrollbox "Parent" verschieben will und dabei auf einem enthaltenten TScrollingWinControl-Element startet, tut sich nichts. Die Dinger scheinen den Aufruf zu fressen.

Wie kann das verhindern? Ich kann die enthaltenen TScrollingWinControl-Elemente (darunter Forms, Frames, ...) auf Enabled=False setzen aber das kann es ja auch nicht sein...

Wer es direkt ausprobieren will (geht natürlich nur mit Touch) findet die zwei DFMs im Anhang
Angehängte Dateien
Dateityp: zip TScrollingWinControl.zip (939 Bytes, 3x aufgerufen)
  Mit Zitat antworten Zitat