TJvCustomTimeLine

type TJvCustomTimeLine = class(TJvCustomControl)

protected

  procedure AddToSelection(); overload;

  procedure SelectItems();

  procedure RemoveFromSelection();

  procedure ClearSelection;

  procedure SetAutoSize(); override;

  function ItemMoving(); virtual;

  procedure ItemMoved(); virtual;

  function ItemMouseMove(); virtual;

  procedure MouseDown(); override;

  procedure MouseUp(); override;

  procedure MouseMove(); override;

  procedure DblClick; override;

  procedure Click; override;

  procedure Paint; override;

  procedure DrawDragLine(); virtual;

  procedure MoveDragLine(); virtual;

  procedure VertScroll(); virtual;

  procedure HorzScroll(); virtual;

  procedure ItemClick(); virtual;

  procedure ItemDblClick(); virtual;

  procedure Resize; override;

  procedure Size; virtual;

  procedure SaveItem(); virtual;

  procedure LoadItem(); virtual;

  procedure MeasureItem(); virtual;

  procedure DrawItem(); virtual;

  procedure UpdateItem(); virtual;

  procedure UpdateItems; virtual;

  procedure UpdateItemHint();

  procedure Notification(); override;

  procedure CreateWnd; override;

  function GetDragImages; override;

  procedure SetHint(); override;

  property Align;

  property Color;

  property Year: Word; [rw]

  property Month: Word; [rw]

  property Selected: TJvTimeItem; [rw]

  property ShowHiddenItemHints: Boolean; [rw]

  property DragLine: Boolean; [rw]

  property ShowItemHint: Boolean; [rw]

  property AutoSize: Boolean; [rw]

  property HelperYears: Boolean; [rw]

  property MultiSelect: Boolean; [rw]

  property Flat: Boolean; [rw]

  property YearFont: TFont; [rw]

  property YearWidth: TJvYearWidth; [rw]

  property TopOffset: Integer; [rw]

  property ShowMonthNames: Boolean; [rw]

  property ShowSelection: Boolean; [rw]

  property ShowDays: Boolean; [rw]

  property FirstVisibleDate: TDate; [rw]

  property Images: TCustomImageList; [rw]

  property Items: TJvTimeItems; [rw]

  property ItemHeight: Integer; [rw]

  property VertSupports: Boolean; [rw]

  property HorzSupports: Boolean; [rw]

  property SupportsColor: TColor; [rw]

  property Style: TJvTimeLineStyle; [rw]

  property TopLevel: Integer; [rw]

  property ScrollArrows: TJvScrollArrows; [rw]

  property OnItemClick: TJvTimeItemClickEvent; [rw]

  property OnItemDblClick: TJvTimeItemClickEvent; [rw]

  property OnSize: TNotifyEvent; [rw]

  property OnHorzScroll: TScrollEvent; [rw]

  property OnVertScroll: TScrollEvent; [rw]

  property OnDrawItem: TJvDrawTimeItemEvent; [rw]

  property OnMeasureItem: TJvMeasureTimeItemEvent; [rw]

  property OnSaveItem: TJvStreamItemEvent; [rw]

  property OnLoadItem: TJvStreamItemEvent; [rw]

  property OnItemMoved: TJvItemMovedEvent; [rw]

  property OnItemMouseMove: TJvItemMouseMove; [rw]

  property OnItemMoving: TJvItemMovingEvent; [rw]

  procedure DoAutoAdjustLayout(); override;

public

  procedure ScaleFontsPPI(); override;

  constructor Create(); override;

  destructor Destroy; override;

  procedure NextYear;

  procedure PrevYear;

  procedure NextMonth;

  procedure PrevMonth;

  function ItemAtPos(); virtual;

  function LevelAtPos(); virtual;

  function DateAtPos(); virtual;

  function PosAtDate(); virtual;

  procedure AutoLevels(); virtual;

  procedure LoadFromFile(); virtual;

  procedure SaveToFile(); virtual;

  procedure LoadFromStream(); virtual;

  procedure SaveToStream(); virtual;

  procedure BeginUpdate; virtual;

  procedure EndUpdate; virtual;

  procedure SetBounds(); override;

  procedure BeginDrag();

  property ScrollEdgeOffset: Integer; [r]

end;

TJvCustomTimeLine

TJvExCustomControl

TObject