def _Warper_OnFindAncestor(self, Writer, Component, Name, Ancestor,
RootAncestor):
self.OnFindAncestorcall(
LCLBindingUtil.GetPytonObject(Writer, TWriter),
LCLBindingUtil.GetPytonObject(Component, TComponent), Name,
LCLBindingUtil.GetPytonObject(Ancestor, TComponent),
LCLBindingUtil.GetPytonObject(RootAncestor, TComponent))
def _Warper_OnPropertyNotFound(self, Reader, Instance, PropName, IsPath,
Handled, Skip):
self.OnPropertyNotFoundcall(
LCLBindingUtil.GetPytonObject(Reader, TReader),
LCLBindingUtil.GetPytonObject(Instance, TPersistent), PropName,
LCLBindingUtil.IntToBoolean(IsPath),
LCLBindingUtil.IntToBoolean(Handled),
LCLBindingUtil.IntToBoolean(Skip))
def getGroupIndex(self):
r = LCLBinding.get_Buttons_TCustomSpeedButton_GroupIndex(self.pointer)
return LCLBindingUtil.ConvertPascalInteger(r)
def getGlyph(self):
r = LCLBinding.get_Buttons_TCustomSpeedButton_Glyph(self.pointer)
return LCLBindingUtil.GetPytonObject(r, TBitmap)
def _Warper_OnStartDrag(self, Sender, DragObject):
self.OnStartDragcall(
LCLBindingUtil.GetPytonObject(Sender, TObject),
LCLBindingUtil.GetPytonObject(DragObject, TDragObject))
def _Warper_OnMouseMove(self, Sender, Shift, X, Y):
self.OnMouseMovecall(LCLBindingUtil.GetPytonObject(Sender, TObject),
Shift, X, Y)
def _Warper_OnMouseLeave(self, Sender):
self.OnMouseLeavecall(LCLBindingUtil.GetPytonObject(Sender, TObject))
def _Warper_OnDragOver(self, Sender, Source, X, Y, State, Accept):
self.OnDragOvercall(LCLBindingUtil.GetPytonObject(Sender, TObject),
LCLBindingUtil.GetPytonObject(Source, TObject), X,
Y, State, LCLBindingUtil.IntToBoolean(Accept))
def Create(TheOwner):
return LCLBindingUtil.GetPytonObject(
LCLBinding.PairSplitter_TPairSplitter_Create((TheOwner.pointer)),
TPairSplitter)
def getParentShowHint(self):
r = LCLBinding.get_PairSplitter_TPairSplitter_ParentShowHint(
self.pointer)
return LCLBindingUtil.ConvertPascalBoolean(r)
def getSplitter(self):
r = LCLBinding.get_PairSplitter_TPairSplitterSide_Splitter(
self.pointer)
return LCLBindingUtil.GetPytonObject(r, TCustomPairSplitter)
def getPosition(self):
r = LCLBinding.get_PairSplitter_TCustomPairSplitter_Position(
self.pointer)
return LCLBindingUtil.ConvertPascalInteger(r)
def getSides(self, Index):
r = LCLBinding.get_PairSplitter_TCustomPairSplitter_Sides(
self.pointer, Index)
return LCLBindingUtil.GetPytonObject(r, TPairSplitterSide)
def _Warper_OnMeasureItem(self, Sender, ACanvas, AWidth, AHeight):
self.OnMeasureItemcall(LCLBindingUtil.GetPytonObject(Sender, TObject),
LCLBindingUtil.GetPytonObject(ACanvas, TCanvas),
AWidth, AHeight)
def getOwnerDraw(self):
r = LCLBinding.get_Menus_TMenu_OwnerDraw(self.pointer)
return LCLBindingUtil.ConvertPascalBoolean(r)
def getSpacing(self):
r = LCLBinding.get_Buttons_TCustomBitBtn_Spacing(self.pointer)
return LCLBindingUtil.ConvertPascalInteger(r)
def _Warper_OnDragDrop(self, Sender, Source, X, Y):
self.OnDragDropcall(LCLBindingUtil.GetPytonObject(Sender, TObject),
LCLBindingUtil.GetPytonObject(Source, TObject), X,
Y)
def getShowAccelChar(self):
r = LCLBinding.get_Buttons_TCustomSpeedButton_ShowAccelChar(
self.pointer)
return LCLBindingUtil.ConvertPascalBoolean(r)
def _Warper_OnEndDrag(self, Sender, Target, X, Y):
self.OnEndDragcall(LCLBindingUtil.GetPytonObject(Sender, TObject),
LCLBindingUtil.GetPytonObject(Target, TObject), X,
Y)
def _Warper_OnDblClick(self, Sender):
self.OnDblClickcall(LCLBindingUtil.GetPytonObject(Sender, TObject))
def getFlat(self):
r = LCLBinding.get_Buttons_TCustomSpeedButton_Flat(self.pointer)
return LCLBindingUtil.ConvertPascalBoolean(r)
def _Warper_OnPaint(self, Sender):
self.OnPaintcall(LCLBindingUtil.GetPytonObject(Sender, TObject))
def _Warper_OnMouseUp(self, Sender, Button, Shift, X, Y):
self.OnMouseUpcall(LCLBindingUtil.GetPytonObject(Sender, TObject),
Button, Shift, X, Y)
def getParentFont(self):
r = LCLBinding.get_Buttons_TSpeedButton_ParentFont(self.pointer)
return LCLBindingUtil.ConvertPascalBoolean(r)
def getParentShowHint(self):
r = LCLBinding.get_Buttons_TBitBtn_ParentShowHint(self.pointer)
return LCLBindingUtil.ConvertPascalBoolean(r)
def Create(AOwner):
return LCLBindingUtil.GetPytonObject(
LCLBinding.Buttons_TSpeedButton_Create((AOwner.pointer)),
TSpeedButton)
def Create(TheOwner):
return LCLBindingUtil.GetPytonObject(
LCLBinding.Buttons_TBitBtn_Create((TheOwner.pointer)), TBitBtn)
def getDefaultCaption(self):
r = LCLBinding.get_Buttons_TCustomBitBtn_DefaultCaption(self.pointer)
return LCLBindingUtil.ConvertPascalBoolean(r)
def getMargin(self):
r = LCLBinding.get_Buttons_TCustomSpeedButton_Margin(self.pointer)
return LCLBindingUtil.ConvertPascalInteger(r)
def getNumGlyphs(self):
r = LCLBinding.get_Buttons_TCustomBitBtn_NumGlyphs(self.pointer)
return LCLBindingUtil.ConvertPascalInteger(r)