Delphi-PRAXiS

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 FireMonkey Control erstellen: Scrollfähig, Ownerdraw? (https://www.delphipraxis.net/185424-firemonkey-control-erstellen-scrollfaehig-ownerdraw.html)

jaenicke 8. Jun 2015 20:10

FireMonkey Control erstellen: Scrollfähig, Ownerdraw?
 
Hallo,

ich habe mit der VCL und TScrollingWinControl als Basis eine eigene scrollbare selbst gezeichnete Liste von Objekten. Zum Beispiel einfach Rechtecke mit Text drin, aber es gibt auch verschiedene Zonen zum Klicken, Bilder usw., die dort gezeichnet werden.

Insbesondere kann man über Interfaces auf die Zeichenoberfläche zugreifen und eigene Inhalte aus DLLs heraus ergänzen.

Nun frage ich mich wie ich das am besten mit FireMonkey umsetze.
  • Muss ich eine Style Ressource benutzen?
  • Kann ich auch selber zeichnen?
  • Gibt es einen Vorfahren, der ähnlich wie TScrollingWinControl bereits die Scrollbalken enthält?
  • Hat vielleicht jemand ein Beispiel? (Die Doku ist ja nicht sonderlich ergiebig zu dem Thema...)

Danke schon einmal!
Schönen Gruß,
Sebastian

himitsu 8. Jun 2015 20:27

AW: FireMonkey Control erstellen: Scrollfähig, Ownerdraw?
 
Vielleicht von einer der beiden ScrollBoxen ableiten? Schon hättest du Scrollbalken. :stupid:

Nja, ich hatte letztes gesucht, wie man die Hintergrundfarbe eines Edits ändert und die Lösung war schon bissl krank.
Und OnPaint und OnPainting war ja nicht zu gebrauchen.
> 'nen CustomStyle erstellen, da ein TRectangle in den Hintergrund einfügen und dem die Farbe verpassen. :wall:

Also vielleicht auch noch bei TRectangle oder TImage reinschauen, wie das dort mit dem Malen geht.


Im Notfall einfach TScrollBox+TImage verwenden. :lol:

jaenicke 9. Jun 2015 10:04

AW: FireMonkey Control erstellen: Scrollfähig, Ownerdraw?
 
Zitat:

Zitat von himitsu (Beitrag 1304593)
Vielleicht von einer der beiden ScrollBoxen ableiten? Schon hättest du Scrollbalken. :stupid:

So weit hergeholt ist das gar nicht. Ich sehe gerade im Quelltext, dass die FMX TListBox von TScrollBox abgeleitet ist. ;-)
OnPaint funktioniert bei der Listbox auch problemlos... hmm, mal schauen.

Beispiele oder weitere Informationen sind aber trotzdem gerne gesehen. :cyclops:


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:02 Uhr.

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