(************************************************************************)
(*                                                                      *)
(*                           TLdCheckGroupBox                           *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
    CheckBoxGroupBoxѡ״̬ʱGroupBoxеĿؼǿõģǲõġ

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   Checked: Boolean; TCheckBoxCheckedԣΪTrueʱؼڵĿؼã򲻿ã
   State: TCheckBoxState; TCheckBoxState÷ͬ
2. ¼
   OnCheckedChange: ѡıѡ״̬ʱ




(************************************************************************)
(*                                                                      *)
(*                            TLdDBNavigator                            *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
    ԶͼꡢֵDBNavigatorؼ

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   Captions: TStrings; ؼаťʾ֣
   FlatBorder: Boolean; TSpeedButtonFlatԣͬǣΪTrueʱ״̬°ťķSpeddButton.Flat=TrueʱָͬťʱťΪͨťΪFalseʱťͬSpeedButtonİťעֻFlatΪTrueʱЧ
   Images: TImageList; ָһTImageListؼָÿťͼꣻ
   Layout: TButtonLayout; ťͼֵλðţ÷ͬTSpeedButtonLayoutԣ
   ShowCaption: Boolean; ťǷʾ֣
   ShowGlyph: Boolean; ťǷʾͼꡣ




(************************************************************************)
(*                                                                      *)
(*                            TLdEditManager                            *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
    ɿƴ뽹ת˳

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   EMList: TEMList; TEMListһ࣬ؼColumnsԣڸԵԱ༭ָת˳򣻿ɶԡϼͷ¼ͷسָͬת˳
2. ¼
   OnBeforeJump: TEMBeforeJump; 뽹תǰΪӵ뽹Ŀؼ
   OnAfterJump: TEMAfterJump; 뽹ת󴥷Ϊתӵ뽹Ŀؼ


  TEMBeforeJump = procedure (AControl: TWinControl) of Object;
  TEMAfterJump = procedure (AControl: TWinControl) of Object;




(************************************************************************)
(*                                                                      *)
(*                            TLdGlyphButton                            *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
    ͼΰťؼָ״ָ̬갴ʱͼƬƽɽ2001еİťЧ

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   Picture: TPicture; ״̬µͼΣ
   PictureDown: TPicture; 갴ʱͼΣ
   PictureOver: TPicture; ָʱͼΡ




(************************************************************************)
(*                                                                      *)
(*                               TLdImage                               *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
    ȱ׼TImageؼһƽ̹ܡ

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   Tile: Boolean; ǷƽͼΣͼĴССڿؼСʱԽͼƽ̡




(************************************************************************)
(*                                                                      *)
(*                              TLdKalendar                             *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
    һؼʾ̨һЧФꡢ֧£ЧڷΧ1901-1-12050-12-31ָյɫɫһͼָĳһʱӴʾͨ¼û˫ڡ
    LdClockʹõľǸÿؼԵhttp://soft.269.netLdClock

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   AutoSize: Boolean; ǷԶڿؼС
   Bitmap: TBitmap; ָһͼ
   Date: TDate; ڣؼΪָǡ족Ĭϵģ족ʹɫʾģ
   Options: TLdKalendarOptions; ָؼʾݣlkoYang: ʾ, lkoYin: ʾ, lkoMonthTitle: ʾ·, lkoWeekTitle: ʾ, lkoShengXiao: ʾФ, lkoGanZhi: ʾ֧£
   FontNumber: TFont; ʾ壻
   FontTitle: TFont; ʾ·ݡ֧¡Ф壻
   FontWord: TFont; ʾ壻
   FontWeek: TFont; ʾڵ壻
   HSpace: Integer; еļࣻ
   VSpace: Integer; еļࣻ
   Border: Integer; ؼԵľ룻
   Space: Integer; ļࣻ
   SundayColor: TColor; ɫĬΪclRed;
   SaturdayColor: TColor; ɫĬΪclGreen;
   TodayColor: TColor; 족ɫĬΪclBlue;
   HolidayColor: TColor; յɫĬΪclRed;
   WeekString: String; ڵǰ׺ĬΪڡ
2. ¼
   OnClickDate: TLdOnClickDate; һʱ
   OnDblClickDate: TLdOnDblClickDate; ˫һʱ


  TLdOnClickDate = procedure (Sender: TObject; T: TDate; var DoClick: Boolean) of Object;
  TLdOnDblClickDate = procedure (Sender: TObject; T: TDate; var DoDblClick: Boolean) of Object;
  ˵
      Sender: ˫TLdKalendarؼ
      T: ˫ڣ
      DoClick(DoDblClick): ǷִOnClick(OnDblClick)¼




(************************************************************************)
(*                                                                      *)
(*                             TLdLabelEdit                             *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
   һ򵥵ģݵı򡣿Ϊơ֣ͣ㣨ֵ⻹뽹ת

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   ActiveNextKey: Word; ¸üֵļʱ뽹תһؼNextActiveControlָ
   BeepOnError: Boolean; ʱǷ壻
   InputType: TEditInputType; ͣitNone: , itNumber: ֻ, itFloat: ֻ֡С㡢ţֵֻ
   NextActiveControl: TWinControl; ActiveNextKeyָļֵʱ뽹תָĿؼΪգת
2. ¼
   OnError: TNotifyEvent; ʱ




(************************************************************************)
(*                                                                      *)
(*                             TLdMoneyLabel                            *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
   ʾĴдĻҽ磺ҼǪ

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   PointPrecision: Byte; Сλдʱ֧4λ
   LowerPrefix: String; ʾСдʱǰ׺Ĭǡ
   ShowType: TCurrencyShowType; ʾͣctNone: ʽʾValueʾCaptionֵ, ctUpper: ʾValueĴдʽ, ctLower: ʾValueСдʽ(#,###.00)
   UpperPrefix: String; ʾдʱǰ׺ĬǡRMB
   Value: Currency; ֵ
2. ¼
   OnError: TNotifyEvent; ʱ




(************************************************************************)
(*                                                                      *)
(*                              TLdNotebook                             *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
    ׼TNotebookؼǿؼʵڽɽ2001еķҳЧЧ˸ѡ

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   RollOrientation: TLdNbRollOrientation; ҳлʱĹϡϡϡҡ¡¡¡󹲰˸
   RollInterval: Integer; ʱʱ룩
   RollSpeed: TLdNbRollSpeed; ٶȣ1..200ֵҳÿƶ
   Rollway: TLdNbRollway; в롢Ƴͬʱ֡
2. ¼
   OnPageChanged: TNotifyEvent; ǰҳıԺ󴥷


  TLdNbRollOrientation = (nrNone, nrToLeft, nrToLeftTop, nrToTop, nrToRightTop, nrToRight, nrToRightBottom, nrToBottom, nrToLeftBottom);
  TLdNbRollway = (nrwInsert, nrwRemove, nrwAll);
  TLdNbRollSpeed = 1..200;




(************************************************************************)
(*                                                                      *)
(*                            TLdOutlookBar                             *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
    OutlookBarؼִ֧Сͼ꣬趨ָ갴״̬ͼꡢ塣

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   ActiveGroup: TLdOutlookGroup; ֻԣصǰ飨TLdOutlookGroup˵ں棩
   ItemDown: Boolean; SpeedButtonDownԣͬһڵĶItemĸΪTrueʱֻһItemڰ״̬
   ItemFont: TFont; ͼ갴ť壬Ĭϵأеͼ갴ťʹô壻Ϊÿͼ갴ťһTLdSpeedButtonؼԣҲͨʱı䰴ť壻
   GroupFont: TFont; 鰴ť壬Ĭϵأе鰴ťʹô壻
   GroupButtonHeight: Integer; 鰴ťĸ߶ȣĬ22
   GroupButtonTransparent: Boolean; 鰴ťǷ͸SpeedButtonTransparentԣ
   GroupImage: TImageList; ָһTImageListؼʹ鰴ťϿʾͼꣻ
   GroupIndex: Integer; ǰţԸıԶı䵱ǰ飻
   Groups: TLdOutlookGroups; бͨԷʵеĿ״̬ͨΪؼͼ갴ť
   ItemSpace: Integer; ͼ갴ť֮ļ
   LeftSpace: Integer; ֻʾСͼʱЧָͼؼԵľ룻
   ItemPopupMenu: TPopupMenu; ָҵͼ갴ťʱĵ˵
   GroupPopupMenu: TPopupMenu; ָҵʱĵ˵
   LargeImages: TImageList; ָһTImageListؼʾͼꣻ
   SmallImages: TImageList; ָһTImageListؼʾСͼꣻ
   ViewStyle: TLdOutlookViewStyle; ʾͼ껹Сͼꣻ
   TextWide: Byte; ʾͼʱť˵ĿȣַʹúʱָżֿȴڴֵʱֽУ
2. ¼
   OnClickGroup: TLdOlGroupClickEvent; 鰴ťʱǱ飨TLdOutlookGroup󣩣
   OnClickItem: TLdOlItemClickEvent; ͼ갴ťʱǱͼ갴ťTLdOutlookItem󣩣
   OnGroupChanged: TNotifyEvent; ıʱLdOutlookBarؼ
3. 
   procedure Frist; ʹһΪǰ飻
   procedure Prior; ʹһΪǰ飻
   procedure Next; ʹһΪǰ飻
   procedure Last; ʹһΪǰ飻
   procedure GotoGroup(Index: Integer); ͨIndexʹIndexΪǰ飻0ʼ
   procedure Refresh; ػǰͼ갴ť
   procedure RefreshAll; ػǰ鰴ťͼ갴ť
   procedure RefreshAllGroups; ػ鰴ťͼ갴ť

˵
============
//////////////////////////////////////////////////////////////////////////
/                                                                        /
/                          TLdOutlookGroups                              /
/                                                                        /
//////////////////////////////////////////////////////////////////////////
1. 
   Count: Integer read GetCount;
   Items[Index: Integer]: TLdOutlookGroup read GetItem;
2. 
   Clear; override;
   Delete(Index: Integer); override;
   Insert(Index: Integer; const S: string); override;
   Move(CurIndex, NewIndex: Integer); override;

ע
   ؼеÿItemͼ갴ťһTLdSpeedButtonؼӵԡ˿ɵĳһItemʹжͬʹø




(************************************************************************)
(*                                                                      *)
(*                            LdSpeedButton                             *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
    TSpeedButtonǿؼöFlat񣬿ָ갴ʱͼꡢ塣

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   AutoSize: Boolean; ǷԶС
   BorderStyle: TLdSpeedBorderStyle; ťľα߿ͼ껹ť
   DefaultFont: TFont; ťĬ壻
   DefaultGlyph: TBitmap; ťĬͼƬ
   DownFont: TFont; ťʱ壻
   DownGlyph: TBitmap; ťʱͼƬ
   FlatBorder: Boolean; FlatΪTrueʱЧ״̬£Ƿͻʾť
   OverFont: TFont; ָʱ壻
   OverGlyph: TBitmap; ָʱͼƬ
   OverBorder: Boolean; FlatΪTrueʱЧָťʱǷͻʾť
   WordWide: TWordWide; ťֵȣַʱԶУΪ0ʾơ


  TWordWide = Byte;
  TLdSpeedBorderStyle = (lsbWhole, lsbIcon);




(************************************************************************)
(*                                                                      *)
(*                             TLdTrayIcon                              *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
    ΪӦóͼĿؼ̬Ͷ̬

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   Active: Boolean; ΪTrueʱϵͳͼ꣬ӣ
   Enabled: Boolean; ΪFlaseʱͼ꽫Ӧ¼
   Hint: String; ָͼʱʾϢ
   Icon: TIcon; ʾͼ̬꣨
   Icons: TImageList; ָһImageListڲŶ̬ͼꣻ
   Animated: Boolean; ΪTrueʱö̬ܣã
   Interval: Word; ΪImageListбͼĲƵʣ
   PopupMenu: TPopupMenu; ҵͼʱĵ˵
   ShowAtDesign: Boolean; ״̬Ƿʾͼꡣ
2. ¼
   OnClick: TMouseEvent; ͼʱ
   OnDblClick: TNotifyEvent; ˫ͼʱ
   OnMouseMove: TMouseMoveEvent; ͬ¼ͬ
   OnMouseDown: TMouseEvent; ͬ¼ͬ
   OnMouseUp: TMouseEvent; ͬ¼ͬ




(************************************************************************)
(*                                                                      *)
(*                             TLdURLLabel                              *)
(*                                                                      *)
(*                   Ȩ (c) 2001 - 2002                     *)
(*                                                                      *)
(************************************************************************)

﹦ܽ
==========
    URLǩؼʵURLӹܡ

ӿ˵
==========
1. 
   AboutLd: ؼ汾ȨϢ
   URL : String; URLַ
