Hab' die Komponente jetzt mehrmals neu erzeugt und installiert. Es wird zwar ein DropDown-Feld angezeigt, aber es stehen keine Werte zur Auswahl. Ich kann lediglich einen Index tippen.
Glaube aber nicht das es reicht einfach TImageIndex zu verwenden, irgendwie muss die
IDE ja auch wissen mit welcher ImageList sie die ImageIndex-Eigenschaft verbinden soll.
EDIT: Das hier ist ein Auszug aus TToolButton.
Delphi-Quellcode:
property ImageIndex: TImageIndex read FImageIndex write SetImageIndex stored IsImageIndexStored default -1;
procedure TToolButton.SetImageIndex(Value: TImageIndex);
begin
if FImageIndex <> Value then
begin
FImageIndex := Value;
if FToolBar <> nil then
begin
RefreshControl;
FToolBar.Perform(TB_CHANGEBITMAP, Index, Longint(Value));
if FToolBar.Transparent or FToolBar.Flat then Invalidate;
if not (csLoading in ComponentState) and (Style = tbsTextButton) then
FToolBar.RecreateButtons;
end;
end;
end;
function TToolButton.IsImageIndexStored: Boolean;
begin
Result := (ActionLink = nil) or not TToolButtonActionLink(ActionLink).IsImageIndexLinked;
end;