Unit Bianco_Panel

Classes

TBiancoBMPMenu -
TBiancoPanel -

Functions

Register -

Types

TAllow
TButtonStyle
TJumpGryps
TJumpParent
TJumpPosition
TMenuAlign
TMenuPos
TShow
TWhoToMove

Constants

Variables


Functions


procedure Register;


Types


TAllow = set of (Down,MoveX,MoveY,ResizeX,ResizeY)

TButtonStyle=(bsOffice97,bsStandard);

TJumpGryps=(jgNone,jgKey,jgLight,jgUser);

TJumpParent=(jtBorder,jtClientArea);

TJumpPosition=(jpTopLeft,jpTopRight,jpBottomLeft,jpBottomRight,jpUser);

TMenuAlign=(maTop,maLeft,maBottom,maRight);
TBKind=(mkSquare,mkClient,mkUser);
TMenuPos=(mpLeft,mpCenter,mpRight,mpClient);

TShow = Set of (AtMovingTime,ResizeButton,JumpButton,MenuButton,TrasparentButtons)
\\\\\///// / _ _ \ (| (.) (.) |) _______________________________.OOOo__( )__oOOO.______________________________ | | | This is my Tcomponent | | Ciao Marco | | Email bianco@arcanet.it | | | | DATA: INIZIO: FINE: LAVORO: | | | | 18-08-97, 01:01:01, 03:33:36 INIZIATO A CONVERTIRE IL VECCHIO FILE. | | 18-08-97, 20:XX:XX, 23:47:13 AGGIUNTO LE PROPERTY: Allow*,Button*. | | 18-08-97, 23:59:55, 01:29:54 AGGIUNTO LA PROPERTY ShowAtMovingTime. | | 19-08-97, 01:35:26, 02:23:22 CONCLUSO POCO. | | 20-08-97, 00:34:21, 02:00:01 FATTO NIENTE. | | 22-08-97, 23:56:18, 01:21:51 AGGIUNTO I METODI E CREATO IL FILE HELP. | | 27-08-97, 12:48:11, 02:00:01 NUOVA VERSIONE. | | 27-08-97, 21:03:03, 22:44:11 PROPERTY ALLOWDOWN | | 28-08-97, 02:31:00, 03:16:09 PROPERTY BUTTONALIGN INIZIATA; | | 28-08-97, 14:07:55, 14:46:39 PROPERTY BUTTONALIGN FINITA; | | 28-08-97, 14:47:25, 15:19:31 PROPERTY SHOWCORNER; | | 28-08-97, 18:46:54, 19:55:25 RESIZE. | | 04-09-97, 01:25:22, 02:24:26 INI FILES. | | 05-09-97, 01:03:16, | 2nd | | 19-09-97, TOO LATE! AGGIUNTO FLOATING PANEL! | 3rd | | 13-10-97, PupUp Menu | |_______________________________.oooO__________________________________________| ( ) Oooo. \ ( ( ) \_) ) / (_/
TWhoToMove=(wmSelf,wmParent);

Constants


Variables