Advanced Inno Setup Example

[DelphiBuilder]

TStaticTextCreate

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

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

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

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