View Single Post
  #7  
Old 27-12-2022, 02:01
DelphiBuilder's Avatar
DelphiBuilder DelphiBuilder is offline
Registered User
 
Join Date: Dec 2022
Location: From Nowhere
Posts: 25
Thanks: 6
Thanked 41 Times in 19 Posts
DelphiBuilder is on a distinguished road
Post TGroupBoxCreate

TGroupBoxCreate

Code:
FGroupBox:=GroupBoxCreate(WizardForm, alNone, 'GroupBox Create', clBtnFace, True, crDefault, False, crDrag, dmManual, True, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, 'GroupBox Create Hint', True, True, True, True, True, nil, False, 0, True, 0, True, 20, 20, 200, 200, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
  • GroupBoxGetParent(FGroupBox);
  • GroupBoxGetAlign(FGroupBox);
  • GroupBoxGetCaption(FGroupBox);
  • GroupBoxGetColor(FGroupBox);
  • GroupBoxGetCtl3D(FGroupBox);
  • GroupBoxGetCursor(FGroupBox);
  • GroupBoxGetDoubleBuffered(FGroupBox);
  • GroupBoxGetDragCursor(FGroupBox);
  • GroupBoxGetDragMode(FGroupBox);
  • GroupBoxGetEnabled(FGroupBox);
  • GroupBoxGetFontColor(FGroupBox);
  • GroupBoxGetFontHeight(FGroupBox);
  • GroupBoxGetFontName(FGroupBox);
  • GroupBoxGetFontPitch(FGroupBox);
  • GroupBoxGetFontSize(FGroupBox);
  • GroupBoxGetFontStyle(FGroupBox);
  • GroupBoxGetHelpContext(FGroupBox);
  • GroupBoxGetHint(FGroupBox);
  • GroupBoxGetParentBackground(FGroupBox);
  • GroupBoxGetParentColor(FGroupBox);
  • GroupBoxGetParentCtl3D(FGroupBox);
  • GroupBoxGetParentFont(FGroupBox);
  • GroupBoxGetParentShowHint(FGroupBox);
  • GroupBoxGetPopupMenu(FGroupBox);
  • GroupBoxGetShowHint(FGroupBox);
  • GroupBoxGetTabOrder(FGroupBox);
  • GroupBoxGetTabStop(FGroupBox);
  • GroupBoxGetTag(FGroupBox);
  • GroupBoxGetVisible(FGroupBox);
  • GroupBoxGetLeft(FGroupBox);
  • GroupBoxGetTop(FGroupBox);
  • GroupBoxGetHeight(FGroupBox);
  • GroupBoxGetWidth(FGroupBox);
  • GroupBoxGetBounds(FGroupBox);
Code:
  • GroupBoxSetParent(FGroupBox, WizardForm);
  • GroupBoxSetAlign(FGroupBox, alNone);
  • GroupBoxSetCaption(FGroupBox, 'GroupBox Create');
  • GroupBoxSetColor(FGroupBox, clWindow);
  • GroupBoxSetCtl3D(FGroupBox, True);
  • GroupBoxSetCursor(FGroupBox, crDefault);
  • GroupBoxSetDoubleBuffered(FGroupBox, False);
  • GroupBoxSetDragCursor(FGroupBox, crDrag);
  • GroupBoxSetDragMode(FGroupBox, dmManual);
  • GroupBoxSetEnabled(FGroupBox, True);
  • GroupBoxSetFontColor(FGroupBox, clBlack);
  • GroupBoxSetFontHeight(FGroupBox, 20);
  • GroupBoxSetFontName(FGroupBox, 'Segoe UI');
  • GroupBoxSetFontPitch(FGroupBox, fpDefault);
  • GroupBoxSetFontSize(FGroupBox, 20);
  • GroupBoxSetFontStyle(FGroupBox, []);
  • GroupBoxSetFont(FGroupBox, clBlack, 20, 'Segoe UI', fpDefault, 20, []);
  • GroupBoxSetHelpContext(FGroupBox, 0);
  • GroupBoxSetHint(FGroupBox, 'GroupBox Create Hint');
  • GroupBoxSetParentBackground(FGroupBox, True);
  • GroupBoxSetParentColor(FGroupBox, False);
  • GroupBoxSetParentCtl3D(FGroupBox, True);
  • GroupBoxSetParentFont(FGroupBox, True);
  • GroupBoxSetParentShowHint(FGroupBox, True);
  • GroupBoxSetPopupMenu(FGroupBox, nil);
  • GroupBoxSetShowHint(FGroupBox, False);
  • GroupBoxSetTabOrder(FGroupBox, 0);
  • GroupBoxSetTabStop(FGroupBox, True);
  • GroupBoxSetTag(FGroupBox, 0);
  • GroupBoxSetVisible(FGroupBox, True);
  • GroupBoxSetLeft(FGroupBox, 20);
  • GroupBoxSetTop(FGroupBox, 20);
  • GroupBoxSetHeight(FGroupBox, 200);
  • GroupBoxSetWidth(FGroupBox, 200);
  • GroupBoxSetBounds(FGroupBox, 20, 20, 200, 200);
Code:
GroupBoxSetEvent(FGroupBox, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Attached Images
File Type: png GroupBox Create.png (3.4 KB, 54 views)
Attached Files
File Type: 7z GroupBox Create.7z (537.9 KB, 7 views)

Last edited by DelphiBuilder; 27-12-2022 at 02:06.
Reply With Quote