TEffectPageControl, TMyEffectControl, TEffectForm 1.0 for Delphi 3.0 ================================================================== Overview -------- This components is for enhanced forms or windowed-controls. As you see in EXE-demo included, this component can make forms or controls show themselves beautifully. ** Please SEE THE DEMO INCLUDED!! ** This component is not freeware but *SHAREWARE*. You must buy this component for commercial use. See 'Order Information' of this text for buying. * register fee is US$ 50 (without source). ========================================== Author: ------- Sang-Hee, Kim E-Mail: ------- potpry@iname.com Installation ------------ In the delphi IDE, choose Components-Install Component item from the menu, select 'EffectPages.dcu, MyEffectControl.dcu' and click OK. There should be a new tab in the component palette named 'MyComponents'. Usage: ------ 1) TEffectForm =========== This is a form class inherited from 'TForm'(not component). So, you must change your form declaration as this, 'TForm1 = class(TForm)' --> 'TForm1 = class(TEffectForm)'. properties: . effect - values from -1 to 30('-1' means that select randomly from 0 to 30). . speed - values from 0 to MaxInt (means speed-delay. The resolution is not TICK(ms) but a few CPU cycles) . drawingunit - values from 1 to 100 (means the block size when painting) . flicker - boolean values(default is false) (If this value is true, the form do not lock screen. so, your desktop will repainted when painting finished. If false, the form lock screen. so, your apps and desktop do not repaint themselves - means no flicker. but, During painting your form, other changes of your screen is not updated - of course, when painting finished, they will be repainted) . RepaintControl, RepaintGraphic - boolean values(default is false) (if this values are true, when form painting is finished, your form repaints child controls. RepaintControl means All Controls. RepaintGraphic means only GraphicControl); *** If your form shows adnormally, change this this boolean values. *** the property 'WindowState' of TForm must be set to 'wsNormal', or will show abnormally *** I strongly recommend the property 'BorderStyle' be set 'bsNone' 2) TEffectPageControl, TEffectPage =============================== This component is very similar to TPageControl(TTabSheet). but, does not show tabs. (on this component, click right-button). properties: . effect, speed, drawingunit - same as above (TEffectForm) . RepaintGraphic(TEffectPage) - same as above (TEffectForm) 3) TMyEffectControl ================ This component is similar to above components but show selected control when the methos 'Show' is called. properties: . effect, speed, drawingunit - same as above (TEffectForm) . control - select a control on your form. method: . show - selected control's visible property must be false, otherwise nothing occur. when this method is called, the selected control shows as above (and the visible property is set true automatically) ** IMPORTANT By the limitation of GDI, this components and form don't draw perfectly or exactly. so, if any forms or controls are abnormally painted, you can change the properties 'RepaintGraphic' and 'RepaintControl' Bug-Reports: ------------ Please report any bugs or errors you found with detailed situation description to above-mentioned e-mail addresses. Order information: ------------------ * register fee is US$ 50 (without source). ========================================== Register by bank Transfer: ------------------------- Citibank(Korea, Olympic park branch) Bank Address: Lucky Securities Building, 184-1 Bangi-dong, Songpa-gu, Seoul, South Korea, 138-150 Account No.: 12-70-123816 Beneficiary(Depositor): Jin-Hyun, Park Mail Order: --------------- send a check or money to this address and recipient: address : Shinlim-9-dong , Kwanak-gu, 244-16, Seoul, South Korea, 151-019(postal-code) recipient : Sang-Hee, Kim *IMPORTANT* you MUST SEND E-MAIL to me with following information: name, compony, city, state, country e-mail address(MUST) --> I send registered version *ONLY* BY E-MAIL !! ============================================= Have Fun !!