[DelphiBuilder]

TMemoCreate

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

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

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

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