TCheckBoxCreate
TCheckBoxCreate
Code:
FCheckBox:=CheckBoxCreate(WizardForm, alNone, taRightJustify, False, 'CheckBox Create', False, clBtnFace, True, crDefault, False, crDrag, dmManual, True, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, 'CheckBox Create Hint', True, True, True, True, True, nil, False, cbUnchecked, 0, True, 0, True, 20, 20, 200, 200, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
- CheckBoxGetParent(FCheckBox);
- CheckBoxGetAlign(FCheckBox);
- CheckBoxGetAlignment(FCheckBox);
- CheckBoxGetAllowGrayed(FCheckBox);
- CheckBoxGetCaption(FCheckBox);
- CheckBoxGetChecked(FCheckBox);
- CheckBoxGetColor(FCheckBox);
- CheckBoxGetCtl3D(FCheckBox);
- CheckBoxGetCursor(FCheckBox);
- CheckBoxGetDoubleBuffered(FCheckBox);
- CheckBoxGetDragCursor(FCheckBox);
- CheckBoxGetDragMode(FCheckBox);
- CheckBoxGetEnabled(FCheckBox);
- CheckBoxGetFontColor(FCheckBox);
- CheckBoxGetFontHeight(FCheckBox);
- CheckBoxGetFontName(FCheckBox);
- CheckBoxGetFontPitch(FCheckBox);
- CheckBoxGetFontSize(FCheckBox);
- CheckBoxGetFontStyle(FCheckBox);
- CheckBoxGetHelpContext(FCheckBox);
- CheckBoxGetHint(FCheckBox);
- CheckBoxGetParentBackground(FCheckBox);
- CheckBoxGetParentColor(FCheckBox);
- CheckBoxGetParentCtl3D(FCheckBox);
- CheckBoxGetParentFont(FCheckBox);
- CheckBoxGetParentShowHint(FCheckBox);
- CheckBoxGetPopupMenu(FCheckBox);
- CheckBoxGetShowHint(FCheckBox);
- CheckBoxGetState(FCheckBox);
- CheckBoxGetTabOrder(FCheckBox);
- CheckBoxGetTabStop(FCheckBox);
- CheckBoxGetTag(FCheckBox);
- CheckBoxGetVisible(FCheckBox);
- CheckBoxGetLeft(FCheckBox);
- CheckBoxGetTop(FCheckBox);
- CheckBoxGetHeight(FCheckBox);
- CheckBoxGetWidth(FCheckBox);
- CheckBoxGetBounds(FCheckBox);
Code:
- CheckBoxSetParent(FCheckBox, WizardForm);
- CheckBoxSetAlign(FCheckBox, alNone);
- CheckBoxSetAlignment(FCheckBox, taRightJustify);
- CheckBoxSetAllowGrayed(FCheckBox, False);
- CheckBoxSetCaption(FCheckBox, 'CheckBox Create');
- CheckBoxSetChecked(FCheckBox, False);
- CheckBoxSetColor(FCheckBox, clWindow);
- CheckBoxSetCtl3D(FCheckBox, True);
- CheckBoxSetCursor(FCheckBox, crDefault);
- CheckBoxSetDoubleBuffered(FCheckBox, False);
- CheckBoxSetDragCursor(FCheckBox, crDrag);
- CheckBoxSetDragMode(FCheckBox, dmManual);
- CheckBoxSetEnabled(FCheckBox, True);
- CheckBoxSetFontColor(FCheckBox, clBlack);
- CheckBoxSetFontHeight(FCheckBox, 20);
- CheckBoxSetFontName(FCheckBox, 'Segoe UI');
- CheckBoxSetFontPitch(FCheckBox, fpDefault);
- CheckBoxSetFontSize(FCheckBox, 20);
- CheckBoxSetFontStyle(FCheckBox, []);
- CheckBoxSetFont(FCheckBox, clBlack, 20, 'Segoe UI', fpDefault, 20, []);
- CheckBoxSetHelpContext(FCheckBox, 0);
- CheckBoxSetHint(FCheckBox, 'CheckBox Create Hint');
- CheckBoxSetParentBackground(FCheckBox, False);
- CheckBoxSetParentColor(FCheckBox, False);
- CheckBoxSetParentCtl3D(FCheckBox, True);
- CheckBoxSetParentFont(FCheckBox, True);
- CheckBoxSetParentShowHint(FCheckBox, True);
- CheckBoxSetPopupMenu(FCheckBox, nil);
- CheckBoxSetShowHint(FCheckBox, False);
- CheckBoxSetState(FCheckBox, cbUnchecked);
- CheckBoxSetTabOrder(FCheckBox, 0);
- CheckBoxSetTabStop(FCheckBox, True);
- CheckBoxSetTag(FCheckBox, 0);
- CheckBoxSetVisible(FCheckBox, True);
- CheckBoxSetLeft(FCheckBox, 20);
- CheckBoxSetTop(FCheckBox, 20);
- CheckBoxSetHeight(FCheckBox, 200);
- CheckBoxSetWidth(FCheckBox, 200);
- CheckBoxSetBounds(FCheckBox, 20, 20, 200, 200);
Code:
CheckBoxSetEvent(FCheckBox, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Last edited by DelphiBuilder; 24-12-2022 at 13:15.
|