TGraphicControl

constructor

TGraphicControl()

init()

Sub New()

constructor(aOwner: TComponent)

TGraphicControl(TComponent aOwner)

init(_ aOwner: TComponent)

Sub New(aOwner As TComponent)

property Align: TAlign read write;

TAlign Align { get; set; }

var Align: TAlign { get{} set{} }

Property Align() As TAlign

property AlignWithMargins: Boolean read write;

Boolean AlignWithMargins { get; set; }

var AlignWithMargins: Boolean { get{} set{} }

Property AlignWithMargins() As Boolean

method Assign(Source: TPersistent)

void Assign(TPersistent Source)

func Assign(_ Source: TPersistent)

Sub Assign(Source As TPersistent)

method AssignTo(Dest: TPersistent)

void AssignTo(TPersistent Dest)

func AssignTo(_ Dest: TPersistent)

Sub AssignTo(Dest As TPersistent)

property Caption: VCLString read write;

VCLString Caption { get; set; }

var Caption: VCLString { get{} set{} }

Property Caption() As VCLString

method Changed(aObject: TObject; propName: String)

void Changed(TObject aObject, String propName)

func Changed(_ aObject: TObject, _ propName: String)

Sub Changed(aObject As TObject, propName As String)

method Click

void Click()

func Click()

Sub Click()

func Click(Click )

property ClientHeight: Int32 read write;

Int32 ClientHeight { get; set; }

var ClientHeight: Int32 { get{} set{} }

Property ClientHeight() As Int32

property ClientWidth: Int32 read write;

Int32 ClientWidth { get; set; }

var ClientWidth: Int32 { get{} set{} }

Property ClientWidth() As Int32

property Color: TColor read write;

TColor Color { get; set; }

var Color: TColor { get{} set{} }

Property Color() As TColor

property ComponentState: TComponentState read;

TComponentState ComponentState { get; }

var ComponentState: TComponentState { get{} }

ReadOnly Property ComponentState() As TComponentState

property Controls: TList<TControl> read;

TList<TControl> Controls { get; }

var Controls: TList<TControl> { get{} }

ReadOnly Property Controls() As TList<TControl>

method CreateHandle

void CreateHandle()

func CreateHandle()

void CreateHandle()

Sub CreateHandle()

func CreateHandle(CreateHandle )

property CurrentPPI: Int32 read;

Int32 CurrentPPI { get; }

var CurrentPPI: Int32 { get{} }

ReadOnly Property CurrentPPI() As Int32

method DefaultHandler(var aMessage: TMessage)

void DefaultHandler(ref TMessage aMessage)

func DefaultHandler(_ aMessage: TMessage)

Sub DefaultHandler(ByRef aMessage As TMessage)

method DefineProperties(Filer: TObject)

void DefineProperties(TObject Filer)

func DefineProperties(_ Filer: TObject)

Sub DefineProperties(Filer As TObject)

property ExplicitHeight: Int32 read write;

Int32 ExplicitHeight { get; set; }

var ExplicitHeight: Int32 { get{} set{} }

Property ExplicitHeight() As Int32

property ExplicitLeft: Int32 read write;

Int32 ExplicitLeft { get; set; }

var ExplicitLeft: Int32 { get{} set{} }

Property ExplicitLeft() As Int32

property ExplicitTop: Int32 read write;

Int32 ExplicitTop { get; set; }

var ExplicitTop: Int32 { get{} set{} }

Property ExplicitTop() As Int32

property ExplicitWidth: Int32 read write;

Int32 ExplicitWidth { get; set; }

var ExplicitWidth: Int32 { get{} set{} }

Property ExplicitWidth() As Int32

property Font: TFont read write;

TFont Font { get; set; }

var Font: TFont { get{} set{} }

Property Font() As TFont

method GetClientHeight: Int32

Int32 GetClientHeight()

func GetClientHeight() -> Int32

Function GetClientHeight() As Int32

func GetClientHeight(GetClientHeight ) -> Int32

method GetClientWidth: Int32

Int32 GetClientWidth()

func GetClientWidth() -> Int32

Function GetClientWidth() As Int32

