FileForums

FileForums (https://fileforums.com/index.php)
-   Conversion Tutorials (https://fileforums.com/forumdisplay.php?f=55)
-   -   Advanced Inno Setup Example (https://fileforums.com/showthread.php?t=105645)

DelphiBuilder 21-12-2022 02:57
TLabelCreate
 
2 Attachment(s)
TLabelCreate

Code:
FLabel:=LabelCreate(WizardForm, alNone, taCenter, True, 'Label Create', clBtnFace, crDefault, crDrag, dmManual, True, nil, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 'Label Create Hint', tlCenter, True, True, True, True, False, 0, True, True, False, 20, 20, 200, 200, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
  • LabelGetParent(FLabel);

  • LabelGetAlign(FLabel);

  • LabelGetAlignment(FLabel);

  • LabelGetAutoSize(FLabel);

  • LabelGetCaption(FLabel);

  • LabelGetColor(FLabel);

  • LabelGetCursor(FLabel);

  • LabelGetDragCursor(FLabel);

  • LabelGetDragMode(FLabel);

  • LabelGetEnabled(FLabel);

  • LabelGetFocusControl(FLabel);

  • LabelGetFontColor(FLabel);

  • LabelGetFontHeight(FLabel);

  • LabelGetFontName(FLabel);

  • LabelGetFontPitch(FLabel);

  • LabelGetFontSize(FLabel);

  • LabelGetFontStyle(FLabel);

  • LabelGetHint(FLabel);

  • LabelGetLayout(FLabel);

  • LabelGetParentColor(FLabel);

  • LabelGetParentFont(FLabel);

  • LabelGetParentShowHint(FLabel);

  • LabelGetShowAccelChar(FLabel);

  • LabelGetShowHint(FLabel);

  • LabelGetTag(FLabel);

  • LabelGetTransparent(FLabel);

  • LabelGetVisible(FLabel);

  • LabelGetWordWrap(FLabel);

  • LabelGetLeft(FLabel);

  • LabelGetTop(FLabel);

  • LabelGetHeight(FLabel);

  • LabelGetWidth(FLabel);

  • LabelGetBounds(FLabel);

Code:
  • LabelSetParent(FLabel, WizardForm);

  • LabelSetAlign(FLabel, alNone);

  • LabelSetAlignment(FLabel, taCenter);

  • LabelSetAutoSize(FLabel, True);

  • LabelSetCaption(FLabel, 'Label Create');

  • LabelSetColor(FLabel, clBtnFace);

  • LabelSetCursor(FLabel, crDefault);

  • LabelSetDragCursor(FLabel, crDrag);

  • LabelSetDragMode(FLabel, dmManual);

  • LabelSetEnabled(FLabel, True);

  • LabelSetFocusControl(FLabel, nil);

  • LabelSetFontColor(FLabel, clBlack);

  • LabelSetFontHeight(FLabel, 20);

  • LabelSetFontName(FLabel, 'Segoe UI');

  • LabelSetFontPitch(FLabel, fpDefault);

  • LabelSetFontSize(FLabel, 20);

  • LabelSetFontStyle(FLabel, []);

  • LabelSetFont(FLabel, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • LabelSetHint(FLabel, 'Label Create Hint');

  • LabelSetLayout(FLabel, tlCenter);

  • LabelSetParentColor(FLabel, True);

  • LabelSetParentFont(FLabel, True);

  • LabelSetParentShowHint(FLabel, True);

  • LabelSetShowAccelChar(FLabel, True);

  • LabelSetShowHint(FLabel, True);

  • LabelSetTag(FLabel, 0);

  • LabelSetTransparent(FLabel, True);

  • LabelSetVisible(FLabel, True);

  • LabelSetWordWrap(FLabel, True);

  • LabelSetLeft(FLabel, 20);

  • LabelSetTop(FLabel, 20);

  • LabelSetHeight(FLabel, 200);

  • LabelSetWidth(FLabel, 200);

  • LabelSetBounds(FLabel, 20, 20, 200, 200);

Code:
LabelSetEvent(FLabel, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 21-12-2022 05:33
TEditCreate
 
2 Attachment(s)
TEditCreate

Code:
FEdit:=EditCreate(WizardForm, alNone, True, True, bsSingle, ecNormal, clWindow, True, crDefault, False, crDrag, dmManual, True, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, True, 'Edit Create Hint', 0, False, False, True, True, True, #0, nil, False, False, 0, True, 0, 'Edit Create', True, 20, 20, 200, 200, nil, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
  • EditGetParent(FEdit);

  • EditGetAlign(FEdit);

  • EditGetAutoSelect(FEdit);

  • EditGetAutoSize(FEdit);

  • EditGetBorderStyle(FEdit);

  • EditGetCharCase(FEdit);

  • EditGetColor(FEdit);

  • EditGetCtl3D(FEdit);

  • EditGetCursor(FEdit);

  • EditGetDoubleBuffered(FEdit);

  • EditGetDragCursor(FEdit);

  • EditGetDragMode(FEdit);

  • EditGetEnabled(FEdit);

  • EditGetFontColor(FEdit);

  • EditGetFontHeight(FEdit);

  • EditGetFontName(FEdit);

  • EditGetFontPitch(FEdit);

  • EditGetFontSize(FEdit);

  • EditGetFontStyle(FEdit);

  • EditGetHelpContext(FEdit);

  • EditGetHideSelection(FEdit);

  • EditGetHint(FEdit);

  • EditGetMaxLength(FEdit);

  • EditGetOEMConvert(FEdit);

  • EditGetParentColor(FEdit);

  • EditGetParentCtl3D(FEdit);

  • EditGetParentFont(FEdit);

  • EditGetParentShowHint(FEdit);

  • //EditGetPasswordChar(FEdit);

  • EditGetPopupMenu(FEdit);

  • EditGetReadOnly(FEdit);

  • EditGetShowHint(FEdit);

  • EditGetTabOrder(FEdit);

  • EditGetTabStop(FEdit);

  • EditGetTag(FEdit);

  • EditGetVisible(FEdit);

  • EditGetLeft(FEdit);

  • EditGetTop(FEdit);

  • EditGetHeight(FEdit);

  • EditGetWidth(FEdit);

  • EditGetBounds(FEdit);

Code:
  • EditSetParent(FEdit, WizardForm);

  • EditSetAlign(FEdit, alNone);

  • EditSetAutoSelect(FEdit, True);

  • EditSetAutoSize(FEdit, True);

  • EditSetBorderStyle(FEdit, bsSingle);

  • EditSetCharCase(FEdit, ecNormal);

  • EditSetColor(FEdit, clWindow);

  • EditSetCtl3D(FEdit, True);

  • EditSetCursor(FEdit, crDefault);

  • EditSetDoubleBuffered(FEdit, False);

  • EditSetDragCursor(FEdit, crDrag);

  • EditSetDragMode(FEdit, dmManual);

  • EditSetEnabled(FEdit, True);

  • EditSetFontColor(FEdit, clBlack);

  • EditSetFontHeight(FEdit, 20);

  • EditSetFontName(FEdit, 'Segoe UI');

  • EditSetFontPitch(FEdit, fpDefault);

  • EditSetFontSize(FEdit, 20);

  • EditSetFontStyle(FEdit, []);

  • EditSetFont(FEdit, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • EditSetHelpContext(FEdit, 0);

  • EditSetHideSelection(FEdit, True);

  • EditSetHint(FEdit, 'Edit Create Hint');

  • EditSetMaxLength(FEdit, 0);

  • EditSetOEMConvert(FEdit, False);

  • EditSetParentColor(FEdit, False);

  • EditSetParentCtl3D(FEdit, True);

  • EditSetParentFont(FEdit, True);

  • EditSetParentShowHint(FEdit, True);

  • EditSetPasswordChar(FEdit, #0);

  • EditSetPopupMenu(FEdit, nil);

  • EditSetReadOnly(FEdit, False);

  • EditSetShowHint(FEdit, False);

  • EditSetTabOrder(FEdit, 0);

  • EditSetTabStop(FEdit, True);

  • EditSetTag(FEdit, 0);

  • EditSetText(FEdit, 'Edit Create');

  • EditSetVisible(FEdit, True);

  • EditSetLeft(FEdit, 20);

  • EditSetTop(FEdit, 20);

  • EditSetHeight(FEdit, 200);

  • EditSetWidth(FEdit, 200);

  • EditSetBounds(FEdit, 20, 20, 200, 200);

Code:
EditSetEvent(FEdit, nil, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 21-12-2022 08:29
TMemoCreate
 
2 Attachment(s)
TMemoCreate

Code:
FMemo:=MemoCreate(WizardForm, alNone, taLeftJustify, bsSingle, clWindow, True, crDefault, False, crDrag, dmManual, True, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, True, 'Memo Create Hint', 'Memo Create', 0, False, False, True, True, True, nil, False, ssNone, False, 0, True, 0, True, True, False, True, 20, 20, 200, 200, nil, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
  • MemoGetParent(FMemo);

  • MemoGetAlign(FMemo);

  • MemoGetAlignment(FMemo);

  • MemoGetBorderStyle(FMemo);

  • MemoGetColor(FMemo);

  • MemoGetCtl3D(FMemo);

  • MemoGetCursor(FMemo);

  • MemoGetDoubleBuffered(FMemo);

  • MemoGetDragCursor(FMemo);

  • MemoGetDragMode(FMemo);

  • MemoGetEnabled(FMemo);

  • MemoGetFontColor(FMemo);

  • MemoGetFontHeight(FMemo);

  • MemoGetFontName(FMemo);

  • MemoGetFontPitch(FMemo);

  • MemoGetFontSize(FMemo);

  • MemoGetFontStyle(FMemo);

  • MemoGetHelpContext(FMemo);

  • MemoGetHideSelection(FMemo);

  • MemoGetHint(FMemo);

  • MemoGetLinesText(FMemo);

  • MemoGetMaxLength(FMemo);

  • MemoGetOEMConvert(FMemo);

  • MemoGetParentColor(FMemo);

  • MemoGetParentCtl3D(FMemo);

  • MemoGetParentFont(FMemo);

  • MemoGetParentShowHint(FMemo);

  • MemoGetPopupMenu(FMemo);

  • MemoGetReadOnly(FMemo);

  • MemoGetScrollBars(FMemo);

  • MemoGetShowHint(FMemo);

  • MemoGetTabOrder(FMemo);

  • MemoGetTabStop(FMemo);

  • MemoGetTag(FMemo);

  • MemoGetVisible(FMemo);

  • MemoGetWantReturns(FMemo);

  • MemoGetWantTabs(FMemo);

  • MemoGetWordWrap(FMemo);

  • MemoGetLeft(FMemo);

  • MemoGetTop(FMemo);

  • MemoGetHeight(FMemo);

  • MemoGetWidth(FMemo);

  • MemoGetBounds(FMemo);

Code:
  • MemoSetParent(FMemo, WizardForm);

  • MemoSetAlign(FMemo, alNone);

  • MemoSetAlignment(FMemo, taLeftJustify);

  • MemoSetBorderStyle(FMemo, bsSingle);

  • MemoSetColor(FMemo, clWindow);

  • MemoSetCtl3D(FMemo, True);

  • MemoSetCursor(FMemo, crDefault);

  • MemoSetDoubleBuffered(FMemo, False);

  • MemoSetDragCursor(FMemo, crDrag);

  • MemoSetDragMode(FMemo, dmManual);

  • MemoSetEnabled(FMemo, True);

  • MemoSetFontColor(FMemo, clBlack);

  • MemoSetFontHeight(FMemo, 20);

  • MemoSetFontName(FMemo, 'Segoe UI');

  • MemoSetFontPitch(FMemo, fpDefault);

  • MemoSetFontSize(FMemo, 20);

  • MemoSetFontStyle(FMemo, []);

  • MemoSetFont(FMemo, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • MemoSetHelpContext(FMemo, 0);

  • MemoSetHideSelection(FMemo, True);

  • MemoSetHint(FMemo, 'Memo Create Hint');

  • MemoSetLinesText(FMemo, 'Memo Create');

  • MemoSetMaxLength(FMemo, 0);

  • MemoSetOEMConvert(FMemo, False);

  • MemoSetParentColor(FMemo, False);

  • MemoSetParentCtl3D(FMemo, True);

  • MemoSetParentFont(FMemo, True);

  • MemoSetParentShowHint(FMemo, True);

  • MemoSetPopupMenu(FMemo, nil);

  • MemoSetReadOnly(FMemo, False);

  • MemoSetScrollBars(FMemo, ssNone);

  • MemoSetShowHint(FMemo, False);

  • MemoSetTabOrder(FMemo, 0);

  • MemoSetTabStop(FMemo, True);

  • MemoSetTag(FMemo, 0);

  • MemoSetVisible(FMemo, True);

  • MemoSetWantReturns(FMemo, True);

  • MemoSetWantTabs(FMemo, False);

  • MemoSetWordWrap(FMemo, True);

  • MemoSetLeft(FMemo, 20);

  • MemoSetTop(FMemo, 20);

  • MemoSetHeight(FMemo, 200);

  • MemoSetWidth(FMemo, 200);

  • MemoSetBounds(FMemo, 20, 20, 200, 200);

Code:
MemoSetEvent(FMemo, nil, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 21-12-2022 10:25
TButtonCreate
 
2 Attachment(s)
TButtonCreate

Code:
FButton:=ButtonCreate(WizardForm, alNone, False, 'Button Create', crDefault, False, False, crDrag, dmManual, True, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, 'Button Create Hint', mrNone, 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, nil, nil);
Code:
  • ButtonGetParent(FButton);

  • ButtonGetAlign(FButton);

  • ButtonGetCancel(FButton);

  • ButtonGetCaption(FButton);

  • ButtonGetCursor(FButton);

  • ButtonGetDefault(FButton);

  • ButtonGetDoubleBuffered(FButton);

  • ButtonGetDragCursor(FButton);

  • ButtonGetDragMode(FButton);

  • ButtonGetEnabled(FButton);

  • ButtonGetFontColor(FButton);

  • ButtonGetFontHeight(FButton);

  • ButtonGetFontName(FButton);

  • ButtonGetFontPitch(FButton);

  • ButtonGetFontSize(FButton);

  • ButtonGetFontStyle(FButton);

  • ButtonGetHelpContext(FButton);

  • ButtonGetHint(FButton);

  • ButtonGetModalResult(FButton);

  • ButtonGetParentFont(FButton);

  • ButtonGetParentShowHint(FButton);

  • ButtonGetPopupMenu(FButton);

  • ButtonGetShowHint(FButton);

  • ButtonGetTabOrder(FButton);

  • ButtonGetTabStop(FButton);

  • ButtonGetTag(FButton);

  • ButtonGetVisible(FButton);

  • ButtonGetLeft(FButton);

  • ButtonGetTop(FButton);

  • ButtonGetHeight(FButton);

  • ButtonGetWidth(FButton);

  • ButtonGetBounds(FButton);

Code:
  • ButtonSetParent(FButton, WizardForm);

  • ButtonSetAlign(FButton, alNone);

  • ButtonSetCancel(FButton, False);

  • ButtonSetCaption(FButton, 'Button Create');

  • ButtonSetCursor(FButton, crDefault);

  • ButtonSetDefault(FButton, False);

  • ButtonSetDoubleBuffered(FButton, False);

  • ButtonSetDragCursor(FButton, crDrag);

  • ButtonSetDragMode(FButton, dmManual);

  • ButtonSetEnabled(FButton, True);

  • ButtonSetFontColor(FButton, clBlack);

  • ButtonSetFontHeight(FButton, 20);

  • ButtonSetFontName(FButton, 'Segoe UI');

  • ButtonSetFontPitch(FButton, fpDefault);

  • ButtonSetFontSize(FButton, 20);

  • ButtonSetFontStyle(FButton, []);

  • ButtonSetFont(FButton, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • ButtonSetHelpContext(FButton, 0);

  • ButtonSetHint(FButton, 'Button Create Hint');

  • ButtonSetModalResult(FButton, mrNone);

  • ButtonSetParentFont(FButton, True);

  • ButtonSetParentShowHint(FButton, True);

  • ButtonSetPopupMenu(FButton, nil);

  • ButtonSetShowHint(FButton, False);

  • ButtonSetTabOrder(FButton, 0);

  • ButtonSetTabStop(FButton, True);

  • ButtonSetTag(FButton, 0);

  • ButtonSetVisible(FButton, True);

  • ButtonSetLeft(FButton, 20);

  • ButtonSetTop(FButton, 20);

  • ButtonSetHeight(FButton, 200);

  • ButtonSetWidth(FButton, 200);

  • ButtonSetBounds(FButton, 20, 20, 200, 200);

Code:
ButtonSetEvent(FButton, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 21-12-2022 22:32
TCheckBoxCreate
 
2 Attachment(s)
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);

DelphiBuilder 21-12-2022 22:44
TRadioButtonCreate
 
2 Attachment(s)
TRadioButtonCreate

Code:
FRadioButton:=RadioButtonCreate(WizardForm, alNone, taRightJustify, 'RadioButton Create', False, clBtnFace, True, crDefault, False, crDrag, dmManual, True, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, 'RadioButton 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, nil, nil);
Code:
  • RadioButtonGetParent(FRadioButton);

  • RadioButtonGetAlign(FRadioButton);

  • RadioButtonGetAlignment(FRadioButton);

  • RadioButtonGetCaption(FRadioButton);

  • RadioButtonGetChecked(FRadioButton);

  • RadioButtonGetColor(FRadioButton);

  • RadioButtonGetCtl3D(FRadioButton);

  • RadioButtonGetCursor(FRadioButton);

  • RadioButtonGetDoubleBuffered(FRadioButton);

  • RadioButtonGetDragCursor(FRadioButton);

  • RadioButtonGetDragMode(FRadioButton);

  • RadioButtonGetEnabled(FRadioButton);

  • RadioButtonGetFontColor(FRadioButton);

  • RadioButtonGetFontHeight(FRadioButton);

  • RadioButtonGetFontName(FRadioButton);

  • RadioButtonGetFontPitch(FRadioButton);

  • RadioButtonGetFontSize(FRadioButton);

  • RadioButtonGetFontStyle(FRadioButton);

  • RadioButtonGetHelpContext(FRadioButton);

  • RadioButtonGetHint(FRadioButton);

  • RadioButtonGetParentBackground(FRadioButton);

  • RadioButtonGetParentColor(FRadioButton);

  • RadioButtonGetParentCtl3D(FRadioButton);

  • RadioButtonGetParentFont(FRadioButton);

  • RadioButtonGetParentShowHint(FRadioButton);

  • RadioButtonGetPopupMenu(FRadioButton);

  • RadioButtonGetShowHint(FRadioButton);

  • RadioButtonGetTabOrder(FRadioButton);

  • RadioButtonGetTabStop(FRadioButton);

  • RadioButtonGetTag(FRadioButton);

  • RadioButtonGetVisible(FRadioButton);

  • RadioButtonGetLeft(FRadioButton);

  • RadioButtonGetTop(FRadioButton);

  • RadioButtonGetHeight(FRadioButton);

  • RadioButtonGetWidth(FRadioButton);

  • RadioButtonGetBounds(FRadioButton);

Code:
  • RadioButtonSetParent(FRadioButton, WizardForm);

  • RadioButtonSetAlign(FRadioButton, alNone);

  • RadioButtonSetAlignment(FRadioButton, taRightJustify);

  • RadioButtonSetCaption(FRadioButton, 'RadioButton Create');

  • RadioButtonSetChecked(FRadioButton, False);

  • RadioButtonSetColor(FRadioButton, clWindow);

  • RadioButtonSetCtl3D(FRadioButton, True);

  • RadioButtonSetCursor(FRadioButton, crDefault);

  • RadioButtonSetDoubleBuffered(FRadioButton, False);

  • RadioButtonSetDragCursor(FRadioButton, crDrag);

  • RadioButtonSetDragMode(FRadioButton, dmManual);

  • RadioButtonSetEnabled(FRadioButton, True);

  • RadioButtonSetFontColor(FRadioButton, clBlack);

  • RadioButtonSetFontHeight(FRadioButton, 20);

  • RadioButtonSetFontName(FRadioButton, 'Segoe UI');

  • RadioButtonSetFontPitch(FRadioButton, fpDefault);

  • RadioButtonSetFontSize(FRadioButton, 20);

  • RadioButtonSetFontStyle(FRadioButton, []);

  • RadioButtonSetFont(FRadioButton, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • RadioButtonSetHelpContext(FRadioButton, 0);

  • RadioButtonSetHint(FRadioButton, 'RadioButton Create Hint');

  • RadioButtonSetParentBackground(FRadioButton, False);

  • RadioButtonSetParentColor(FRadioButton, False);

  • RadioButtonSetParentCtl3D(FRadioButton, True);

  • RadioButtonSetParentFont(FRadioButton, True);

  • RadioButtonSetParentShowHint(FRadioButton, True);

  • RadioButtonSetPopupMenu(FRadioButton, nil);

  • RadioButtonSetShowHint(FRadioButton, False);

  • RadioButtonSetTabOrder(FRadioButton, 0);

  • RadioButtonSetTabStop(FRadioButton, True);

  • RadioButtonSetTag(FRadioButton, 0);

  • RadioButtonSetVisible(FRadioButton, True);

  • RadioButtonSetLeft(FRadioButton, 20);

  • RadioButtonSetTop(FRadioButton, 20);

  • RadioButtonSetHeight(FRadioButton, 200);

  • RadioButtonSetWidth(FRadioButton, 200);

  • RadioButtonSetBounds(FRadioButton, 20, 20, 200, 200);

Code:
RadioButtonSetEvent(FRadioButton, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 22-12-2022 23:49
TListBoxCreate
 
2 Attachment(s)
TListBoxCreate
Code:
FListBox:=ListBoxCreate(WizardForm, alNone, bsSingle, clWindow, 0, True, crDefault, False, crDrag, dmManual, True, True, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, 'ListBox Create Hint', False, 13, -1, 'ListBox Create' + #13#10 + 'ListBox Create' + #13#10 + 'ListBox Create' + #13#10 + 'ListBox Create' + #13#10 + 'ListBox Create', False, False, True, True, True, nil, False, False, lbStandard, 0, True, 0, 0, True, 20, 20, 200, 200, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
  • ListBoxGetParent(FListBox);

  • ListBoxGetAlign(FListBox);

  • ListBoxGetBorderStyle(FListBox);

  • ListBoxGetColor(FListBox);

  • ListBoxGetColumns(FListBox);

  • ListBoxGetCtl3D(FListBox);

  • ListBoxGetCursor(FListBox);

  • ListBoxGetDoubleBuffered(FListBox);

  • ListBoxGetDragCursor(FListBox);

  • ListBoxGetDragMode(FListBox);

  • ListBoxGetEnabled(FListBox);

  • ListBoxGetExtendedSelect(FListBox);

  • ListBoxGetFontColor(FListBox);

  • ListBoxGetFontHeight(FListBox);

  • ListBoxGetFontName(FListBox);

  • ListBoxGetFontPitch(FListBox);

  • ListBoxGetFontSize(FListBox);

  • ListBoxGetFontStyle(FListBox);

  • ListBoxGetHelpContext(FListBox);

  • ListBoxGetHint(FListBox);

  • ListBoxGetIntegralHeight(FListBox);

  • ListBoxGetItemHeight(FListBox);

  • ListBoxGetItemIndex(FListBox);

  • ListBoxGetItemsText(FListBox);

  • ListBoxGetMultiSelect(FListBox);

  • ListBoxGetParentColor(FListBox);

  • ListBoxGetParentCtl3D(FListBox);

  • ListBoxGetParentFont(FListBox);

  • ListBoxGetParentShowHint(FListBox);

  • ListBoxGetPopupMenu(FListBox);

  • ListBoxGetShowHint(FListBox);

  • ListBoxGetSorted(FListBox);

  • ListBoxGetStyle(FListBox);

  • ListBoxGetTabOrder(FListBox);

  • ListBoxGetTabStop(FListBox);

  • ListBoxGetTabWidth(FListBox);

  • ListBoxGetTag(FListBox);

  • ListBoxGetVisible(FListBox);

  • ListBoxGetLeft(FListBox);

  • ListBoxGetTop(FListBox);

  • ListBoxGetHeight(FListBox);

  • ListBoxGetWidth(FListBox);

  • ListBoxGetBounds(FListBox);

Code:
  • ListBoxSetParent(FListBox, WizardForm);

  • ListBoxSetAlign(FListBox, alNone);

  • ListBoxSetBorderStyle(FListBox, bsSingle);

  • ListBoxSetColor(FListBox, clWindow);

  • ListBoxSetColumns(FListBox, 0);

  • ListBoxSetCtl3D(FListBox, True);

  • ListBoxSetCursor(FListBox, crDefault);

  • ListBoxSetDoubleBuffered(FListBox, False);

  • ListBoxSetDragCursor(FListBox, crDrag);

  • ListBoxSetDragMode(FListBox, dmManual);

  • ListBoxSetEnabled(FListBox, True);

  • ListBoxSetExtendedSelect(FListBox, True);

  • ListBoxSetFontColor(FListBox, clBlack);

  • ListBoxSetFontHeight(FListBox, 20);

  • ListBoxSetFontName(FListBox, 'Segoe UI');

  • ListBoxSetFontPitch(FListBox, fpDefault);

  • ListBoxSetFontSize(FListBox, 20);

  • ListBoxSetFontStyle(FListBox, []);

  • ListBoxSetFont(FListBox, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • ListBoxSetHelpContext(FListBox, 0);

  • ListBoxSetHint(FListBox, 'ListBox Create Hint');

  • ListBoxSetIntegralHeight(FListBox, False);

  • ListBoxSetItemHeight(FListBox, 13);

  • ListBoxSetItemIndex(FListBox, -1);

  • ListBoxSetItemsText(FListBox, 'ListBox Create' + #13#10 + 'ListBox Create' + #13#10 + 'ListBox Create' + #13#10 + 'ListBox Create' + #13#10 + 'ListBox Create');

  • ListBoxSetMultiSelect(FListBox, False);

  • ListBoxSetParentColor(FListBox, False);

  • ListBoxSetParentCtl3D(FListBox, True);

  • ListBoxSetParentFont(FListBox, True);

  • ListBoxSetParentShowHint(FListBox, True);

  • ListBoxSetPopupMenu(FListBox, nil);

  • ListBoxSetShowHint(FListBox, False);

  • ListBoxSetSorted(FListBox, False);

  • ListBoxSetStyle(FListBox, lbStandard);

  • ListBoxSetTabOrder(FListBox, 0);

  • ListBoxSetTabStop(FListBox, True);

  • ListBoxSetTabWidth(FListBox, 0);

  • ListBoxSetTag(FListBox, 0);

  • ListBoxSetVisible(FListBox, True);

  • ListBoxSetLeft(FListBox, 20);

  • ListBoxSetTop(FListBox, 20);

  • ListBoxSetHeight(FListBox, 200);

  • ListBoxSetWidth(FListBox, 200);

  • ListBoxSetBounds(FListBox, 20, 20, 200, 200);

Code:
ListBoxSetEvent(FListBox, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 23-12-2022 00:43
TComboBoxCreate
 
2 Attachment(s)
TComboBoxCreate

Code:
FComboBox:=ComboBoxCreate(WizardForm, alNone, clWindow, True, crDefault, False, crDrag, dmManual, 10, True, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, 'ComboBox Create Hint', -1, 'ComboBox Create' + #13#10 + 'ComboBox Create' + #13#10 + 'ComboBox Create' + #13#10 + 'ComboBox Create' + #13#10 + 'ComboBox Create', 0, False, True, True, True, nil, False, False, csDropDown, 0, True, 0, '', True, 20, 20, 200, 200, nil, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
  • ComboBoxGetParent(FComboBox);

  • ComboBoxGetAlign(FComboBox);

  • ComboBoxGetColor(FComboBox);

  • ComboBoxGetCtl3D(FComboBox);

  • ComboBoxGetCursor(FComboBox);

  • ComboBoxGetDoubleBuffered(FComboBox);

  • ComboBoxGetDragCursor(FComboBox);

  • ComboBoxGetDragMode(FComboBox);

  • ComboBoxGetDropDownCount(FComboBox);

  • ComboBoxGetEnabled(FComboBox);

  • ComboBoxGetFontColor(FComboBox);

  • ComboBoxGetFontHeight(FComboBox);

  • ComboBoxGetFontName(FComboBox);

  • ComboBoxGetFontPitch(FComboBox);

  • ComboBoxGetFontSize(FComboBox);

  • ComboBoxGetFontStyle(FComboBox);

  • ComboBoxGetHelpContext(FComboBox);

  • ComboBoxGetHint(FComboBox);

  • ComboBoxGetItemIndex(FComboBox);

  • ComboBoxGetItemsText(FComboBox);

  • ComboBoxGetMaxLength(FComboBox);

  • ComboBoxGetParentColor(FComboBox);

  • ComboBoxGetParentCtl3D(FComboBox);

  • ComboBoxGetParentFont(FComboBox);

  • ComboBoxGetParentShowHint(FComboBox);

  • ComboBoxGetPopupMenu(FComboBox);

  • ComboBoxGetShowHint(FComboBox);

  • ComboBoxGetSorted(FComboBox);

  • ComboBoxGetStyle(FComboBox);

  • ComboBoxGetTabOrder(FComboBox);

  • ComboBoxGetTabStop(FComboBox);

  • ComboBoxGetTag(FComboBox);

  • ComboBoxGetText(FComboBox);

  • ComboBoxGetVisible(FComboBox);

  • ComboBoxGetLeft(FComboBox);

  • ComboBoxGetTop(FComboBox);

  • ComboBoxGetHeight(FComboBox);

  • ComboBoxGetWidth(FComboBox);

  • ComboBoxGetBounds(FComboBox);

Code:
  • ComboBoxSetParent(FComboBox, WizardForm);

  • ComboBoxSetAlign(FComboBox, alNone);

  • ComboBoxSetColor(FComboBox, clWindow);

  • ComboBoxSetCtl3D(FComboBox, True);

  • ComboBoxSetCursor(FComboBox, crDefault);

  • ComboBoxSetDoubleBuffered(FComboBox, False);

  • ComboBoxSetDragCursor(FComboBox, crDrag);

  • ComboBoxSetDragMode(FComboBox, dmManual);

  • ComboBoxSetDropDownCount(FComboBox, 10);

  • ComboBoxSetEnabled(FComboBox, True);

  • ComboBoxSetFontColor(FComboBox, clBlack);

  • ComboBoxSetFontHeight(FComboBox, 20);

  • ComboBoxSetFontName(FComboBox, 'Segoe UI');

  • ComboBoxSetFontPitch(FComboBox, fpDefault);

  • ComboBoxSetFontSize(FComboBox, 20);

  • ComboBoxSetFontStyle(FComboBox, []);

  • ComboBoxSetFont(FComboBox, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • ComboBoxSetHelpContext(FComboBox, 0);

  • ComboBoxSetHint(FComboBox, 'ComboBox Create Hint');

  • ComboBoxSetItemIndex(FComboBox, -1);

  • ComboBoxSetItemsText(FComboBox, 'ComboBox Create' + #13#10 + 'ComboBox Create' + #13#10 + 'ComboBox Create' + #13#10 + 'ComboBox Create' + #13#10 + 'ComboBox Create');

  • ComboBoxSetMaxLength(FComboBox, 0);

  • ComboBoxSetParentColor(FComboBox, False);

  • ComboBoxSetParentCtl3D(FComboBox, True);

  • ComboBoxSetParentFont(FComboBox, True);

  • ComboBoxSetParentShowHint(FComboBox, True);

  • ComboBoxSetPopupMenu(FComboBox, nil);

  • ComboBoxSetShowHint(FComboBox, False);

  • ComboBoxSetSorted(FComboBox, False);

  • ComboBoxSetStyle(FComboBox, csDropDown);

  • ComboBoxSetTabOrder(FComboBox, 0);

  • ComboBoxSetTabStop(FComboBox, True);

  • ComboBoxSetTag(FComboBox, 0);

  • ComboBoxSetText(FComboBox, '');

  • ComboBoxSetVisible(FComboBox, True);

  • ComboBoxSetLeft(FComboBox, 20);

  • ComboBoxSetTop(FComboBox, 20);

  • ComboBoxSetHeight(FComboBox, 200);

  • ComboBoxSetWidth(FComboBox, 200);

  • ComboBoxSetBounds(FComboBox, 20, 20, 200, 200);

Code:
ComboBoxSetEvent(FComboBox, nil, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 23-12-2022 01:35
TPanelCreate
 
2 Attachment(s)
TPanelCreate

Code:
FPanel:=PanelCreate(WizardForm, alNone, taCenter, bvNone, bvRaised, 1, bsNone, 0, 'Panel Create', clBtnFace, True, crDefault, False, crDrag, dmManual, True, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, 'Panel Create Hint', False, True, False, True, True, True, nil, False, 0, False, 0, True, 20, 20, 200, 200, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
  • PanelGetParent(FPanel);

  • PanelGetAlign(FPanel);

  • PanelGetAlignment(FPanel);

  • PanelGetBevelInner(FPanel);

  • PanelGetBevelOuter(FPanel);

  • PanelGetBevelWidth(FPanel);

  • PanelGetBorderStyle(FPanel);

  • PanelGetBorderWidth(FPanel);

  • PanelGetColor(FPanel);

  • PanelGetCtl3D(FPanel);

  • PanelGetCursor(FPanel);

  • PanelGetDoubleBuffered(FPanel);

  • PanelGetDragCursor(FPanel);

  • PanelGetDragMode(FPanel);

  • PanelGetEnabled(FPanel);

  • PanelGetFontColor(FPanel);

  • PanelGetFontHeight(FPanel);

  • PanelGetFontName(FPanel);

  • PanelGetFontPitch(FPanel);

  • PanelGetFontSize(FPanel);

  • PanelGetFontStyle(FPanel);

  • PanelGetHelpContext(FPanel);

  • PanelGetHint(FPanel);

  • PanelGetLocked(FPanel);

  • PanelGetParentBackground(FPanel);

  • PanelGetParentColor(FPanel);

  • PanelGetParentCtl3D(FPanel);

  • PanelGetParentFont(FPanel);

  • PanelGetParentShowHint(FPanel);

  • PanelGetPopupMenu(FPanel);

  • PanelGetShowHint(FPanel);

  • PanelGetTabOrder(FPanel);

  • PanelGetTabStop(FPanel);

  • PanelGetTag(FPanel);

  • PanelGetVisible(FPanel);

  • PanelGetLeft(FPanel);

  • PanelGetTop(FPanel);

  • PanelGetHeight(FPanel);

  • PanelGetWidth(FPanel);

  • PanelGetBounds(FPanel);

Code:
  • PanelSetParent(FPanel, WizardForm);

  • PanelSetAlign(FPanel, alNone);

  • PanelSetAlignment(FPanel, taCenter);

  • PanelSetBevelInner(FPanel, bvNone);

  • PanelSetBevelOuter(FPanel, bvRaised);

  • PanelSetBevelWidth(FPanel, 1);

  • PanelSetBorderStyle(FPanel, bsNone);

  • PanelSetBorderWidth(FPanel, 0);

  • PanelSetColor(FPanel, clBtnFace);

  • PanelSetCtl3D(FPanel, True);

  • PanelSetCursor(FPanel, crDefault);

  • PanelSetDoubleBuffered(FPanel, False);

  • PanelSetDragCursor(FPanel, crDrag);

  • PanelSetDragMode(FPanel, dmManual);

  • PanelSetEnabled(FPanel, True);

  • PanelSetFontColor(FPanel, clBlack);

  • PanelSetFontHeight(FPanel, 20);

  • PanelSetFontName(FPanel, 'Segoe UI');

  • PanelSetFontPitch(FPanel, fpDefault);

  • PanelSetFontSize(FPanel, 20);

  • PanelSetFontStyle(FPanel, []);

  • PanelSetFont(FPanel, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • PanelSetHelpContext(FPanel, 0);

  • PanelSetHint(FPanel, 'Panel Create Hint');

  • PanelSetLocked(FPanel, False);

  • PanelSetParentBackground(FPanel, True);

  • PanelSetParentColor(FPanel, False);

  • PanelSetParentCtl3D(FPanel, True);

  • PanelSetParentFont(FPanel, True);

  • PanelSetParentShowHint(FPanel, True);

  • PanelSetPopupMenu(FPanel, nil);

  • PanelSetShowHint(FPanel, False);

  • PanelSetTabOrder(FPanel, 0);

  • PanelSetTabStop(FPanel, True);

  • PanelSetTag(FPanel, 0);

  • PanelSetVisible(FPanel, True);

  • PanelSetLeft(FPanel, 20);

  • PanelSetTop(FPanel, 20);

  • PanelSetHeight(FPanel, 200);

  • PanelSetWidth(FPanel, 200);

  • PanelSetBounds(FPanel, 20, 20, 200, 200);

Code:
PanelSetEvent(FPanel, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 23-12-2022 02:16
TPasswordEditCreate
 
2 Attachment(s)
TPasswordEditCreate

Code:
FPasswordEdit:=PasswordEditCreate(WizardForm, True, True, bsSingle, ecNormal, clWindow, True, crDefault, crDrag, dmManual, True, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, True, 'PasswordEdit Create Hint', 0, False, False, True, True, True, True, nil, False, False, 0, True, 0, 'PasswordEdit Create', True, 20, 20, 200, 200, nil, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
  • PasswordEditGetParent(FPasswordEdit);

  • PasswordEditGetAutoSelect(FPasswordEdit);

  • PasswordEditGetAutoSize(FPasswordEdit);

  • PasswordEditGetBorderStyle(FPasswordEdit);

  • PasswordEditGetCharCase(FPasswordEdit);

  • PasswordEditGetColor(FPasswordEdit);

  • PasswordEditGetCtl3D(FPasswordEdit);

  • PasswordEditGetCursor(FPasswordEdit);

  • PasswordEditGetDragCursor(FPasswordEdit);

  • PasswordEditGetDragMode(FPasswordEdit);

  • PasswordEditGetEnabled(FPasswordEdit);

  • PasswordEditGetFontColor(FPasswordEdit);

  • PasswordEditGetFontHeight(FPasswordEdit);

  • PasswordEditGetFontName(FPasswordEdit);

  • PasswordEditGetFontPitch(FPasswordEdit);

  • PasswordEditGetFontSize(FPasswordEdit);

  • PasswordEditGetFontStyle(FPasswordEdit);

  • PasswordEditGetHelpContext(FPasswordEdit);

  • PasswordEditGetHideSelection(FPasswordEdit);

  • PasswordEditGetHint(FPasswordEdit);

  • PasswordEditGetMaxLength(FPasswordEdit);

  • PasswordEditGetOEMConvert(FPasswordEdit);

  • PasswordEditGetParentColor(FPasswordEdit);

  • PasswordEditGetParentCtl3D(FPasswordEdit);

  • PasswordEditGetParentFont(FPasswordEdit);

  • PasswordEditGetParentShowHint(FPasswordEdit);

  • PasswordEditGetPassword(FPasswordEdit);

  • PasswordEditGetPopupMenu(FPasswordEdit);

  • PasswordEditGetReadOnly(FPasswordEdit);

  • PasswordEditGetShowHint(FPasswordEdit);

  • PasswordEditGetTabOrder(FPasswordEdit);

  • PasswordEditGetTabStop(FPasswordEdit);

  • PasswordEditGetTag(FPasswordEdit);

  • PasswordEditGetText(FPasswordEdit);

  • PasswordEditGetVisible(FPasswordEdit);

  • PasswordEditGetLeft(FPasswordEdit);

  • PasswordEditGetTop(FPasswordEdit);

  • PasswordEditGetHeight(FPasswordEdit);

  • PasswordEditGetWidth(FPasswordEdit);

  • PasswordEditGetBounds(FPasswordEdit);

Code:
  • PasswordEditSetParent(FPasswordEdit, WizardForm);

  • PasswordEditSetAutoSelect(FPasswordEdit, True);

  • PasswordEditSetAutoSize(FPasswordEdit, True);

  • PasswordEditSetBorderStyle(FPasswordEdit, bsSingle);

  • PasswordEditSetCharCase(FPasswordEdit, ecNormal);

  • PasswordEditSetColor(FPasswordEdit, clWindow);

  • PasswordEditSetCtl3D(FPasswordEdit, True);

  • PasswordEditSetCursor(FPasswordEdit, crDefault);

  • PasswordEditSetDragCursor(FPasswordEdit, crDrag);

  • PasswordEditSetDragMode(FPasswordEdit, dmManual);

  • PasswordEditSetEnabled(FPasswordEdit, True);

  • PasswordEditSetFontColor(FPasswordEdit, clBlack);

  • PasswordEditSetFontHeight(FPasswordEdit, 20);

  • PasswordEditSetFontName(FPasswordEdit, 'Segoe UI');

  • PasswordEditSetFontPitch(FPasswordEdit, fpDefault);

  • PasswordEditSetFontSize(FPasswordEdit, 20);

  • PasswordEditSetFontStyle(FPasswordEdit, []);

  • PasswordEditSetFont(FPasswordEdit, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • PasswordEditSetHelpContext(FPasswordEdit, 0);

  • PasswordEditSetHideSelection(FPasswordEdit, True);

  • PasswordEditSetHint(FPasswordEdit, 'PasswordEdit Create Hint');

  • PasswordEditSetMaxLength(FPasswordEdit, 0);

  • PasswordEditSetOEMConvert(FPasswordEdit, False);

  • PasswordEditSetParentColor(FPasswordEdit, False);

  • PasswordEditSetParentCtl3D(FPasswordEdit, True);

  • PasswordEditSetParentFont(FPasswordEdit, True);

  • PasswordEditSetParentShowHint(FPasswordEdit, True);

  • PasswordEditSetPassword(FPasswordEdit, True);

  • PasswordEditSetPopupMenu(FPasswordEdit, nil);

  • PasswordEditSetReadOnly(FPasswordEdit, False);

  • PasswordEditSetShowHint(FPasswordEdit, False);

  • PasswordEditSetTabOrder(FPasswordEdit, 0);

  • PasswordEditSetTabStop(FPasswordEdit, True);

  • PasswordEditSetTag(FPasswordEdit, 0);

  • PasswordEditSetText(FPasswordEdit, 'PasswordEdit Create');

  • PasswordEditSetVisible(FPasswordEdit, True);

  • PasswordEditSetLeft(FPasswordEdit, 20);

  • PasswordEditSetTop(FPasswordEdit, 20);

  • PasswordEditSetHeight(FPasswordEdit, 200);

  • PasswordEditSetWidth(FPasswordEdit, 200);

  • PasswordEditSetBounds(FPasswordEdit, 20, 20, 200, 200);

Code:
PasswordEditSetEvent(FPasswordEdit, nil, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 23-12-2022 22:04
TBitmapImageCreate
 
2 Attachment(s)
TBitmapImageCreate

Code:
FBitmapImage:=BitmapImageCreate(WizardForm, alNone, True, clBtnFace, 'BitmapImage.bmp', '{tmp}\BitmapImage.bmp', False, crDefault, crDrag, dmManual, True, 'BitmapImage Create Hint', True, nil, clNone, clNone, False, False, 0, True, 20, 20, 200, 200, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
  • BitmapImageGetParent(FBitmapImage);

  • BitmapImageGetAlign(FBitmapImage);

  • BitmapImageGetAutoSize(FBitmapImage);

  • BitmapImageGetBackColor(FBitmapImage);

  • BitmapImageGetBitmap(FBitmapImage);

  • BitmapImageGetCenter(FBitmapImage);

  • BitmapImageGetCursor(FBitmapImage);

  • BitmapImageGetDragCursor(FBitmapImage);

  • BitmapImageGetDragMode(FBitmapImage);

  • BitmapImageGetEnabled(FBitmapImage);

  • BitmapImageGetHint(FBitmapImage);

  • BitmapImageGetParentShowHint(FBitmapImage);

  • BitmapImageGetPopupMenu(FBitmapImage);

  • BitmapImageGetReplaceColor(FBitmapImage);

  • BitmapImageGetReplaceWithColor(FBitmapImage);

  • BitmapImageGetShowHint(FBitmapImage);

  • BitmapImageGetStretch(FBitmapImage);

  • BitmapImageGetTag(FBitmapImage);

  • BitmapImageGetVisible(FBitmapImage);

  • BitmapImageGetLeft(FBitmapImage);

  • BitmapImageGetTop(FBitmapImage);

  • BitmapImageGetHeight(FBitmapImage);

  • BitmapImageGetWidth(FBitmapImage);

  • BitmapImageGetBounds(FBitmapImage);

Code:
  • BitmapImageSetParent(FBitmapImage, WizardForm);

  • BitmapImageSetAlign(FBitmapImage, alNone);

  • BitmapImageSetAutoSize(FBitmapImage, True);

  • BitmapImageSetBackColor(FBitmapImage, clBtnFace);

  • ExtractTemporaryFile('BitmapImage.bmp');

  • BitmapImageSetBitmap(FBitmapImage, '{tmp}\BitmapImage.bmp');

  • BitmapImageSetCenter(FBitmapImage, False);

  • BitmapImageSetCursor(FBitmapImage, crDefault);

  • BitmapImageSetDragCursor(FBitmapImage, crDrag);

  • BitmapImageSetDragMode(FBitmapImage, dmManual);

  • BitmapImageSetEnabled(FBitmapImage, True);

  • BitmapImageSetHint(FBitmapImage, 'BitmapImage Create Hint');

  • BitmapImageSetParentShowHint(FBitmapImage, True);

  • BitmapImageSetPopupMenu(FBitmapImage, nil);

  • BitmapImageSetReplaceColor(FBitmapImage, clNone);

  • BitmapImageSetReplaceWithColor(FBitmapImage, clNone);

  • BitmapImageSetShowHint(FBitmapImage, False);

  • BitmapImageSetStretch(FBitmapImage, False);

  • BitmapImageSetTag(FBitmapImage, 0);

  • BitmapImageSetVisible(FBitmapImage, True);

  • BitmapImageSetLeft(FBitmapImage, 20);

  • BitmapImageSetTop(FBitmapImage, 20);

  • BitmapImageSetHeight(FBitmapImage, 200);

  • BitmapImageSetWidth(FBitmapImage, 200);

  • BitmapImageSetBounds(FBitmapImage, 20, 20, 200, 200);

Code:
BitmapImageSetEvent(FBitmapImage, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 23-12-2022 22:28
TBevelCreate
 
2 Attachment(s)
TBevelCreate

Code:
FBevel:=BevelCreate(WizardForm, alNone, crDefault, 'Bevel Create Hint', True, bsBox, False, bsLowered, 0, True, 20, 20, 200, 200);
Code:
  • BevelGetParent(FBevel);

  • BevelGetAlign(FBevel);

  • BevelGetCursor(FBevel);

  • BevelGetHint(FBevel);

  • BevelGetParentShowHint(FBevel);

  • BevelGetShape(FBevel);

  • BevelGetShowHint(FBevel);

  • BevelGetStyle(FBevel);

  • BevelGetTag(FBevel);

  • BevelGetVisible(FBevel);

  • BevelGetLeft(FBevel);

  • BevelGetTop(FBevel);

  • BevelGetHeight(FBevel);

  • BevelGetWidth(FBevel);

  • BevelGetBounds(FBevel);

Code:
  • BevelSetParent(FBevel, WizardForm);

  • BevelSetAlign(FBevel, alNone);

  • BevelSetCursor(FBevel, crDefault);

  • BevelSetHint(FBevel, 'Bevel Create Hint');

  • BevelSetParentShowHint(FBevel, True);

  • BevelSetShape(FBevel, bsBox);

  • BevelSetShowHint(FBevel, False);

  • BevelSetStyle(FBevel, bsLowered);

  • BevelSetTag(FBevel, 0);

  • BevelSetVisible(FBevel, True);

  • BevelSetLeft(FBevel, 20);

  • BevelSetTop(FBevel, 20);

  • BevelSetHeight(FBevel, 200);

  • BevelSetWidth(FBevel, 200);

  • BevelSetBounds(FBevel, 20, 20, 200, 200);

DelphiBuilder 23-12-2022 23:44
TCheckListBoxCreate
 
2 Attachment(s)
TCheckListBoxCreate

Code:
FCheckListBox:=CheckListBoxCreate(WizardForm, alNone, bsSingle, clWindow, True, crDefault, crDrag, dmManual, True, False, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, True, 'CheckListBox Create Hint', False, 16, 4, False, True, True, True, nil, False, True, True, 0, True, 0, False, True, False, 20, 20, 200, 200, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
  • CheckListBoxGetParent(FCheckListBox);

  • CheckListBoxGetAlign(FCheckListBox);

  • CheckListBoxGetBorderStyle(FCheckListBox);

  • CheckListBoxGetColor(FCheckListBox);

  • CheckListBoxGetCtl3D(FCheckListBox);

  • CheckListBoxGetCursor(FCheckListBox);

  • CheckListBoxGetDragCursor(FCheckListBox);

  • CheckListBoxGetDragMode(FCheckListBox);

  • CheckListBoxGetEnabled(FCheckListBox);

  • CheckListBoxGetFlat(FCheckListBox);

  • CheckListBoxGetFontColor(FCheckListBox);

  • CheckListBoxGetFontHeight(FCheckListBox);

  • CheckListBoxGetFontName(FCheckListBox);

  • CheckListBoxGetFontPitch(FCheckListBox);

  • CheckListBoxGetFontSize(FCheckListBox);

  • CheckListBoxGetFontStyle(FCheckListBox);

  • CheckListBoxGetHelpContext(FCheckListBox);

  • CheckListBoxGetHideSelection(FCheckListBox);

  • CheckListBoxGetHint(FCheckListBox);

  • CheckListBoxGetItemHeightFixed(FCheckListBox);

  • CheckListBoxGetMinItemHeight(FCheckListBox);

  • CheckListBoxGetOffset(FCheckListBox);

  • CheckListBoxGetParentColor(FCheckListBox);

  • CheckListBoxGetParentCtl3D(FCheckListBox);

  • CheckListBoxGetParentFont(FCheckListBox);

  • CheckListBoxGetParentShowHint(FCheckListBox);

  • CheckListBoxGetPopupMenu(FCheckListBox);

  • CheckListBoxGetShowHint(FCheckListBox);

  • CheckListBoxGetShowLines(FCheckListBox);

  • CheckListBoxGetShowRoot(FCheckListBox);

  • CheckListBoxGetTabOrder(FCheckListBox);

  • CheckListBoxGetTabStop(FCheckListBox);

  • CheckListBoxGetTag(FCheckListBox);

  • CheckListBoxGetTreeViewStyle(FCheckListBox);

  • CheckListBoxGetVisible(FCheckListBox);

  • CheckListBoxGetWantTabs(FCheckListBox);

  • CheckListBoxGetLeft(FCheckListBox);

  • CheckListBoxGetTop(FCheckListBox);

  • CheckListBoxGetHeight(FCheckListBox);

  • CheckListBoxGetWidth(FCheckListBox);

  • CheckListBoxGetBounds(FCheckListBox);

Code:
  • CheckListBoxSetParent(FCheckListBox, WizardForm);

  • CheckListBoxSetAlign(FCheckListBox, alNone);

  • CheckListBoxSetBorderStyle(FCheckListBox, bsSingle);

  • CheckListBoxSetColor(FCheckListBox, clWindow);

  • CheckListBoxSetCtl3D(FCheckListBox, True);

  • CheckListBoxSetCursor(FCheckListBox, crDefault);

  • CheckListBoxSetDragCursor(FCheckListBox, crDrag);

  • CheckListBoxSetDragMode(FCheckListBox, dmManual);

  • CheckListBoxSetEnabled(FCheckListBox, True);

  • CheckListBoxSetFlat(FCheckListBox, False);

  • CheckListBoxSetFontColor(FCheckListBox, clBlack);

  • CheckListBoxSetFontHeight(FCheckListBox, 20);

  • CheckListBoxSetFontName(FCheckListBox, 'Segoe UI');

  • CheckListBoxSetFontPitch(FCheckListBox, fpDefault);

  • CheckListBoxSetFontSize(FCheckListBox, 20);

  • CheckListBoxSetFontStyle(FCheckListBox, []);

  • CheckListBoxSetFont(FCheckListBox, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • CheckListBoxSetHelpContext(FCheckListBox, 0);

  • CheckListBoxSetHideSelection(FCheckListBox, False);

  • CheckListBoxSetHint(FCheckListBox, 'CheckListBox Create Hint');

  • CheckListBoxSetItemHeightFixed(FCheckListBox, False);

  • CheckListBoxSetMinItemHeight(FCheckListBox, 16);

  • CheckListBoxSetOffset(FCheckListBox, 4);

  • CheckListBoxSetParentColor(FCheckListBox, False);

  • CheckListBoxSetParentCtl3D(FCheckListBox, True);

  • CheckListBoxSetParentFont(FCheckListBox, True);

  • CheckListBoxSetParentShowHint(FCheckListBox, True);

  • CheckListBoxSetPopupMenu(FCheckListBox, nil);

  • CheckListBoxSetShowHint(FCheckListBox, False);

  • CheckListBoxSetShowLines(FCheckListBox, True);

  • CheckListBoxSetShowRoot(FCheckListBox, True);

  • CheckListBoxSetTabOrder(FCheckListBox, 0);

  • CheckListBoxSetTabStop(FCheckListBox, True);

  • CheckListBoxSetTag(FCheckListBox, 0);

  • CheckListBoxSetTreeViewStyle(FCheckListBox, False);

  • CheckListBoxSetVisible(FCheckListBox, True);

  • CheckListBoxSetWantTabs(FCheckListBox, False);

  • CheckListBoxSetLeft(FCheckListBox, 20);

  • CheckListBoxSetTop(FCheckListBox, 20);

  • CheckListBoxSetHeight(FCheckListBox, 200);

  • CheckListBoxSetWidth(FCheckListBox, 200);

  • CheckListBoxSetBounds(FCheckListBox, 20, 20, 200, 200);

Code:
CheckListBoxSetEvent(FCheckListBox, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 24-12-2022 08:27
TCheckListBoxCreate v2
 
2 Attachment(s)
TCheckListBoxCreate v2

Code:
  • CheckListBoxAddCheckBox(FCheckListBox, 'AddCheckBox', '', 0, False, False, False, True, nil);

  • CheckListBoxAddGroup(FCheckListBox, 'AddGroup', '', 4, nil);

  • CheckListBoxAddRadioButton(FCheckListBox, 'AddRadioButton (1)', '', 1, False, True, nil);

  • CheckListBoxAddRadioButton(FCheckListBox, 'AddRadioButton (2)', '', 1, False, True, nil);

  • CheckListBoxAddCheckBoxEx(FCheckListBox, 'AddCheckBoxEx', '', 0, False, False, False, True, nil, True);

  • CheckListBoxAddGroupEx(FCheckListBox, 'AddGroupEx', '', 4, nil, True);

  • CheckListBoxAddRadioButtonEx(FCheckListBox, 'AddRadioButtonEx (1)', '', 1, False, True, nil, True);

  • CheckListBoxAddRadioButtonEx(FCheckListBox, 'AddRadioButtonEx (2)', '', 1, False, True, nil, True);

  • CheckListBoxCheckItem(FCheckListBox, 1, coUncheck);

  • CheckListBoxCheckItem(FCheckListBox, 3, coCheck);

  • CheckListBoxCheckItem(FCheckListBox, 6, coCheckWithChildren);

Code:
  • CheckListBoxBtnFromBitmap(FCheckListBox, BtnImage.Bitmap);

  • CheckListBoxBtnFromFile(FCheckListBox,'BtnImage.bmp');

  • CheckListBoxBGFromBitmap(FCheckListBox, BGImage.Bitmap, CheckListBoxGetLeft(FCheckListBox)-20, CheckListBoxGetTop(FCheckListBox)-20);

  • CheckListBoxBGFromFile(FCheckListBox, 'BGImage.bmp', CheckListBoxGetLeft(FCheckListBox)-20, CheckListBoxGetTop(FCheckListBox)-20);

DelphiBuilder 24-12-2022 11:03
TCheckListBoxCreate v3
 
2 Attachment(s)
TCheckListBoxCreate v3

Code:
  • CheckListBoxGetItemCount(FCheckListBox);

  • CheckListBoxGetAbsItemIndex(FCheckListBox);

  • CheckListBoxGetSubItemFontStyle(FCheckListBox, 0);

  • CheckListBoxGetItemFontStyle(FCheckListBox, 0);

  • CheckListBoxGetItemExpanded(FCheckListBox, 2);

  • CheckListBoxGetChecked(FCheckListBox, 2);

  • CheckListBoxGetState(FCheckListBox, 3);

  • CheckListBoxGetItemCaption(FCheckListBox, 3);

  • CheckListBoxGetItemEnabled(FCheckListBox, 5);

  • CheckListBoxGetItemLevel(FCheckListBox, 5);

  • CheckListBoxGetItemObject(FCheckListBox, 6);

  • CheckListBoxGetItemSubItem(FCheckListBox, 6);

Code:
  • CheckListBoxSetSubItemFontStyle(FCheckListBox, 0, [fsBold]);

  • CheckListBoxSetItemFontStyle(FCheckListBox, 0, [fsItalic]);

  • CheckListBoxSetItemExpanded(FCheckListBox, 3, True);

  • CheckListBoxSetChecked(FCheckListBox, 3, True);

  • CheckListBoxSetItemCaption(FCheckListBox, 5, 'ItemCaption');

  • CheckListBoxSetItemEnabled(FCheckListBox, 5, True);

  • CheckListBoxSetItemObject(FCheckListBox, 6, nil);

  • CheckListBoxSetItemSubItem(FCheckListBox, 6, 'ItemSubItem');

Code:
  • ExtractTemporaryFile('BtnImage.bmp');

  • ExtractTemporaryFile('BGImage.bmp');

  • CheckListBoxBtnFromFile(FCheckListBox, ExpandConstant('{tmp}\BtnImage.bmp'));

  • CheckListBoxBGFromFile(FCheckListBox, ExpandConstant('{tmp}\BGImage.bmp'), CheckListBoxGetLeft(FCheckListBox)-20, CheckListBoxGetTop(FCheckListBox)-20);

DelphiBuilder 24-12-2022 12:21
TStaticTextCreate
 
2 Attachment(s)
TStaticTextCreate

Code:
FStaticText:=StaticTextCreate(WizardForm, alNone, True, 'StaticText Create', clBtnFace, crDefault, crDrag, dmManual, True, nil, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, 'StaticText Create Hint', True, True, True, 0, True, False, 0, False, 0, True, True, False, 20, 20, 200, 200, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
  • StaticTextGetParent(FStaticText);

  • StaticTextGetAlign(FStaticText);

  • StaticTextGetAutoSize(FStaticText);

  • StaticTextGetCaption(FStaticText);

  • StaticTextGetColor(FStaticText);

  • StaticTextGetCursor(FStaticText);

  • StaticTextGetDragCursor(FStaticText);

  • StaticTextGetDragMode(FStaticText);

  • StaticTextGetEnabled(FStaticText);

  • StaticTextGetFocusControl(FStaticText);

  • StaticTextGetFontColor(FStaticText);

  • StaticTextGetFontHeight(FStaticText);

  • StaticTextGetFontName(FStaticText);

  • StaticTextGetFontPitch(FStaticText);

  • StaticTextGetFontSize(FStaticText);

  • StaticTextGetFontStyle(FStaticText);

  • StaticTextGetHelpContext(FStaticText);

  • StaticTextGetHint(FStaticText);

  • StaticTextGetParentColor(FStaticText);

  • StaticTextGetParentFont(FStaticText);

  • StaticTextGetParentShowHint(FStaticText);

  • StaticTextGetPopupMenu(FStaticText);

  • StaticTextGetShowAccelChar(FStaticText);

  • StaticTextGetShowHint(FStaticText);

  • StaticTextGetTabOrder(FStaticText);

  • StaticTextGetTabStop(FStaticText);

  • StaticTextGetTag(FStaticText);

  • StaticTextGetTransparent(FStaticText);

  • StaticTextGetVisible(FStaticText);

  • StaticTextGetWordWrap(FStaticText);

  • StaticTextGetLeft(FStaticText);

  • StaticTextGetTop(FStaticText);

  • StaticTextGetHeight(FStaticText);

  • StaticTextGetWidth(FStaticText);

  • StaticTextGetBounds(FStaticText);

  • StaticTextGetAdjustHeight(FStaticText);

Code:
  • StaticTextSetParent(FStaticText, WizardForm);

  • StaticTextSetAlign(FStaticText, alNone);

  • StaticTextSetAutoSize(FStaticText, True);

  • StaticTextSetCaption(FStaticText, 'StaticText Create');

  • StaticTextSetColor(FStaticText, clBtnFace);

  • StaticTextSetCursor(FStaticText, crDefault);

  • StaticTextSetDragCursor(FStaticText, crDrag);

  • StaticTextSetDragMode(FStaticText, dmManual);

  • StaticTextSetEnabled(FStaticText, True);

  • StaticTextSetFocusControl(FStaticText, nil);

  • StaticTextSetFontColor(FStaticText, clBlack);

  • StaticTextSetFontHeight(FStaticText, 20);

  • StaticTextSetFontName(FStaticText, 'Segoe UI');

  • StaticTextSetFontPitch(FStaticText, fpDefault);

  • StaticTextSetFontSize(FStaticText, 20);

  • StaticTextSetFontStyle(FStaticText, []);

  • StaticTextSetFont(FStaticText, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • StaticTextSetHelpContext(FStaticText, 0);

  • StaticTextSetHint(FStaticText, 'StaticText Create Hint');

  • StaticTextSetParentColor(FStaticText, True);

  • StaticTextSetParentFont(FStaticText, True);

  • StaticTextSetParentShowHint(FStaticText, True);

  • StaticTextSetPopupMenu(FStaticText, 0);

  • StaticTextSetShowAccelChar(FStaticText, True);

  • StaticTextSetShowHint(FStaticText, True);

  • StaticTextSetTabOrder(FStaticText, 0);

  • StaticTextSetTabStop(FStaticText, False);

  • StaticTextSetTag(FStaticText, 0);

  • StaticTextSetTransparent(FStaticText, True);

  • StaticTextSetVisible(FStaticText, True);

  • StaticTextSetWordWrap(FStaticText, True);

  • StaticTextSetLeft(FStaticText, 20);

  • StaticTextSetTop(FStaticText, 20);

  • StaticTextSetHeight(FStaticText, 200);

  • StaticTextSetWidth(FStaticText, 200);

  • StaticTextSetBounds(FStaticText, 20, 20, 200, 200);

Code:
StaticTextSetEvent(FStaticText, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 24-12-2022 14:09
TFolderTreeViewCreate
 
2 Attachment(s)
TFolderTreeViewCreate

Code:
FFolderTreeView:=FolderTreeViewCreate(WizardForm, crDefault, 'C:\Directory', 0, 'FolderTreeView Create Hint', True, 0, True, 0, True, 20, 20, 200, 200, @OnChange, nil);
Code:
  • FolderTreeViewGetParent(FFolderTreeView);

  • FolderTreeViewGetCursor(FFolderTreeView);

  • FolderTreeViewGetDirectory(FFolderTreeView);

  • FolderTreeViewGetHelpContext(FFolderTreeView);

  • FolderTreeViewGetHint(FFolderTreeView);

  • FolderTreeViewGetShowAllFolders(FFolderTreeView);

  • FolderTreeViewGetTabOrder(FFolderTreeView);

  • FolderTreeViewGetTabStop(FFolderTreeView);

  • FolderTreeViewGetTag(FFolderTreeView);

  • FolderTreeViewGetVisible(FFolderTreeView);

  • FolderTreeViewGetLeft(FFolderTreeView);

  • FolderTreeViewGetTop(FFolderTreeView);

  • FolderTreeViewGetHeight(FFolderTreeView);

  • FolderTreeViewGetWidth(FFolderTreeView);

  • FolderTreeViewGetBounds(FFolderTreeView);

Code:
  • FolderTreeViewSetParent(FFolderTreeView, WizardForm);

  • FolderTreeViewSetCursor(FFolderTreeView, crDefault);

  • FolderTreeViewSetDirectory(FFolderTreeView, 'C:\Directory');

  • FolderTreeViewSetHelpContext(FFolderTreeView, 0);

  • FolderTreeViewSetHint(FFolderTreeView, 'FolderTreeView Create Hint');

  • FolderTreeViewSetShowAllFolders(FFolderTreeView, True);

  • FolderTreeViewSetTabOrder(FFolderTreeView, 0);

  • FolderTreeViewSetTabStop(FFolderTreeView, True);

  • FolderTreeViewSetTag(FFolderTreeView, 0);

  • FolderTreeViewSetVisible(FFolderTreeView, True);

  • FolderTreeViewSetLeft(FFolderTreeView, 20);

  • FolderTreeViewSetTop(FFolderTreeView, 20);

  • FolderTreeViewSetHeight(FFolderTreeView, 200);

  • FolderTreeViewSetWidth(FFolderTreeView, 200);

  • FolderTreeViewSetBounds(FFolderTreeView, 20, 20, 200, 200);

Code:
FolderTreeViewSetEvent(FFolderTreeView, @OnChange, nil);
Code:
  • FolderTreeViewChangeDirectory(FFolderTreeView, 'C:\Windows', True);

  • FolderTreeViewCreateNewDirectory(FFolderTreeView, 'C:\CreateNewDirectory');

DelphiBuilder 24-12-2022 14:57
TStartMenuTreeViewCreate
 
2 Attachment(s)
TStartMenuTreeViewCreate

Code:
FStartMenuTreeView:=StartMenuTreeViewCreate(WizardForm, crDefault, 0, 'StartMenuTreeView Create Hint', 0, True, 0, True, 20, 20, 200, 200, @OnChange, nil);
Code:
  • StartMenuTreeViewGetParent(FStartMenuTreeView);

  • StartMenuTreeViewGetCursor(FStartMenuTreeView);

  • StartMenuTreeViewGetHelpContext(FStartMenuTreeView);

  • StartMenuTreeViewGetHint(FStartMenuTreeView);

  • StartMenuTreeViewGetTabOrder(FStartMenuTreeView);

  • StartMenuTreeViewGetTabStop(FStartMenuTreeView);

  • StartMenuTreeViewGetTag(FStartMenuTreeView);

  • StartMenuTreeViewGetVisible(FStartMenuTreeView);

  • StartMenuTreeViewGetLeft(FStartMenuTreeView);

  • StartMenuTreeViewGetTop(FStartMenuTreeView);

  • StartMenuTreeViewGetHeight(FStartMenuTreeView);

  • StartMenuTreeViewGetWidth(FStartMenuTreeView);

  • StartMenuTreeViewGetBounds(FStartMenuTreeView);

Code:
  • StartMenuTreeViewSetParent(FStartMenuTreeView, WizardForm);

  • StartMenuTreeViewSetCursor(FStartMenuTreeView, crDefault);

  • StartMenuTreeViewSetHelpContext(FStartMenuTreeView, 0);

  • StartMenuTreeViewSetHint(FStartMenuTreeView, 'StartMenuTreeView Create Hint');

  • StartMenuTreeViewSetTabOrder(FStartMenuTreeView, 0);

  • StartMenuTreeViewSetTabStop(FStartMenuTreeView, True);

  • StartMenuTreeViewSetTag(FStartMenuTreeView, 0);

  • StartMenuTreeViewSetVisible(FStartMenuTreeView, True);

  • StartMenuTreeViewSetLeft(FStartMenuTreeView, 20);

  • StartMenuTreeViewSetTop(FStartMenuTreeView, 20);

  • StartMenuTreeViewSetHeight(FStartMenuTreeView, 200);

  • StartMenuTreeViewSetWidth(FStartMenuTreeView, 200);

  • StartMenuTreeViewSetBounds(FStartMenuTreeView, 20, 20, 200, 200);

Code:
StartMenuTreeViewSetEvent(FStartMenuTreeView, @OnChange, nil);
Code:
StartMenuTreeViewSetPaths(FStartMenuTreeView, '{userprograms}', '{commonprograms}', '{userstartup}', '{commonstartup}');

DelphiBuilder 25-12-2022 01:34
TRichEditViewerCreate
 
2 Attachment(s)
TRichEditViewerCreate

Code:
FRichEditViewer:=RichEditViewerCreate(WizardForm, alNone, taLeftJustify, bsSingle, clWindow, True, crDefault, False, crDrag, dmManual, True, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, True, 'RichEditViewer Create Hint', 0, False, False, True, True, True, nil, False, 'RichEditViewer Create', ssVertical, False, 0, True, 0, True, True, True, True, False, True, 20, 20, 200, 200, nil, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Code:
  • RichEditViewerGetParent(FRichEditViewer);

  • RichEditViewerGetAlign(FRichEditViewer);

  • RichEditViewerGetAlignment(FRichEditViewer);

  • RichEditViewerGetBorderStyle(FRichEditViewer);

  • RichEditViewerGetColor(FRichEditViewer);

  • RichEditViewerGetCtl3D(FRichEditViewer);

  • RichEditViewerGetCursor(FRichEditViewer);

  • RichEditViewerGetDoubleBuffered(FRichEditViewer);

  • RichEditViewerGetDragCursor(FRichEditViewer);

  • RichEditViewerGetDragMode(FRichEditViewer);

  • RichEditViewerGetEnabled(FRichEditViewer);

  • RichEditViewerGetFontColor(FRichEditViewer);

  • RichEditViewerGetFontHeight(FRichEditViewer);

  • RichEditViewerGetFontName(FRichEditViewer);

  • RichEditViewerGetFontPitch(FRichEditViewer);

  • RichEditViewerGetFontSize(FRichEditViewer);

  • RichEditViewerGetFontStyle(FRichEditViewer);

  • RichEditViewerGetHelpContext(FRichEditViewer);

  • RichEditViewerGetHideSelection(FRichEditViewer);

  • RichEditViewerGetHint(FRichEditViewer);

  • RichEditViewerGetMaxLength(FRichEditViewer);

  • RichEditViewerGetOEMConvert(FRichEditViewer);

  • RichEditViewerGetParentColor(FRichEditViewer);

  • RichEditViewerGetParentCtl3D(FRichEditViewer);

  • RichEditViewerGetParentFont(FRichEditViewer);

  • RichEditViewerGetParentShowHint(FRichEditViewer);

  • RichEditViewerGetPopupMenu(FRichEditViewer);

  • RichEditViewerGetReadOnly(FRichEditViewer);

  • RichEditViewerGetScrollBars(FRichEditViewer);

  • RichEditViewerGetShowHint(FRichEditViewer);

  • RichEditViewerGetTabOrder(FRichEditViewer);

  • RichEditViewerGetTabStop(FRichEditViewer);

  • RichEditViewerGetTag(FRichEditViewer);

  • RichEditViewerGetThemeBorder(FRichEditViewer);

  • RichEditViewerGetUseRichEdit(FRichEditViewer);

  • RichEditViewerGetVisible(FRichEditViewer);

  • RichEditViewerGetWantReturns(FRichEditViewer);

  • RichEditViewerGetWantTabs(FRichEditViewer);

  • RichEditViewerGetWordWrap(FRichEditViewer);

  • RichEditViewerGetLeft(FRichEditViewer);

  • RichEditViewerGetTop(FRichEditViewer);

  • RichEditViewerGetHeight(FRichEditViewer);

  • RichEditViewerGetWidth(FRichEditViewer);

  • RichEditViewerGetBounds(FRichEditViewer);

Code:
  • RichEditViewerSetParent(FRichEditViewer, WizardForm);

  • RichEditViewerSetAlign(FRichEditViewer, alNone);

  • RichEditViewerSetAlignment(FRichEditViewer, taLeftJustify);

  • RichEditViewerSetBorderStyle(FRichEditViewer, bsSingle);

  • RichEditViewerSetColor(FRichEditViewer, clWindow);

  • RichEditViewerSetCtl3D(FRichEditViewer, True);

  • RichEditViewerSetCursor(FRichEditViewer, crDefault);

  • RichEditViewerSetDoubleBuffered(FRichEditViewer, False);

  • RichEditViewerSetDragCursor(FRichEditViewer, crDrag);

  • RichEditViewerSetDragMode(FRichEditViewer, dmManual);

  • RichEditViewerSetEnabled(FRichEditViewer, True);

  • RichEditViewerSetFontColor(FRichEditViewer, clBlack);

  • RichEditViewerSetFontHeight(FRichEditViewer, 20);

  • RichEditViewerSetFontName(FRichEditViewer, 'Segoe UI');

  • RichEditViewerSetFontPitch(FRichEditViewer, fpDefault);

  • RichEditViewerSetFontSize(FRichEditViewer, 20);

  • RichEditViewerSetFontStyle(FRichEditViewer, []);

  • RichEditViewerSetFont(FRichEditViewer, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • RichEditViewerSetHelpContext(FRichEditViewer, 0);

  • RichEditViewerSetHideSelection(FRichEditViewer, True);

  • RichEditViewerSetHint(FRichEditViewer, 'RichEditViewer Create Hint');

  • RichEditViewerSetMaxLength(FRichEditViewer, 0);

  • RichEditViewerSetOEMConvert(FRichEditViewer, False);

  • RichEditViewerSetParentColor(FRichEditViewer, False);

  • RichEditViewerSetParentCtl3D(FRichEditViewer, True);

  • RichEditViewerSetParentFont(FRichEditViewer, True);

  • RichEditViewerSetParentShowHint(FRichEditViewer, True);

  • RichEditViewerSetPopupMenu(FRichEditViewer, nil);

  • RichEditViewerSetReadOnly(FRichEditViewer, False);

  • RichEditViewerSetRTFText(FRichEditViewer, 'RichEditViewer Create');

  • RichEditViewerSetScrollBars(FRichEditViewer, ssVertical);

  • RichEditViewerSetShowHint(FRichEditViewer, False);

  • RichEditViewerSetTabOrder(FRichEditViewer, 0);

  • RichEditViewerSetTabStop(FRichEditViewer, True);

  • RichEditViewerSetTag(FRichEditViewer, 0);

  • RichEditViewerSetThemeBorder(FRichEditViewer, True);

  • RichEditViewerSetUseRichEdit(FRichEditViewer, True);

  • RichEditViewerSetVisible(FRichEditViewer, True);

  • RichEditViewerSetWantReturns(FRichEditViewer, True);

  • RichEditViewerSetWantTabs(FRichEditViewer, False);

  • RichEditViewerSetWordWrap(FRichEditViewer, True);

  • RichEditViewerSetLeft(FRichEditViewer, 20);

  • RichEditViewerSetTop(FRichEditViewer, 20);

  • RichEditViewerSetHeight(FRichEditViewer, 200);

  • RichEditViewerSetWidth(FRichEditViewer, 200);

  • RichEditViewerSetBounds(FRichEditViewer, 20, 20, 200, 200);

Code:
RichEditViewerSetEvent(FRichEditViewer, nil, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 25-12-2022 02:28
TProgressBarCreate
 
2 Attachment(s)
TProgressBarCreate

Code:
FProgressBar:=ProgressBarCreate(WizardForm, crDefault, True, 0, 'ProgressBar Create Hint', 100, 0, 0, npbsNormal, npbstMarquee, 0, True, 20, 20, 20, 200);
Code:
  • ProgressBarGetParent(FProgressBar);

  • ProgressBarGetCursor(FProgressBar);

  • ProgressBarGetEnabled(FProgressBar);

  • ProgressBarGetHelpContext(FProgressBar);

  • ProgressBarGetHint(FProgressBar);

  • ProgressBarGetMax(FProgressBar);

  • ProgressBarGetMin(FProgressBar);

  • ProgressBarGetPosition(FProgressBar);

  • ProgressBarGetState(FProgressBar);

  • ProgressBarGetStyle(FProgressBar);

  • ProgressBarGetTag(FProgressBar);

  • ProgressBarGetVisible(FProgressBar);

  • ProgressBarGetLeft(FProgressBar);

  • ProgressBarGetTop(FProgressBar);

  • ProgressBarGetHeight(FProgressBar);

  • ProgressBarGetWidth(FProgressBar);

  • ProgressBarGetBounds(FProgressBar);

Code:
  • ProgressBarSetParent(FProgressBar, WizardForm);

  • ProgressBarSetCursor(FProgressBar, crDefault);

  • ProgressBarSetEnabled(FProgressBar, True);

  • ProgressBarSetHelpContext(FProgressBar, 0);

  • ProgressBarSetHint(FProgressBar, 'ProgressBar Create Hint');

  • ProgressBarSetMax(FProgressBar, 100);

  • ProgressBarSetMin(FProgressBar, 0);

  • ProgressBarSetPosition(FProgressBar, 0);

  • ProgressBarSetState(FProgressBar, npbsNormal);

  • ProgressBarSetStyle(FProgressBar, npbstMarquee);

  • ProgressBarSetTag(FProgressBar, 0);

  • ProgressBarSetVisible(FProgressBar, True);

  • ProgressBarSetLeft(FProgressBar, 20);

  • ProgressBarSetTop(FProgressBar, 20);

  • ProgressBarSetHeight(FProgressBar, 20);

  • ProgressBarSetWidth(FProgressBar, 200);

  • ProgressBarSetBounds(FProgressBar, 20, 20, 20, 200);

DelphiBuilder 25-12-2022 10:10
2 Attachment(s)
TNotebookCreate / TNotebookPageCreate

Code:
FNotebookPage:=NotebookPageCreate(WizardForm, clWhite, nil, wpWelcome, crDefault, True, 0, 'Notebook Page Create Hint', True, False, 0, True, 0, 0, 200, 200);
 FNotebook:=NotebookCreate(WizardForm, nil, alNone, crDefault, True, 0, 'Notebook Create Hint', True, False, 0, False, 0, True, 20, 20, 200, 200);
Code:
  • NotebookGetParent(FNotebook);

  • NotebookGetActivePage(FNotebook);

  • NotebookGetAlign(FNotebook);

  • NotebookGetCursor(FNotebook);

  • NotebookGetEnabled(FNotebook);

  • NotebookGetHelpContext(FNotebook);

  • NotebookGetHint(FNotebook);

  • NotebookGetParentShowHint(FNotebook);

  • NotebookGetShowHint(FNotebook);

  • NotebookGetTabOrder(FNotebook);

  • NotebookGetTabStop(FNotebook);

  • NotebookGetTag(FNotebook);

  • NotebookGetVisible(FNotebook);

  • NotebookGetLeft(FNotebook);

  • NotebookGetTop(FNotebook);

  • NotebookGetHeight(FNotebook);

  • NotebookGetWidth(FNotebook);

  • NotebookGetBounds(FNotebook);

Code:
  • NotebookSetParent(FNotebook, WizardForm);

  • NotebookSetActivePage(FNotebook, nil);

  • NotebookSetAlign(FNotebook, alNone);

  • NotebookSetCursor(FNotebook, crDefault);

  • NotebookSetEnabled(FNotebook, True);

  • NotebookSetHelpContext(FNotebook, 0);

  • NotebookSetHint(FNotebook, 'Notebook Create Hint');

  • NotebookSetParentShowHint(FNotebook, True);

  • NotebookSetShowHint(FNotebook, False);

  • NotebookSetTabOrder(FNotebook, 0);

  • NotebookSetTabStop(FNotebook, False);

  • NotebookSetTag(FNotebook, 0);

  • NotebookSetVisible(FNotebook, True);

  • NotebookSetLeft(FNotebook, 20);

  • NotebookSetTop(FNotebook, 20);

  • NotebookSetHeight(FNotebook, 200);

  • NotebookSetWidth(FNotebook, 200);

  • NotebookSetBounds(FNotebook, 20, 20, 200, 200);

  • NotebookPageCount(FNotebook);

  • //NotebookPages(FNotebook, wpWelcome);

  • NotebookFindNextPage(FNotebook, wpWelcome, True);

DelphiBuilder 27-12-2022 02:01
TGroupBoxCreate
 
2 Attachment(s)
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);

DelphiBuilder 27-12-2022 02:52
THotKeyCreate
 
2 Attachment(s)
THotKeyCreate

Code:
FHotKey:=HotKeyCreate(WizardForm, True, clBtnFace, crDefault, False, True, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, 'HotKey Create Hint', 32833, [hcNone,hcShift], [hkAlt], False, True, nil, False, 0, True, 0, True, 20, 20, 200, 200, nil, nil, nil, nil, nil, nil, nil);
Code:
  • HotKeyGetParent(FHotKey);

  • HotKeyGetAutoSize(FHotKey);

  • HotKeyGetColor(FHotKey);

  • HotKeyGetCursor(FHotKey);

  • HotKeyGetDoubleBuffered(FHotKey);

  • HotKeyGetEnabled(FHotKey);

  • HotKeyGetFontColor(FHotKey);

  • HotKeyGetFontHeight(FHotKey);

  • HotKeyGetFontName(FHotKey);

  • HotKeyGetFontPitch(FHotKey);

  • HotKeyGetFontSize(FHotKey);

  • HotKeyGetFontStyle(FHotKey);

  • HotKeyGetHelpContext(FHotKey);

  • HotKeyGetHint(FHotKey);

  • HotKeyGetHotKey(FHotKey);

  • HotKeyGetInvalidKeys(FHotKey);

  • HotKeyGetModifiers(FHotKey);

  • HotKeyGetParentColor(FHotKey);

  • HotKeyGetParentFont(FHotKey);

  • HotKeyGetPopupMenu(FHotKey);

  • HotKeyGetShowHint(FHotKey);

  • HotKeyGetTabOrder(FHotKey);

  • HotKeyGetTabStop(FHotKey);

  • HotKeyGetTag(FHotKey);

  • HotKeyGetVisible(FHotKey);

  • HotKeyGetLeft(FHotKey);

  • HotKeyGetTop(FHotKey);

  • HotKeyGetHeight(FHotKey);

  • HotKeyGetWidth(FHotKey);

  • HotKeyGetBounds(FHotKey);

Code:
  • HotKeySetParent(FHotKey, WizardForm);

  • HotKeySetAutoSize(FHotKey, True);

  • HotKeySetColor(FHotKey, clWindow);

  • HotKeySetCursor(FHotKey, crDefault);

  • HotKeySetDoubleBuffered(FHotKey, False);

  • HotKeySetEnabled(FHotKey, True);

  • HotKeySetFontColor(FHotKey, clBlack);

  • HotKeySetFontHeight(FHotKey, 20);

  • HotKeySetFontName(FHotKey, 'Segoe UI');

  • HotKeySetFontPitch(FHotKey, fpDefault);

  • HotKeySetFontSize(FHotKey, 20);

  • HotKeySetFontStyle(FHotKey, []);

  • HotKeySetFont(FHotKey, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • HotKeySetHelpContext(FHotKey, 0);

  • HotKeySetHint(FHotKey, 'HotKey Create Hint');

  • HotKeySetHotKey(FHotKey, 32833);  //32833 = Alt+A

  • HotKeySetInvalidKeys(FHotKey, [hcNone,hcShift]);

  • HotKeySetModifiers(FHotKey, [hkAlt]);

  • HotKeySetParentColor(FHotKey, False);

  • HotKeySetParentFont(FHotKey, True);

  • HotKeySetPopupMenu(FHotKey, nil);

  • HotKeySetShowHint(FHotKey, False);

  • HotKeySetTabOrder(FHotKey, 0);

  • HotKeySetTabStop(FHotKey, True);

  • HotKeySetTag(FHotKey, 0);

  • HotKeySetVisible(FHotKey, True);

  • HotKeySetLeft(FHotKey, 20);

  • HotKeySetTop(FHotKey, 20);

  • HotKeySetHeight(FHotKey, 200);

  • HotKeySetWidth(FHotKey, 200);

  • HotKeySetBounds(FHotKey, 20, 20, 200, 200);

Code:
HotKeySetEvent(FHotKey, nil, nil, nil, nil, nil, nil, nil);

DelphiBuilder 27-12-2022 07:45
TUpDownCreate
 
2 Attachment(s)
TUpDownCreate

Code:
FUpDown:=UpDownCreate(WizardForm, udRight, True, nil, crDefault, False, True, 0, 'UpDown Create Hint', 1, 100, 0, udVertical, 0, False, 0, False, 0, True, True, False, 20, 20, 200, 200, nil, nil);
Code:
  • UpDownGetParent(FUpDown);

  • UpDownGetAlignButton(FUpDown);

  • UpDownGetArrowKeys(FUpDown);

  • UpDownGetAssociate(FUpDown);

  • UpDownGetCursor(FUpDown);

  • UpDownGetDoubleBuffered(FUpDown);

  • UpDownGetEnabled(FUpDown);

  • UpDownGetHelpContext(FUpDown);

  • UpDownGetHint(FUpDown);

  • UpDownGetIncrement(FUpDown);

  • UpDownGetMax(FUpDown);

  • UpDownGetMin(FUpDown);

  • UpDownGetOrientation(FUpDown);

  • UpDownGetPosition(FUpDown);

  • UpDownGetShowHint(FUpDown);

  • UpDownGetTabOrder(FUpDown);

  • UpDownGetTabStop(FUpDown);

  • UpDownGetTag(FUpDown);

  • UpDownGetThousands(FUpDown);

  • UpDownGetVisible(FUpDown);

  • UpDownGetWrap(FUpDown);

  • UpDownGetLeft(FUpDown);

  • UpDownGetTop(FUpDown);

  • UpDownGetHeight(FUpDown);

  • UpDownGetWidth(FUpDown);

  • UpDownGetBounds(FUpDown);

Code:
  • UpDownSetParent(FUpDown, WizardForm);

  • UpDownSetAlignButton(FUpDown, udRight);

  • UpDownSetArrowKeys(FUpDown, True);

  • UpDownSetAssociate(FUpDown, nil);

  • UpDownSetCursor(FUpDown, crDefault);

  • UpDownSetDoubleBuffered(FUpDown, False);

  • UpDownSetEnabled(FUpDown, True);

  • UpDownSetHelpContext(FUpDown, 0);

  • UpDownSetHint(FUpDown, 'UpDown Create Hint');

  • UpDownSetIncrement(FUpDown, 1);

  • UpDownSetMax(FUpDown, 100);

  • UpDownSetMin(FUpDown, 0);

  • UpDownSetOrientation(FUpDown, udVertical);

  • UpDownSetPosition(FUpDown, 0);

  • UpDownSetShowHint(FUpDown, False);

  • UpDownSetTabOrder(FUpDown, 0);

  • UpDownSetTabStop(FUpDown, False);

  • UpDownSetTag(FUpDown, 0);

  • UpDownSetThousands(FUpDown, True);

  • UpDownSetVisible(FUpDown, True);

  • UpDownSetWrap(FUpDown, False);

  • UpDownSetLeft(FUpDown, 20);

  • UpDownSetTop(FUpDown, 20);

  • UpDownSetHeight(FUpDown, 200);

  • UpDownSetWidth(FUpDown, 200);

  • UpDownSetBounds(FUpDown, 20, 20, 200, 200);

Code:
UpDownSetEvent(FUpDown, nil, nil);

DelphiBuilder 28-12-2022 03:37
TIPAddressEditCreate
 
2 Attachment(s)
TIPAddressEditCreate

Code:
FIPAddressEdit:=IPAddressEditCreate(WizardForm, clWindow, crDefault, True, 255, 0, 0, 255, 0, 0, 255, 0, 0, 255, 0, 0, clBlack, 20, 'Segoe UI', fpDefault, 20, [], 0, 'IPAddressEdit Create Hint', True, 0, False, True, False, 0, True, 0, True, 20, 20, 200, 200, nil, nil, nil, nil);
Code:
  • IPAddressEditGetParent(FIPAddressEdit);

  • IPAddressEditGetColor(FIPAddressEdit);

  • IPAddressEditGetCursor(FIPAddressEdit);

  • IPAddressEditGetEnabled(FIPAddressEdit);

  • IPAddressEditGetField1Max(FIPAddressEdit);

  • IPAddressEditGetField1Min(FIPAddressEdit);

  • IPAddressEditGetField1Value(FIPAddressEdit);

  • IPAddressEditGetField2Max(FIPAddressEdit);

  • IPAddressEditGetField2Min(FIPAddressEdit);

  • IPAddressEditGetField2Value(FIPAddressEdit);

  • IPAddressEditGetField3Max(FIPAddressEdit);

  • IPAddressEditGetField3Min(FIPAddressEdit);

  • IPAddressEditGetField3Value(FIPAddressEdit);

  • IPAddressEditGetField4Max(FIPAddressEdit);

  • IPAddressEditGetField4Min(FIPAddressEdit);

  • IPAddressEditGetField4Value(FIPAddressEdit);

  • IPAddressEditGetFontColor(FIPAddressEdit);

  • IPAddressEditGetFontHeight(FIPAddressEdit);

  • IPAddressEditGetFontName(FIPAddressEdit);

  • IPAddressEditGetFontPitch(FIPAddressEdit);

  • IPAddressEditGetFontSize(FIPAddressEdit);

  • IPAddressEditGetFontStyle(FIPAddressEdit);

  • IPAddressEditGetHelpContext(FIPAddressEdit);

  • IPAddressEditGetHint(FIPAddressEdit);

  • IPAddressEditGetInitClear(FIPAddressEdit);

  • IPAddressEditGetIPValue(FIPAddressEdit);

  • IPAddressEditGetParentColor(FIPAddressEdit);

  • IPAddressEditGetParentFont(FIPAddressEdit);

  • IPAddressEditGetShowHint(FIPAddressEdit);

  • IPAddressEditGetTabOrder(FIPAddressEdit);

  • IPAddressEditGetTabStop(FIPAddressEdit);

  • IPAddressEditGetTag(FIPAddressEdit);

  • IPAddressEditGetVisible(FIPAddressEdit);

  • IPAddressEditGetLeft(FIPAddressEdit);

  • IPAddressEditGetTop(FIPAddressEdit);

  • IPAddressEditGetHeight(FIPAddressEdit);

  • IPAddressEditGetWidth(FIPAddressEdit);

  • IPAddressEditGetBounds(FIPAddressEdit);

Code:
  • IPAddressEditSetParent(FIPAddressEdit, WizardForm);

  • IPAddressEditSetColor(FIPAddressEdit, clWindow);

  • IPAddressEditSetCursor(FIPAddressEdit, crDefault);

  • IPAddressEditSetEnabled(FIPAddressEdit, True);

  • IPAddressEditSetField1Max(FIPAddressEdit, 255);

  • IPAddressEditSetField1Min(FIPAddressEdit, 0);

  • IPAddressEditSetField1Value(FIPAddressEdit, 0);

  • IPAddressEditSetField2Max(FIPAddressEdit, 255);

  • IPAddressEditSetField2Min(FIPAddressEdit, 0);

  • IPAddressEditSetField2Value(FIPAddressEdit, 0);

  • IPAddressEditSetField3Max(FIPAddressEdit, 255);

  • IPAddressEditSetField3Min(FIPAddressEdit, 0);

  • IPAddressEditSetField3Value(FIPAddressEdit, 0);

  • IPAddressEditSetField4Max(FIPAddressEdit, 255);

  • IPAddressEditSetField4Min(FIPAddressEdit, 0);

  • IPAddressEditSetField4Value(FIPAddressEdit, 0);

  • IPAddressEditSetFontColor(FIPAddressEdit, clBlack);

  • IPAddressEditSetFontHeight(FIPAddressEdit, 20);

  • IPAddressEditSetFontName(FIPAddressEdit, 'Segoe UI');

  • IPAddressEditSetFontPitch(FIPAddressEdit, fpDefault);

  • IPAddressEditSetFontSize(FIPAddressEdit, 20);

  • IPAddressEditSetFontStyle(FIPAddressEdit, []);

  • IPAddressEditSetFont(FIPAddressEdit, clBlack, 20, 'Segoe UI', fpDefault, 20, []);

  • IPAddressEditSetHelpContext(FIPAddressEdit, 0);

  • IPAddressEditSetHint(FIPAddressEdit, 'IPAddressEdit Create Hint');

  • IPAddressEditSetInitClear(FIPAddressEdit, True);

  • IPAddressEditSetIPValue(FIPAddressEdit, 0);

  • IPAddressEditSetParentColor(FIPAddressEdit, False);

  • IPAddressEditSetParentFont(FIPAddressEdit, True);

  • IPAddressEditSetShowHint(FIPAddressEdit, False);

  • IPAddressEditSetTabOrder(FIPAddressEdit, 0);

  • IPAddressEditSetTabStop(FIPAddressEdit, True);

  • IPAddressEditSetTag(FIPAddressEdit, 0);

  • IPAddressEditSetVisible(FIPAddressEdit, True);

  • IPAddressEditSetLeft(FIPAddressEdit, 20);

  • IPAddressEditSetTop(FIPAddressEdit, 20);

  • IPAddressEditSetHeight(FIPAddressEdit, 200);

  • IPAddressEditSetWidth(FIPAddressEdit, 200);

  • IPAddressEditSetBounds(FIPAddressEdit, 20, 20, 200, 200);

Code:
IPAddressEditSetEvent(FIPAddressEdit, nil, nil, nil, nil);


All times are GMT -7. The time now is 23:09.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions Inc.
FileForums @ https://fileforums.com