paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-12 14:29:36 +02:00
Code Issues Packages Projects Releases Wiki Activity

IdeIntf: Make methods private. Formatting. The usefull changes in issues #32902 and #32903.

Browse Source 
git-svn-id: trunk@56873 -
This commit is contained in:
juha 2017-12-30 12:06:13 +00:00
parent 84369842cc
commit 1cc6bfbcd1
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/ideintf/dbgridcolumnspropeditform.pas
View File

@ -51,6 +51,8 @@ type
FOwnerComponent: TPersistent;
FOwnerPersistent: TPersistent;
FPropertyName: String;
procedure FillCollectionListBox;
procedure SelectInObjectInspector(ForceUpdate, UnselectAll: Boolean);
protected
procedure UpdateCaption;
procedure UpdateButtons;
@ -59,8 +61,6 @@ type
procedure PersistentDeleting(APersistent: TPersistent);
procedure RefreshPropertyValues;
public
procedure FillCollectionListBox;
procedure SelectInObjectInspector(ForceUpdate, UnselectAll: Boolean);
procedure SetCollection(NewCollection: TCollection;
NewOwnerPersistent: TPersistent; const NewPropName: String);
procedure Modified;

2
components/ideintf/dbpropedits.pas
View File

@ -37,7 +37,7 @@ type
TDBGridColumnsPropertyEditor = class (TCollectionPropertyEditor)
public
class function ShowCollectionEditor(ACollection: TCollection;
OwnerPersistent: TPersistent; const PropName: String): TCustomForm; override;
OwnerPersistent: TPersistent; const PropName: String): TCustomForm; override;
end;
{ TLookupFieldProperty }