paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-10 09:59:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: checked compiler warnings, clean up

Browse Source 
git-svn-id: trunk@48220 -
This commit is contained in:
mattias 2015-03-10 14:59:27 +00:00
parent b80958200b
commit 7e3829dd80
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/ideintf/formeditingintf.pas
View File

@ -109,7 +109,7 @@ type
): TComponent; virtual; abstract;
function GetDefaultComponentPosition(TypeClass: TComponentClass;
ParentComp: TComponent;
var X,Y: integer): boolean; virtual; abstract;
out X,Y: integer): boolean; virtual; abstract;
function CreateComponent(ParentComp: TComponent;
TypeClass: TComponentClass;
const AUnitName: shortstring;

4
ide/customformeditor.pp
View File

@ -199,7 +199,7 @@ type
): TComponent; override;
function GetDefaultComponentPosition(TypeClass: TComponentClass;
ParentComponent: TComponent;
var X,Y: integer): boolean; override;
out X,Y: integer): boolean; override;
function CreateComponent(ParentComponent: TComponent;
TypeClass: TComponentClass;
const AUnitName: shortstring;
@ -2290,7 +2290,7 @@ begin
end;
function TCustomFormEditor.GetDefaultComponentPosition(
TypeClass: TComponentClass; ParentComponent: TComponent; var X, Y: integer
TypeClass: TComponentClass; ParentComponent: TComponent; out X, Y: integer
): boolean;
var
i: Integer;