dfwdockmanpro.pas

dfw控件组V0.62

{******************************************************************************}
{          This unit is part of the Delphifreeware component package.          }                                                                              
{                                                                              }
{ Filename           : dfwDockManPro.pas                                       }
{ Short description  :                                                         }
{ Author             : Christopher Sansone, Meteor Technologies Inc            }
{ E-Mail             : [e-mail]                             }
{ Internet           : http://www.meteortech.com/ScholarSoft                   }
{ Version            : 1.02                                                    }
{ Date last modified : May 05, 2000                                            }
{ Delphi versions    : works with Delphi 4 and 5 only                          }
{                                                                              }
{                                                                              }
{ Add. Copyright     :                                                         }
{                                                                              }
{ Description        : Tired of Delphi's boring dock bars?                     }                                   
{                      While Delphi's implementation is adequate for docking   }
{                      toolbars, the functionality is lacking when docking     }
{                      other controls.                                         }
{                      TDFWDockManagerPro creates a new DockManager to replace }
{                      Delphi's DockManager.                                   }
{                      Rather than displaying only two grab-bars and a close   }
{                      button, TDFWDockManagerPro also displays a gradient     }
{                      background, text, and has a fully customizable          }
{                      appearance!                                             }
{                                                                              }
{ Usage              : To use it, simply drop a TDFWDockManagerPro onto a form }
{                      and set the Control property to the control that will   }
{                      become the dock site.  After that, select the other     }
{                      properties:                                             }
{                      Font: the font of the caption                           }
{                      CaptionStartColor:  the starting background color for   }
{                                          the caption bar                     }
{                      CaptionEndColor:    the ending background color for the }
{                                          caption bar.                        }
{                      TransparentButton:  whether the close button should be  }
{                                          transparent or not                  }
{                                                                              }
{                      The text displayed in the caption bar of the control is }
{                      the control's Hint. To change the text, simply change   }
{                      the Hint property.                                      }
{                                                                              }
{                      The Refresh method re-paints the dock site.  You will   }
{                      need to call this if you change the Hint property and   }
{                      want to update the caption bar.                         }
{                                                                              }
{ Revision history   : 1.0  : -Initial Release                                 }
{                      1.01 : -Fixed calculation that caused the splitter not  }
{                              to split if it was clicked within one pixel of  }
{                              the splitter's edge                             }
{                             -Fixed calculation that would incorrectly resize }
{                              a control when it was split a small amount      }
{                      1.02 : -fixed paint method, the X now paints correctly  }
{                             -added OnDockClose Event                         }
{                             -some flickering removed                         }
{                             -added ButtonBackColor and ButtonFontColor       }
{                              properties                                      }
{                                                                              }
{ This unit contains the following                                             }
{ Components       : TDFWDockManagerPro                                        }
{ Classes          :                                                           }
{ Types            :                                                           }
{ Constants        :                                                           }
{ Global variables :                                                           }
{ Global procedures:                                                           }
{ Global functions :                                                           }
{                                                                              }
{******************************************************************************}
{                                                                              }
{  DFW and Delphifreeware