func GetClientWidth(GetClientWidth ) -> Int32

method GetDefaultName: String

String GetDefaultName()

func GetDefaultName() -> String

Function GetDefaultName() As String

method GetDesignPPI: Int32

Int32 GetDesignPPI()

func GetDesignPPI() -> Int32

Function GetDesignPPI() As Int32

method GetNamePath: DelphiString

DelphiString GetNamePath()

func GetNamePath() -> DelphiString

Function GetNamePath() As DelphiString

func GetNamePath(GetNamePath ) -> DelphiString

method GetOwner: TPersistent

TPersistent GetOwner()

func GetOwner() -> TPersistent

Function GetOwner() As TPersistent

func GetOwner(GetOwner ) -> TPersistent

method GetParentForm: TCustomForm

TCustomForm GetParentForm()

func GetParentForm() -> TCustomForm

Function GetParentForm() As TCustomForm

property Handle: TPlatformHandle read;

TPlatformHandle Handle { get; }

var Handle: TPlatformHandle { get{} }

ReadOnly Property Handle() As TPlatformHandle

method HandleAllocated: Boolean

Boolean HandleAllocated()

func HandleAllocated() -> Boolean

Function HandleAllocated() As Boolean

func HandleAllocated(HandleAllocated ) -> Boolean

method HandleNeeded

void HandleNeeded()

func HandleNeeded()

Sub HandleNeeded()

func HandleNeeded(HandleNeeded )

property Height: Int32 read write;

Int32 Height { get; set; }

var Height: Int32 { get{} set{} }

Property Height() As Int32

property InnerBox: ^GtkWidget read;

GtkWidget* InnerBox { get; }

var InnerBox: UnsafeMutablePointer<GtkWidget> { get{} }

ReadOnly Property InnerBox() As Ptr(Of GtkWidget)

method InsertControl(aControl: TControl)

void InsertControl(TControl aControl)

func InsertControl(_ aControl: TControl)

Sub InsertControl(aControl As TControl)

property Left: Int32 read write;

Int32 Left { get; set; }

var Left: Int32 { get{} set{} }

Property Left() As Int32

method Loaded

void Loaded()

func Loaded()

Sub Loaded()

func Loaded(Loaded )

property Margins: TMargins read write;

TMargins Margins { get; set; }

var Margins: TMargins { get{} set{} }

Property Margins() As TMargins

method MouseDown(aButton: TMouseButton; aShift: TShiftState; X: Int32; Y: Int32)

void MouseDown(TMouseButton aButton, TShiftState aShift, Int32 X, Int32 Y)

func MouseDown(_ aButton: TMouseButton, _ aShift: TShiftState, _ X: Int32, _ Y: Int32)

Sub MouseDown(aButton As TMouseButton, aShift As TShiftState, X As Int32, Y As Int32)

property Name: String read write;

String Name { get; set; }

var Name: String { get{} set{} }

Property Name() As String

method Notification(aComponent: TComponent; aOperation: TOperation)

void Notification(TComponent aComponent, TOperation aOperation)

func Notification(_ aComponent: TComponent, _ aOperation: TOperation)

Sub Notification(aComponent As TComponent, aOperation As TOperation)

property OnClick: TNotifyEvent read write;

TNotifyEvent OnClick { get; set; }

var OnClick: TNotifyEvent { get{} set{} }

Property OnClick() As TNotifyEvent

property OnKeyDown: TKeyEvent read write;

TKeyEvent OnKeyDown { get; set; }

var OnKeyDown: TKeyEvent { get{} set{} }

Property OnKeyDown() As TKeyEvent

property OnKeyPress: TKeyPressEvent read write;

TKeyPressEvent OnKeyPress { get; set; }

var OnKeyPress: TKeyPressEvent { get{} set{} }

Property OnKeyPress() As TKeyPressEvent

property OnKeyUp: TKeyEvent read write;

TKeyEvent OnKeyUp { get; set; }

var OnKeyUp: TKeyEvent { get{} set{} }

Property OnKeyUp() As TKeyEvent

property Owner: TComponent read write;

TComponent Owner { get; set; }

var Owner: TComponent { get{} set{} }

