Ist schon ein weilchen her, aber das dürfte nur per Code über die
Unit JvExplorerBarItems.pas mit den Klassenmethoden der Klasse TJvExplorerItemFactory funktionieren.
Mehr kann ich da aber nicht helfen.
Delphi-Quellcode:
TJvExplorerItemFactory = class(TObject)
public
class function ProgressBar(AGroup: TJvExplorerBarGroup; AMax, AMin, APosition: Integer): TJvExplorerGroupProgressBarItem;
class function SimpleProgressBar(AGroup: TJvExplorerBarGroup; AMax, AMin, APosition: Integer): TJvExplorerGroupSimpleProgressBarItem;
class function CustomProgressBar(AGroup: TJvExplorerBarGroup): TJvExplorerGroupCustomDrawProgressBarItem;
class function CustomBarItem(AGroup: TJvExplorerBarGroup): TJvExplorerGroupCustomDrawBarItem;
class function Menu(AGroup: TJvExplorerBarGroup; const ACaption: string;
AIdentifier, AIconIndex: Integer; const AWrap: Boolean = False): TJvExplorerGroupMenuItem;
class function Picture(AGroup: TJvExplorerBarGroup; AGraphic: TGraphic; AHotTrack, AStretch: Boolean;
AIdentifier: Integer): TJvExplorerGroupPictureItem;
class function Text(AGroup: TJvExplorerBarGroup; const ACaption: string; AFontColour: TColor;
AFontStyle: TFontStyles; AWrap: Boolean; AIconIndex: Integer; const AFontSize: Integer = 8;
AAligned: TAlignment = taLeftJustify): TJvExplorerGroupTextLineItem;
class function Spacer(AGroup: TJvExplorerBarGroup; AHeight: Integer = -1): TJvExplorerGroupSpacerItem;
class function Separator(AGroup: TJvExplorerBarGroup; AColor: TColor = -1): TJvExplorerGroupSeparatorItem;
class function Action(AGroup: TJvExplorerBarGroup; AAction: TAction; AImageList: TImageList): TJvExplorerGroupActionItem; overload;
class function Action(AGroup: TJvExplorerBarGroup; AAction: TAction; AIconIndex: Integer): TJvExplorerGroupActionItem; overload;
class function Category(AGroup: TJvExplorerBarGroup; const ACaption: string;
AFontColour: TColor; AFontStyle: TFontStyles; AUnderline: Boolean): TJvExplorerGroupCategoryItem;
class function Checkbox(AGroup: TJvExplorerBarGroup; const ACaption: string;
AChecked: Boolean = True; AEnabled: Boolean = True; AIdentifier: Integer = -1): TJvExplorerGroupCheckBoxItem;
class function RadioButtons(AGroup: TJvExplorerBarGroup; const AItems: TStrings; AIndex: Integer): TJvExplorerGroupOptionButtonsItem;
class function Button(AGroup: TJvExplorerBarGroup; const ACaption: string; AIdentifier: Integer): TJvExplorerGroupButtonItem;
class function MonthCalendar(AGroup: TJvExplorerBarGroup; const ACalendarDate: TDateTime): TJvExplorerGroupMonthCalendarItem;
end;