You've already forked lazarus-ccr
TvPlanit: Make TVpLinkableControl.CheckCreateResource public.
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8344 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -358,7 +358,6 @@ type
|
||||
FReadOnly: Boolean;
|
||||
FControlLink: TVpControlLink;
|
||||
FLastPrintLine: Integer;
|
||||
function CheckCreateResource : Boolean;
|
||||
procedure Notification(AComponent: TComponent; Operation: TOperation); override;
|
||||
procedure SetDataStore (const Value : TVpCustomDataStore); virtual;
|
||||
procedure SetControlLink (const Value : TVpControlLink);
|
||||
@ -367,6 +366,7 @@ type
|
||||
public
|
||||
constructor Create(AOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
function CheckCreateResource : Boolean;
|
||||
function GetLastPrintLine: Integer;
|
||||
function GetControlType: TVpItemType; virtual; abstract;
|
||||
procedure RenderToCanvas(RenderCanvas: TCanvas; RenderIn: TRect;
|
||||
|
Reference in New Issue
Block a user