Property Owner() As TComponent

method Paint

void Paint()

func Paint()

Sub Paint()

func Paint(Paint )

property Parent: TNativeControl read write;

TNativeControl Parent { get; set; }

var Parent: TNativeControl { get{} set{} }

Property Parent() As TNativeControl

property ParentFont: Boolean read write;

Boolean ParentFont { get; set; }

var ParentFont: Boolean { get{} set{} }

Property ParentFont() As Boolean

method Perform(aMessage: UInt32; wParam: WPARAM; lParam: LPARAM): LRESULT

LRESULT Perform(UInt32 aMessage, WPARAM wParam, LPARAM lParam)

func Perform(_ aMessage: UInt32, _ wParam: WPARAM, _ lParam: LPARAM) -> LRESULT

Function Perform(aMessage As UInt32, wParam As WPARAM, lParam As LPARAM) As LRESULT

method Perform(var aMessage: TMessage)

void Perform(ref TMessage aMessage)

func Perform(_ aMessage: TMessage)

Sub Perform(ByRef aMessage As TMessage)

method PlatformApplyDefaults

void PlatformApplyDefaults()

func PlatformApplyDefaults()

Sub PlatformApplyDefaults()

func PlatformApplyDefaults(PlatformApplyDefaults )

method PlatformFontChanged

void PlatformFontChanged()

func PlatformFontChanged()

Sub PlatformFontChanged()

func PlatformFontChanged(PlatformFontChanged )

method PlatformGetCaption: VCLString

VCLString PlatformGetCaption()

func PlatformGetCaption() -> VCLString

Function PlatformGetCaption() As VCLString

func PlatformGetCaption(PlatformGetCaption ) -> VCLString

method PlatformGetDefaultName: String

String PlatformGetDefaultName()

func PlatformGetDefaultName() -> String

Function PlatformGetDefaultName() As String

func PlatformGetDefaultName(PlatformGetDefaultName ) -> String

method PlatformInitControl

void PlatformInitControl()

func PlatformInitControl()

Sub PlatformInitControl()

func PlatformInitControl(PlatformInitControl )

// Island-Ubuntu
method PlatformSetCaption(aValue: String)
// Island-WebAssembly-wasm32, Island-Windows
method PlatformSetCaption(aValue: VCLString)

// Island-Ubuntu
void PlatformSetCaption(String aValue)
// Island-WebAssembly-wasm32, Island-Windows
void PlatformSetCaption(VCLString aValue)

func PlatformSetCaption(_ aValue: VCLString)

// Island-Ubuntu
Sub PlatformSetCaption(aValue As String)
// Island-WebAssembly-wasm32, Island-Windows
Sub PlatformSetCaption(aValue As VCLString)

method PlatformSetColor(aValue: TColor)

void PlatformSetColor(TColor aValue)

func PlatformSetColor(_ aValue: TColor)

Sub PlatformSetColor(aValue As TColor)

method PlatformSetHeight(aValue: Int32)

void PlatformSetHeight(Int32 aValue)

func PlatformSetHeight(_ aValue: Int32)

Sub PlatformSetHeight(aValue As Int32)

method PlatformSetLeft(aValue: Int32)

void PlatformSetLeft(Int32 aValue)

func PlatformSetLeft(_ aValue: Int32)

Sub PlatformSetLeft(aValue As Int32)

method PlatformSetOnClick(aValue: TNotifyEvent)

void PlatformSetOnClick(TNotifyEvent aValue)

func PlatformSetOnClick(_ aValue: TNotifyEvent)

Sub PlatformSetOnClick(aValue As TNotifyEvent)

method PlatformSetOnKeyDown(aValue: TKeyEvent)

void PlatformSetOnKeyDown(TKeyEvent aValue)

func PlatformSetOnKeyDown(_ aValue: TKeyEvent)

Sub PlatformSetOnKeyDown(aValue As TKeyEvent)

method PlatformSetOnKeyPress(aValue: TKeyPressEvent)

void PlatformSetOnKeyPress(TKeyPressEvent aValue)

func PlatformSetOnKeyPress(_ aValue: TKeyPressEvent)

