FileForums
Page 2 of 2 1 2
Show 40 post(s) from this thread on one page

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 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 11:32.
Page 2 of 2 1 2
Show 40 post(s) from this thread on one page

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