dfwfoldpanel.pas

dfw控件组V0.62

{******************************************************************************}
{          This unit is part of the Delphifreeware component package.          }
{                                                                              }
{ Filename           : DFWFoldPanel.pas                                        }
{ Short description  :                                                         }
{ Author             : Erol S. Uzuner                                          }
{ E-Mail             : [e-mail]                                           }
{ Internet           :                                                         }
{ Version            : 1.3                                                     }
{ Date last modified : 04/26/00                                                }
{ Delphi versions    :                                                         }
{                                                                              }
{                                                                              }
{ Add. Copyright     : Copyright (C) 1996-2000                                 }
{                                                                              }
{ Description        :                                                         }
{                                                                              }
{ Usage              :                                                         }
{                                                                              }
{ Revision history   : 08.09.97 TDFWFoldPanelClient als ClientWindow eingef黨rt}
{                      09.09.97 Die Komponente wurde auf den CLientWindow      }
{                               angepasst.                                     }
{                      11.09.97 Jetzt auch lauff鋒ig auf Delphi 2, wenn DELPHI3}
{                               definiert ist wirds es f黵 Delphi3 compiliert  }
{                      11.09.97 FoldPosition eingefuegt.                       }
{                      16.09.97 Wenn Collapsed kann die Hoehe nicht veraendert }
{                               werden.                                        }
{                      16.01.99 Das ClientWindows wurde zu einem TDFWPaneles   }
{                               umgewandelt.                                   }
{                      24.02.99 Fehler beim ausl鰏en von On- und BevorExpand/  }
{                               Collapse beseitigt                             }
{                      31.03.00 Bartosz Dzido, BUG-Report and Fix              }
{                               If you collapse the Panel and change align     }
{                               from alClient to alTop and change the size too,}
{                               something went wrong with minimizing the Panel }
{                               M- Modifications are Marked with (BD 31.03.2000)}
{                      31.03.00 Erol S. Uzuner   Added Property -              }
{                               CollapsedHeight (request by Richard Chang)     }
{                      31.03.00 Erol S. Uzuner   Fixed Bug with                }
{                               BitmapChange-Event and ActiveGlyphs            }
{		       26.04.00 Erol S. Uzuner  Added Timer to catch           }
{                               unregistered Mouse-Leave                       }
{                               Added Orientation all changes marked with      }
{                               (ESU 000426)                                   }
{                                                                              }
{                                                                              }
{ This unit contains the following                                             }
{ Components       : TDFWFoldPanel                                             }
{ Classes          : TDFWFoldPanelClient                                       }
{ Types            : TFoldStatus,TFoldPosition,TFoldClickEvent,TFoldOrientation}
{ Constants        : MINIMUM_COLLAPS_SIZE                                      }                    
{ Global variables :                                                           }
{ Global procedures:                                                           }
{ Global functions :                                                           }
{                                                                              }
{******************************************************************************}
{                                                                              }
{  DFW and Delphifreeware