mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-13 05:29:51 +02:00
turbopower_ipro: fixed visibility
git-svn-id: trunk@65101 -
This commit is contained in:
parent
331f647184
commit
69249de79e
@ -864,12 +864,12 @@ type
|
|||||||
FSrc: string;
|
FSrc: string;
|
||||||
FWidth: TIpHtmlLength;
|
FWidth: TIpHtmlLength;
|
||||||
FFrame : TIpHtmlFrame;
|
FFrame : TIpHtmlFrame;
|
||||||
procedure SetAlign(const Value: TIpHtmlAlign); override;
|
|
||||||
procedure SetFrameBorder(const Value: Integer);
|
procedure SetFrameBorder(const Value: Integer);
|
||||||
procedure SetMarginHeight(const Value: Integer);
|
procedure SetMarginHeight(const Value: Integer);
|
||||||
procedure SetMarginWidth(const Value: Integer);
|
procedure SetMarginWidth(const Value: Integer);
|
||||||
procedure SetScrolling(const Value: TIpHtmlFrameScrolling);
|
procedure SetScrolling(const Value: TIpHtmlFrameScrolling);
|
||||||
protected
|
protected
|
||||||
|
procedure SetAlign(const Value: TIpHtmlAlign); override;
|
||||||
procedure CreateControl(Parent : TWinControl); override;
|
procedure CreateControl(Parent : TWinControl); override;
|
||||||
function Successful: Boolean; override;
|
function Successful: Boolean; override;
|
||||||
procedure AddValues(NameList, ValueList : TStringList); override;
|
procedure AddValues(NameList, ValueList : TStringList); override;
|
||||||
|
Loading…
Reference in New Issue
Block a user