Unit WinRoll |
===========================================================================*) (* TWinRoller *) (*---------------------------------------------------------------------------*) (* *) (* New Property *) (* *) (* Enabled: Boolean Enable TWinRooler *) (* Roller: Boolean Rollup/Rolldown window *) (* Visible: Boolean Roller button visible *) (* OnRoller: TRollerNotifyEvent *) (* *) (*---------------------------------------------------------------------------*) (* Environment: *) (* Windows 95 *) (* Delphi 2.0 *) (* *) (* Author: Sean Hsieh *) (* E-Mail: sean@mail.linkease.com.tw *) (*===========================================================================
Classes |
Functions |
Register -
Types |
Constants |
Variables |
Functions |
Types |
TRollerMode = ( mdRollDown, mdRollUp );
TRollerNotifyEvent = procedure ( Sender: TObject; mode: TRollerMode ) of object
Constants |
Variables |