ComboBox mit eigenem Inhalt (Treeview, Checkbox etc)

[Assertor]

Hallo,

ich sitze jetzt gerade an einer Ableitung der T(Custom)ComboBox bzw. TTnt(Custom)ComboBox.

Ich weiß nur nicht, wie ich den Inhalt des Drop-Downs selber ersetzen kann...

Ziel ist es, daß das Drop-Down (also der aufgehende Bereich) eine Art Form ist, die andere Inhalte aufnehmen kann. Z.B. eine ChecklistBox oder ein Treeview.

Dafür muß natürlich auch verhindert werden, daß bei einem Click auf den Dropdown-Bereich die ComboBox gleich wieder zuspringt.

Was ich bisher gemacht habe: Google, Google Groups, DP und Torry durchsucht. Einiges gefunden, aber nicht genau das, was ich brauche. z.B. TCheckedComboBox von Tsourinakis Antonis. Leider hat diese Variante ein Problem mit der ComboBox, falls die Ecken des Parent Forms erreich werden (erfolgt kein Neuausrichten, sondern wird abgeschnitten).

Ich habe etwas ähnliches im ElPack gesehen, möchte das nicht wegen einer Komponente wieder einbinden...

ich dachte an was in Richtung:

Delphi-Quellcode:

TMyCheckComboBox = class(TTntComboBox) ... bzw. TComboBox
  private
    FListBox: TTntCheckListBox;
    ...
  protected
    procedure DropDown; override;
    ...
  public
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
  ...
end;

Im DropDown dann halt kein inherited. Aber das funktioniert nicht, selbst wenn ich im DropDown was mache, wird das ursprüngliche DropDown mit angezeigt und die Box geht gleich wieder zu.

Ich habe auch schon im OnDrawItem verschiedenes probiert. Jetzt habe ich alle Versuche gelöscht und fang noch mal von Vorne an...

Hoffentlich kann mir jemand helfen!

Gruß winkel79

[mojo777]

hi, also ich habe mich jetzt nicht explizit mit dem probloem beschäftigt, bin aber an einem bildchen einer
lösung interessiert ;)

naja. Schau dir mal in der Help-Datei den Eintrag
TCustomComboBox.OnDrawItem

Er wird dir sicherlich weiterhelfen!

Viele Grüße