Sub PlatformSetOnKeyPress(aValue As TKeyPressEvent)

method PlatformSetOnKeyUp(aValue: TKeyEvent)

void PlatformSetOnKeyUp(TKeyEvent aValue)

func PlatformSetOnKeyUp(_ aValue: TKeyEvent)

Sub PlatformSetOnKeyUp(aValue As TKeyEvent)

method PlatformSetParent(aValue: TControl)

void PlatformSetParent(TControl aValue)

func PlatformSetParent(_ aValue: TControl)

Sub PlatformSetParent(aValue As TControl)

method PlatformSetTabOrder(aValue: Int32)

void PlatformSetTabOrder(Int32 aValue)

func PlatformSetTabOrder(_ aValue: Int32)

Sub PlatformSetTabOrder(aValue As Int32)

method PlatformSetTop(aValue: Int32)

void PlatformSetTop(Int32 aValue)

func PlatformSetTop(_ aValue: Int32)

Sub PlatformSetTop(aValue As Int32)

method PlatformSetVisible(aValue: Boolean)

void PlatformSetVisible(Boolean aValue)

func PlatformSetVisible(_ aValue: Boolean)

Sub PlatformSetVisible(aValue As Boolean)

method PlatformSetWidth(aValue: Int32)

void PlatformSetWidth(Int32 aValue)

func PlatformSetWidth(_ aValue: Int32)

Sub PlatformSetWidth(aValue As Int32)

method RemoveComponentState(aState: TComponentStateEnum)

void RemoveComponentState(TComponentStateEnum aState)

func RemoveComponentState(_ aState: TComponentStateEnum)

Sub RemoveComponentState(aState As TComponentStateEnum)

method RequestAlign

void RequestAlign()

func RequestAlign()

Sub RequestAlign()

func RequestAlign(RequestAlign )

method ScaleForPPI(newPPI: Int32)

void ScaleForPPI(Int32 newPPI)

func ScaleForPPI(_ newPPI: Int32)

Sub ScaleForPPI(newPPI As Int32)

method SetClientHeight(aValue: Int32)

void SetClientHeight(Int32 aValue)

func SetClientHeight(_ aValue: Int32)

Sub SetClientHeight(aValue As Int32)

method SetClientWidth(aValue: Int32)

void SetClientWidth(Int32 aValue)

func SetClientWidth(_ aValue: Int32)

Sub SetClientWidth(aValue As Int32)

method SetComponentState(aState: TComponentStateEnum)

void SetComponentState(TComponentStateEnum aState)

func SetComponentState(_ aState: TComponentStateEnum)

Sub SetComponentState(aState As TComponentStateEnum)

method Show

void Show()

func Show()

Sub Show()

func Show(Show )

property TabOrder: Int32 read write;

Int32 TabOrder { get; set; }

var TabOrder: Int32 { get{} set{} }

Property TabOrder() As Int32

property Top: Int32 read write;

Int32 Top { get; set; }

var Top: Int32 { get{} set{} }

Property Top() As Int32

var UnderlyingHandle: TPlatformHandle;

TPlatformHandle UnderlyingHandle

var UnderlyingHandle: TPlatformHandle

FIELD UnderlyingHandle() As TPlatformHandle

property Visible: Boolean read write;

Boolean Visible { get; set; }

var Visible: Boolean { get{} set{} }

Property Visible() As Boolean

method WantMessage(var aMessage: TMessage): Boolean

Boolean WantMessage(ref TMessage aMessage)

func WantMessage(_ aMessage: TMessage) -> Boolean

Function WantMessage(ByRef aMessage As TMessage) As Boolean

property Width: Int32 read write;

Int32 Width { get; set; }

var Width: Int32 { get{} set{} }

Property Width() As Int32

property WindowProc: TWndMethod read write;

TWndMethod WindowProc { get; set; }

var WindowProc: TWndMethod { get{} set{} }

Property WindowProc() As TWndMethod

method WndProc(var aMessage: TMessage)

void WndProc(ref TMessage aMessage)

func WndProc(_ aMessage: TMessage)

Sub WndProc(ByRef aMessage As TMessage)

