TJvTFDaysTemplate

type TJvTFDaysTemplate = class(TPersistent)

protected

  FCompNamesChanged: Boolean;

  FGrid: TJvTFDays;

  FUpdatingCompNames: Boolean;

  FIgnoreNav: Boolean;

  procedure DoDateChangedEvent;

  procedure DoDateChangingEvent();

  procedure CompNamesChanged(); virtual;

  procedure CompNamesMoved(); virtual;

  procedure LinearDaysChanged; virtual;

  procedure BeginGridUpdate;

  procedure EndGridUpdate;

public

  constructor Create();

  destructor Destroy; override;

  procedure Assign(); override;

  procedure BeginCompNamesUpdate;

  procedure EndCompNamesUpdate;

  procedure UpdateGrid;

  property UpdatingGrid: Boolean; [r]

  property ApptGrid: TJvTFDays; [r]

published

  property ActiveTemplate: TJvTFDaysTemplates; [rw]

  property CompDate: TDate; [rw]

  property CompNames: TStrings; [rw]

  property IgnoreNav: Boolean; [rw]

  property LinearDayCount: Integer; [rw]

  property LinearEndDate: TDate; [rw]

  property LinearName: string; [rw]

  property LinearStartDate: TDate; [rw]

  property ShortTitles: Boolean; [rw]

end;

TJvTFDaysTemplate

TObject