Panel.Left > 32,767 ?

[Popov]

Zitat von Benmik:

Hallo Popov, tolles Beispiel! Vielen Dank für die Mühe!
Ein bisschen stört mich was dran, leider, nämlich, dass die Bilder auf der Stelle verharren und jeweils mit neuem Inhalt gefüllt werden.
Wenn sie richtig durch die Leiste wandern, gefällt mir das besser...

Anscheinend hast du dir das Beispiel nicht richtig angeguckt. Da verharrt nichts auf der Stelle und wird nur mit neuen Bildern gefüllt, das wäre zu einfach. Die Bilder werden bei jeder Änderung der ScrollLeiste entsprechend der Leistenposition neu gezeichnet. Es sieht also nur so aus.

Letztendlich war das nur ein Beispiel wie man es machen kann. Kleinwenig programmieren muss man schon selber. Mit drei kleinen Änderungen kann man eine flüssige Bewegung reinbringen.

[Benmik]

Hallo Popov, natürlich hast du Recht. Mit ein paar Anpassungen konnte ich jetzt den gewünschten Effekt erzielen. Im Moment bin dabei, die Bitmap größer als das Vorschaubild zu erstellen und um das Bild herum den Rand eines Panels zu zeichnen. Danke also nochmal.

Rein interessehalber würde mich trotzdem interessieren, ob man ein TPanel von TControl ableiten kann.

P.S: Habe gerade erst gesehen, dass Popov sich doch die Mühe gemacht hat, eine scrollbare Version einzustellen. Ich habe mir hier eine Version gebastelt, die JPG lädt und einen Rahmen um sie zeichnet. Klappt hervoragend, hätte ich, ehrlich gesagt, so nicht gedacht, dass das mit dem Zeichnen so schnell geht. Verbraucht so vermutlich deutlich weniger Ressourcen. Also nochmal danke.