var UnderlyingHandle: TPlatformHandle;

TPlatformHandle UnderlyingHandle

var UnderlyingHandle: TPlatformHandle

FIELD UnderlyingHandle() As TPlatformHandle

property Align: TAlign read write;

TAlign Align { get; set; }

var Align: TAlign { get{} set{} }

Property Align() As TAlign

property AlignWithMargins: Boolean read write;

Boolean AlignWithMargins { get; set; }

var AlignWithMargins: Boolean { get{} set{} }

Property AlignWithMargins() As Boolean

property Caption: VCLString read write;

VCLString Caption { get; set; }

var Caption: VCLString { get{} set{} }

Property Caption() As VCLString

property ClientHeight: Int32 read write;

Int32 ClientHeight { get; set; }

var ClientHeight: Int32 { get{} set{} }

Property ClientHeight() As Int32

property ClientWidth: Int32 read write;

Int32 ClientWidth { get; set; }

var ClientWidth: Int32 { get{} set{} }

Property ClientWidth() As Int32

property Color: TColor read write;

TColor Color { get; set; }

var Color: TColor { get{} set{} }

Property Color() As TColor

property ComponentState: TComponentState read;

TComponentState ComponentState { get; }

var ComponentState: TComponentState { get{} }

ReadOnly Property ComponentState() As TComponentState

property Controls: TList<TControl> read;

TList<TControl> Controls { get; }

var Controls: TList<TControl> { get{} }

ReadOnly Property Controls() As TList<TControl>

property CurrentPPI: Int32 read;

Int32 CurrentPPI { get; }

var CurrentPPI: Int32 { get{} }

ReadOnly Property CurrentPPI() As Int32

property ExplicitHeight: Int32 read write;

Int32 ExplicitHeight { get; set; }

var ExplicitHeight: Int32 { get{} set{} }

Property ExplicitHeight() As Int32

property ExplicitLeft: Int32 read write;

Int32 ExplicitLeft { get; set; }

var ExplicitLeft: Int32 { get{} set{} }

Property ExplicitLeft() As Int32

property ExplicitTop: Int32 read write;

Int32 ExplicitTop { get; set; }

var ExplicitTop: Int32 { get{} set{} }

Property ExplicitTop() As Int32

property ExplicitWidth: Int32 read write;

Int32 ExplicitWidth { get; set; }

var ExplicitWidth: Int32 { get{} set{} }

Property ExplicitWidth() As Int32

property Font: TFont read write;

TFont Font { get; set; }

var Font: TFont { get{} set{} }

Property Font() As TFont

property Handle: TPlatformHandle read;

TPlatformHandle Handle { get; }

var Handle: TPlatformHandle { get{} }

ReadOnly Property Handle() As TPlatformHandle

property Height: Int32 read write;

Int32 Height { get; set; }

var Height: Int32 { get{} set{} }

Property Height() As Int32

property InnerBox: ^GtkWidget read;

GtkWidget* InnerBox { get; }

var InnerBox: UnsafeMutablePointer<GtkWidget> { get{} }

ReadOnly Property InnerBox() As Ptr(Of GtkWidget)

property Left: Int32 read write;

Int32 Left { get; set; }

var Left: Int32 { get{} set{} }

Property Left() As Int32

property Margins: TMargins read write;

TMargins Margins { get; set; }

var Margins: TMargins { get{} set{} }

Property Margins() As TMargins

property Name: String read write;

String Name { get; set; }

var Name: String { get{} set{} }

Property Name() As String

property OnClick: TNotifyEvent read write;

TNotifyEvent OnClick { get; set; }

var OnClick: TNotifyEvent { get{} set{} }

Property OnClick() As TNotifyEvent

property OnKeyDown: TKeyEvent read write;

TKeyEvent OnKeyDown { get; set; }

var OnKeyDown: TKeyEvent { get{} set{} }

Property OnKeyDown() As TKeyEvent

property OnKeyPress: TKeyPressEvent read write;

TKeyPressEvent OnKeyPress { get; set; }

var OnKeyPress: TKeyPressEvent { get{} set{} }

Property OnKeyPress() As TKeyPressEvent

