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