Advanced Inno Setup Example

[DelphiBuilder]

TCheckListBoxCreate

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);

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);

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);

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