property OnKeyUp: TKeyEvent read write;

TKeyEvent OnKeyUp { get; set; }

var OnKeyUp: TKeyEvent { get{} set{} }

Property OnKeyUp() As TKeyEvent

property Owner: TComponent read write;

TComponent Owner { get; set; }

var Owner: TComponent { get{} set{} }

Property Owner() As TComponent

property Parent: TNativeControl read write;

TNativeControl Parent { get; set; }

var Parent: TNativeControl { get{} set{} }

Property Parent() As TNativeControl

property ParentFont: Boolean read write;

Boolean ParentFont { get; set; }

var ParentFont: Boolean { get{} set{} }

Property ParentFont() As Boolean

property TabOrder: Int32 read write;

Int32 TabOrder { get; set; }

var TabOrder: Int32 { get{} set{} }

Property TabOrder() As Int32

property Top: Int32 read write;

Int32 Top { get; set; }

var Top: Int32 { get{} set{} }

Property Top() As Int32

property Visible: Boolean read write;

Boolean Visible { get; set; }

var Visible: Boolean { get{} set{} }

Property Visible() As Boolean

property Width: Int32 read write;

Int32 Width { get; set; }

var Width: Int32 { get{} set{} }

Property Width() As Int32

property WindowProc: TWndMethod read write;

TWndMethod WindowProc { get; set; }

var WindowProc: TWndMethod { get{} set{} }

Property WindowProc() As TWndMethod

constructor

TGraphicControl()

init()

Sub New()

constructor(aOwner: TComponent)

TGraphicControl(TComponent aOwner)

init(_ aOwner: TComponent)

Sub New(aOwner As TComponent)

method Assign(Source: TPersistent)

void Assign(TPersistent Source)

func Assign(_ Source: TPersistent)

Sub Assign(Source As TPersistent)

method AssignTo(Dest: TPersistent)

void AssignTo(TPersistent Dest)

func AssignTo(_ Dest: TPersistent)

Sub AssignTo(Dest As TPersistent)

method Changed(aObject: TObject; propName: String)

void Changed(TObject aObject, String propName)

func Changed(_ aObject: TObject, _ propName: String)

Sub Changed(aObject As TObject, propName As String)

method Click

void Click()

func Click()

Sub Click()

func Click(Click )

method CreateHandle

void CreateHandle()

func CreateHandle()

void CreateHandle()

Sub CreateHandle()

func CreateHandle(CreateHandle )

method DefaultHandler(var aMessage: TMessage)

void DefaultHandler(ref TMessage aMessage)

func DefaultHandler(_ aMessage: TMessage)

Sub DefaultHandler(ByRef aMessage As TMessage)

method DefineProperties(Filer: TObject)

void DefineProperties(TObject Filer)

func DefineProperties(_ Filer: TObject)

Sub DefineProperties(Filer As TObject)

method GetClientHeight: Int32

Int32 GetClientHeight()

func GetClientHeight() -> Int32

Function GetClientHeight() As Int32

func GetClientHeight(GetClientHeight ) -> Int32

method GetClientWidth: Int32

Int32 GetClientWidth()

func GetClientWidth() -> Int32

Function GetClientWidth() As Int32

func GetClientWidth(GetClientWidth ) -> Int32

method GetDefaultName: String

String GetDefaultName()

func GetDefaultName() -> String

Function GetDefaultName() As String

method GetDesignPPI: Int32

Int32 GetDesignPPI()

func GetDesignPPI() -> Int32

Function GetDesignPPI() As Int32

method GetNamePath: DelphiString

DelphiString GetNamePath()

func GetNamePath() -> DelphiString

Function GetNamePath() As DelphiString

func GetNamePath(GetNamePath ) -> DelphiString

method GetOwner: TPersistent

TPersistent GetOwner()

func GetOwner() -> TPersistent

Function GetOwner() As TPersistent

func GetOwner(GetOwner ) -> TPersistent

method GetParentForm: TCustomForm

TCustomForm GetParentForm()

func GetParentForm() -> TCustomForm

Function GetParentForm() As TCustomForm

method HandleAllocated: Boolean

