Unit Formpage

Classes

TDefaultShowThread -
TFormPages -
TPageControlExternalPages -
TPageForm -
TPageFormClass -
TPageFormInfo -
TPseudoThread -
TScaleForm -
TShowThread -
TStartThread -
TTabbedNotebookExternalPages -
TThreadForm -

Functions

Register -

Types

TScaledBy

Constants

MAXNBKPAGES
StartThreadPriority
UM_DestroyThread
UM_RESETCURSOR
UM_SETFOCUS
UM_SIZE
UM_SIZE_MAXIMIZED
UM_SIZE_RESTORED

Variables


Functions


procedure Register;


Types


TScaledBy = record
M : Integer;
D : Integer;
end;
or tpIdle ?

Constants

MAXNBKPAGES = 16

$DEFINE DontUseThread} This helps to save resources using a notebook. Use this software as freeware. The only thing I ask you is that if you find any bugs, please E-Mail me! Christoph Kirchner, ckirchner@geocities.com Based on a program by David Obber: > Thanks to 3k Computer Consultancy for useful hints. > David Obber, MC8783@mclink.it Changed by Neil Peters, petersn@cadvision.com: Bugfixes and support for the PageControl object ------------------------------------------------------------------ DISCLAIMER ------------------------------------------------------------------ Use this software at your own risk. I won't be held responsible for anything that goes wrong.

StartThreadPriority = tpLower

UM_DestroyThread = WM_USER + 1105

UM_RESETCURSOR = WM_USER + 1104

UM_SETFOCUS = WM_USER + 1103

UM_SIZE = WM_USER + 1100

Maximum number of pages = 16

UM_SIZE_MAXIMIZED = WM_USER + 1101

may have problem here, related to non-unique message number conflicts or something - sorry I can not figure the problem out yet.

UM_SIZE_RESTORED = WM_USER + 1102


Variables