Komponente mit Lines erstellen

[Nalincah]

wie muss ich den "type" deklarieren wenn ich sowas wie Lines haben will (Wie beim Memo). Damits verständlicher wird:

Delphi-Quellcode:

type
  TTreffpunkt = (tpBahnhof, tpBushalteStelle, tpZOB, tpTaxiStand);

Ergibt DropDownList mit den Einträgen

Delphi-Quellcode:

type
  TTreffpunkt = set of (tpBahnhof, tpBushalteStelle, tpZOB, tpTaxiStand);

Ergibt Untermenü mit den Einträgen (True/False) wie bei Font.

Wie geht das mit Lines????