Boolean HandleAllocated()

func HandleAllocated() -> Boolean

Function HandleAllocated() As Boolean

func HandleAllocated(HandleAllocated ) -> Boolean

method HandleNeeded

void HandleNeeded()

func HandleNeeded()

Sub HandleNeeded()

func HandleNeeded(HandleNeeded )

method InsertControl(aControl: TControl)

void InsertControl(TControl aControl)

func InsertControl(_ aControl: TControl)

Sub InsertControl(aControl As TControl)

method Loaded

void Loaded()

func Loaded()

Sub Loaded()

func Loaded(Loaded )

method MouseDown(aButton: TMouseButton; aShift: TShiftState; X: Int32; Y: Int32)

void MouseDown(TMouseButton aButton, TShiftState aShift, Int32 X, Int32 Y)

func MouseDown(_ aButton: TMouseButton, _ aShift: TShiftState, _ X: Int32, _ Y: Int32)

Sub MouseDown(aButton As TMouseButton, aShift As TShiftState, X As Int32, Y As Int32)

method Notification(aComponent: TComponent; aOperation: TOperation)

void Notification(TComponent aComponent, TOperation aOperation)

func Notification(_ aComponent: TComponent, _ aOperation: TOperation)

Sub Notification(aComponent As TComponent, aOperation As TOperation)

method Paint

void Paint()

func Paint()

Sub Paint()

func Paint(Paint )

method Perform(aMessage: UInt32; wParam: WPARAM; lParam: LPARAM): LRESULT

LRESULT Perform(UInt32 aMessage, WPARAM wParam, LPARAM lParam)

func Perform(_ aMessage: UInt32, _ wParam: WPARAM, _ lParam: LPARAM) -> LRESULT

Function Perform(aMessage As UInt32, wParam As WPARAM, lParam As LPARAM) As LRESULT

method Perform(var aMessage: TMessage)

void Perform(ref TMessage aMessage)

func Perform(_ aMessage: TMessage)

Sub Perform(ByRef aMessage As TMessage)

method PlatformApplyDefaults

void PlatformApplyDefaults()

func PlatformApplyDefaults()

Sub PlatformApplyDefaults()

func PlatformApplyDefaults(PlatformApplyDefaults )

method PlatformFontChanged

void PlatformFontChanged()

func PlatformFontChanged()

Sub PlatformFontChanged()

func PlatformFontChanged(PlatformFontChanged )

method PlatformGetCaption: VCLString

VCLString PlatformGetCaption()

func PlatformGetCaption() -> VCLString

Function PlatformGetCaption() As VCLString

func PlatformGetCaption(PlatformGetCaption ) -> VCLString

method PlatformGetDefaultName: String

String PlatformGetDefaultName()

func PlatformGetDefaultName() -> String

Function PlatformGetDefaultName() As String

func PlatformGetDefaultName(PlatformGetDefaultName ) -> String

method PlatformInitControl

void PlatformInitControl()

func PlatformInitControl()

Sub PlatformInitControl()

func PlatformInitControl(PlatformInitControl )

// Island-Ubuntu
method PlatformSetCaption(aValue: String)
// Island-WebAssembly-wasm32, Island-Windows
method PlatformSetCaption(aValue: VCLString)

// Island-Ubuntu
void PlatformSetCaption(String aValue)
// Island-WebAssembly-wasm32, Island-Windows
void PlatformSetCaption(VCLString aValue)

func PlatformSetCaption(_ aValue: VCLString)

// Island-Ubuntu
Sub PlatformSetCaption(aValue As String)
// Island-WebAssembly-wasm32, Island-Windows
Sub PlatformSetCaption(aValue As VCLString)

method PlatformSetColor(aValue: TColor)

void PlatformSetColor(TColor aValue)

func PlatformSetColor(_ aValue: TColor)

Sub PlatformSetColor(aValue As TColor)

method PlatformSetHeight(aValue: Int32)

void PlatformSetHeight(Int32 aValue)

func PlatformSetHeight(_ aValue: Int32)

Sub PlatformSetHeight(aValue As Int32)

method PlatformSetLeft(aValue: Int32)

