DelphiVCL.TabSheet is an individual page in a PageControl object.
We use TabSheet to represent a single page in tabbed page control. Tab sheets are typically referred to as pages. PageControl maintains an indexed array of its tab sheets in its Pages property. Users can click on a tab to activate the tab sheet.
You can use the Caption property of the TabSheet control to define an accelerator key to a page of the PageControl.
We can browse all the properties, methods, and built-in properties of the DelphiVCL.TabSheet using dir() command:
|
1 2 3 |
import DelphiVCL dir(DelphiVCL.TabSheet) |
See the responses in command prompt:
Here is the working example of the implementation of DelphiVCL.TabSheet:
|
1 2 3 4 5 6 7 8 9 |
# Tabsheet one pgOne = TabSheet(pnlMain) pgOne.PageControl = pgConMain pgOne.Caption = "Tab 1" # Tabsheet two pgTwo = TabSheet(pnlMain) pgTwo.PageControl = pgConMain pgTwo.Caption = "Tab 2" |
To see the result, let’s run the complete script:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 |
from DelphiVCL import * # Create a Class to build a basic Form class MainForm(Form): def __init__(self, Owner): self.Caption = "Introduction to VCL Components" self.Name = "BaseForm" self.SetBounds(10, 10, 500, 450) # Create a Main Panel component pnlMain = CreateComponent('TPanel',Owner) pnlMain.SetProps(Parent=self, Caption="",align = "alClient", Name = "MainPanel") # Page Control creation pgConMain = PageControl(pnlMain) pgConMain.Name = "MyPageControl" pgConMain.Parent = pnlMain pgConMain.Align = "alClient" # Tabsheet one pgOne = TabSheet(pnlMain) pgOne.PageControl = pgConMain pgOne.Caption = "Tab 1" # Tabsheet two pgTwo = TabSheet(pnlMain) pgTwo.PageControl = pgConMain pgTwo.Caption = "Tab 2" # Initialize your application def main(): Application.Initialize() Application.Title = "MyDelphiApp" f = MainForm(Application) f.Show() FreeConsole() Application.Run() Application.Destroy() main() |
The result:
Check out DelphiVCL which easily allows you to build GUIs for Windows using Python.
Watch this comprehensive introduction to Python GUI Development with DelphiVCL library video by Jim McKeeth:
