' Rapid-Q by William Yu (c)1999-2000 . ' ================================================================================ ' Upload_il_tuo_script_su_Rapidq.it ' Qovalbtn ****** QOVALBTN Component ****** QOvalbtn is similar to QCoolBtn, except the button looks round/oval. QOvalbtn Properties Field Type R/W Default Support ================ ============== =============== =============== =============== Align INTEGER RW alNone W BMP STRING W W BMPHandle RESOURCE W W Caption STRING RW WX Color INTEGER RW WX ColorHighLight INTEGER RW W ColorShadow INTEGER RW W Cursor INTEGER RW crDefault W Down INTEGER RW False W Enabled INTEGER RW TrueTD>WX Flat INTEGER RW False WX Font QFONT W W GroupIndex INTEGER RW 0 W Height INTEGER RW WX Hint STRING RW WX Layout INTEGER RW blBMPLeft W Left INTEGER RW 0 WX NumBMPs INTEGER RW W Parent QFORM/QPANEL/ W WX QTABCONTROL ShowHint INTEGER RW False WX Spacing INTEGER RW W TabOrder INTEGER RW W Tag INTEGER RW WXG Top INTEGER RW 0 WX Transparent INTEGER RW False W TransParentColor INTEGER RW W Width INTEGER RW WX Visible INTEGER RW True WX QOvalbtn Methods Method Type Description Params Support =============== =============== =============== =============== =============== StartDrag SUB Allows Button 0 W to be dragged QOvalbtn Events Event Type Occurs when... Params Support =============== =============== =============== =============== =============== OnClick VOID User clicked on 0 WX the button OnMouseDown SUB (Button%, Mouse button 4 WX X%, Y%, Shift%) held down OnMouseMove SUB (X%, Y%, Mouse moves 3 WX Shift%) OnMouseUp SUB (Button%, Mouse button is 4 WX X%, Y%, Shift%) released QOvalbtn Examples CREATE Form AS QForm CREATE OvalBtn AS QOvalBtn Caption = "Oval Button" Color = &H00FF00 END CREATE ShowModal END CREATE ' =============================================================================== ' 2003 Holyguard.net - 2007_Abruzzoweb