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

LCL: Formatting.

Browse Source 
git-svn-id: trunk@53662 -
This commit is contained in:
juha 2016-12-13 09:42:26 +00:00
parent d539e1fa58
commit c4c9879bc5
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lcl/include/radiogroup.inc
View File

@ -184,16 +184,16 @@ begin
AutoSize := False;
OnClick := @Self.Clicked;
OnChange := @Self.Changed;
OnEnter :=@Self.ItemEnter;
OnExit :=@Self.ItemExit;
OnKeyDown :=@Self.ItemKeyDown;
OnEnter := @Self.ItemEnter;
OnExit := @Self.ItemExit;
OnKeyDown := @Self.ItemKeyDown;
OnKeyUp := @Self.ItemKeyUp;
OnKeyPress := @Self.ItemKeyPress;
OnUTF8KeyPress := @Self.ItemUTF8KeyPress;
OnResize := @Self.ItemResize;
ParentFont := True;
BorderSpacing.CellAlignHorizontal:=ccaLeftTop;
BorderSpacing.CellAlignVertical:=ccaCenter;
BorderSpacing.CellAlignHorizontal := ccaLeftTop;
BorderSpacing.CellAlignVertical := ccaCenter;
ControlStyle := ControlStyle + [csNoDesignSelectable];
end;
FButtonList.Add(ARadioButton);