VCL Panel mit Buttons und Label

**zeras**

Ich möchte in meinem Programm verschiedene andere Programme starten. Das Starten ist kein Problem, nur möchte ich das dynamisch anzeigen, da es mehrere Programme sein können.

Im Anhang habe ich mal gezeigt, wie ich mir das für ein Programm vorstellen würde. Im Endeffekt würde mehrere solcher Objekte untereinander stehen.
Gibt es fertige Objekte, mit denen man das bewerkstelligen kann?
Ich hatte mit TListView experimentiert, aber da habe ich keinen Buttons anzeigen können.
Wichtig: VCL

**Delphi.Narium**

Scrollbox zur Aufnahme der "Panels".

Statt Panel ein Frame nehmen, das Buttons und Label enthält.

Pro Programm dann ein Frame in die Scrollbox.

Dem Frame kannst Du dann direkt alle Attribute und Prozeduren "verpassen", die den Aufruf ... der Programme steuern. Damit benötigst Du dann in dem Programm, das die Scrollbox enthält (im Idealfall) keinerlei Logik, Routinen ... zur Steuerung. Und die Aufrufe der Programme sind schön einzeln gekapselt.

Hallo,

evtl. reicht TButtonGroup

Gruß

**Uwe Raabe**

Könnte man auch relativ einfach mit einer TControlList machen. Beispiel im Anhang.

**zeras**

Zitat von Uwe Raabe:

Könnte man auch relativ einfach mit einer TControlList machen. Beispiel im Anhang.

Danke.

Das sieht sehr gut aus, eigentlich genau das, was brauche.

Ich werde das bei mir einbauen.

Ist nun eingebaut und funktioniert super. TControlList kannte ich noch nicht.

**ctavt**

Hallo,

ich bin auf ähnlicher Suche nach der Möglichkeit, eine Reihe dynamischer Buttons "horizontal", statt vertikal darzustellen.

Die TControllist bietet leider keine mir offensichtliche Möglichkeit, die Items horizontal, statt vertikal darstellen zu lassen.
Auch die Scrollbar kann nicht dementsprechend von links nach rechts, statt von Oben nach unten bewegt werden.

Ich finde die TControllist eigentlich ziemlich klasse, da ich dann nur die Button-Caption, sowie die OnClick-Prozedur zuweisen müsste für das Ereignis,
wenn auf den Button gedrückt wird.

Aktuell denke ich (da TControllist nicht für mich geeignet zu sein scheint), wieder auf TPanel ausweichen zu müssen und alles selbst zu zeichnen..

Wenn jemand auch hierfür einen Rat hätte, wäre ich sehr dankbar.

Mfg Chris

**himitsu**

Eine normale TListView kann man auch auf eine Spaltenansicht umschalten, aber geht bei der TControlList wohl nicht,
aber du könntes ja unter

quality.embarcadero.com einen Feature-Request erstellen und dann 7 Jahre warten.

TGirdPanel, TFolwPanel und andere T...Panel (im FMX heißen die Panel Layout)

**ctavt**

Hallo liebes Forum,

anbei ein paar selbst beantwortete Ergebnisse:

"Die TControllist bietet leider keine mir offensichtliche Möglichkeit, die Items horizontal, statt vertikal darstellen zu lassen."
- Hierzu gibt es die Eigenschaft ColumnLayout mit der Option "cltMultiLeftToRight".
Dies greift aber nur, wenn zusätzlich die Eigenschaft ItemWidth verschieden vom Default-Wert "0" gesetzt ist. (Bei 0 befüllt das Item die ganze Zeile, daher nie eine horizontale Scrollbar)

Weiter gehts mit der Suche

Jetzt wo das geschafft ist.. wäre interessant, ob das Spacing zwischen den Items identisch bleibt, wenn die darin platzierten Buttons verschiedene Textinhalte bekommen.

**PaPaNi**

Zitat:

Ich hatte mit TListView experimentiert, aber da habe ich keinen Buttons anzeigen können.

z.I. hier kann man nachschaeun, wie man Checkboxes malen kann (selber nicht getestet, aber auf dem ersten Blick sieht es OK aus). Und wenn man Checkbox malen kann, dann kann man auch die Buttons. Das ist nur ein anderer Parameter bei der DrawFrameControl Funktion.

https://stackoverflow.com/questions/...in-a-tlistview