Unit mainwin |
/////////////////////////////////////////////////////////////////// // Copyright (c) 1997 Krzysztof A. Swiatkowski // mailto:hobbit@dom.vr.pl // http://www.vr.pl/~hobbit (coming soon) // FILE: mainwin.pas // // DATE: 1-10-1997 14:33:30 // // NOTES: This is a TSubClasser component example. // I wanted to keep this example as simple as possible so // there are two usage examples in this project. // // 1. Subclasser is used to provide MDIForm with a nice // background. It is flicker free because WM_ERASEBKGND // is totally overriden. See what happens if you move // Subclass1PreProcessMsg procedure to OnPostProcessMsg // event. Of course I wouldn't bother to show this // example if you could do it otherwise. Check for // yourself that neither OnPaint nor message handlers // in TMainWin provide you with that functionality. // There will be component posted on DSP that has only // that functionality. // 2. Check out title bar of the about box! This time // subclasser overrides post reaction on several // messages at once to draw centered caption with // bitmaps. // I'm sure you will find lots of other opportunities // to use this component // // ///////////////////////////////////////////////////////////////////
Classes |
Functions |
Types |
Constants |
Variables |
Functions |
Types |
Constants |
Variables |