void PlatformSetLeft(Int32 aValue)

func PlatformSetLeft(_ aValue: Int32)

Sub PlatformSetLeft(aValue As Int32)

method PlatformSetOnClick(aValue: TNotifyEvent)

void PlatformSetOnClick(TNotifyEvent aValue)

func PlatformSetOnClick(_ aValue: TNotifyEvent)

Sub PlatformSetOnClick(aValue As TNotifyEvent)

method PlatformSetOnKeyDown(aValue: TKeyEvent)

void PlatformSetOnKeyDown(TKeyEvent aValue)

func PlatformSetOnKeyDown(_ aValue: TKeyEvent)

Sub PlatformSetOnKeyDown(aValue As TKeyEvent)

method PlatformSetOnKeyPress(aValue: TKeyPressEvent)

void PlatformSetOnKeyPress(TKeyPressEvent aValue)

func PlatformSetOnKeyPress(_ aValue: TKeyPressEvent)

Sub PlatformSetOnKeyPress(aValue As TKeyPressEvent)

method PlatformSetOnKeyUp(aValue: TKeyEvent)

void PlatformSetOnKeyUp(TKeyEvent aValue)

func PlatformSetOnKeyUp(_ aValue: TKeyEvent)

Sub PlatformSetOnKeyUp(aValue As TKeyEvent)

method PlatformSetParent(aValue: TControl)

void PlatformSetParent(TControl aValue)

func PlatformSetParent(_ aValue: TControl)

Sub PlatformSetParent(aValue As TControl)

method PlatformSetTabOrder(aValue: Int32)

void PlatformSetTabOrder(Int32 aValue)

func PlatformSetTabOrder(_ aValue: Int32)

Sub PlatformSetTabOrder(aValue As Int32)

method PlatformSetTop(aValue: Int32)

void PlatformSetTop(Int32 aValue)

func PlatformSetTop(_ aValue: Int32)

Sub PlatformSetTop(aValue As Int32)

method PlatformSetVisible(aValue: Boolean)

void PlatformSetVisible(Boolean aValue)

func PlatformSetVisible(_ aValue: Boolean)

Sub PlatformSetVisible(aValue As Boolean)

method PlatformSetWidth(aValue: Int32)

void PlatformSetWidth(Int32 aValue)

func PlatformSetWidth(_ aValue: Int32)

Sub PlatformSetWidth(aValue As Int32)

method RemoveComponentState(aState: TComponentStateEnum)

void RemoveComponentState(TComponentStateEnum aState)

func RemoveComponentState(_ aState: TComponentStateEnum)

Sub RemoveComponentState(aState As TComponentStateEnum)

method RequestAlign

void RequestAlign()

func RequestAlign()

Sub RequestAlign()

func RequestAlign(RequestAlign )

method ScaleForPPI(newPPI: Int32)

void ScaleForPPI(Int32 newPPI)

func ScaleForPPI(_ newPPI: Int32)

Sub ScaleForPPI(newPPI As Int32)

method SetClientHeight(aValue: Int32)

void SetClientHeight(Int32 aValue)

func SetClientHeight(_ aValue: Int32)

Sub SetClientHeight(aValue As Int32)

method SetClientWidth(aValue: Int32)

void SetClientWidth(Int32 aValue)

func SetClientWidth(_ aValue: Int32)

Sub SetClientWidth(aValue As Int32)

method SetComponentState(aState: TComponentStateEnum)

void SetComponentState(TComponentStateEnum aState)

func SetComponentState(_ aState: TComponentStateEnum)

Sub SetComponentState(aState As TComponentStateEnum)

method Show

void Show()

func Show()

Sub Show()

func Show(Show )

method WantMessage(var aMessage: TMessage): Boolean

Boolean WantMessage(ref TMessage aMessage)

func WantMessage(_ aMessage: TMessage) -> Boolean

Function WantMessage(ByRef aMessage As TMessage) As Boolean

method WndProc(var aMessage: TMessage)

void WndProc(ref TMessage aMessage)

func WndProc(_ aMessage: TMessage)

Sub WndProc(ByRef aMessage As TMessage)