LCL: broken one unit circle

git-svn-id: trunk@18377 -
This commit is contained in:
mattias 2009-01-21 17:21:44 +00:00
parent 65c2d49056
commit 0c6804bd51
2 changed files with 3 additions and 4 deletions

View File

@ -1,5 +1,3 @@
{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TComponentListForm','FORMDATA',[ LazarusResources.Add('TComponentListForm','FORMDATA',[
'TPF0'#18'TComponentListForm'#17'ComponentListForm'#4'Left'#3#30#2#6'Height'#3 'TPF0'#18'TComponentListForm'#17'ComponentListForm'#4'Left'#3#30#2#6'Height'#3
+','#2#3'Top'#3#13#1#5'Width'#3#224#0#13'ActiveControl'#7#6'Panel6'#7'Caption' +','#2#3'Top'#3#13#1#5'Width'#3#224#0#13'ActiveControl'#7#6'Panel6'#7'Caption'

View File

@ -36,7 +36,7 @@ interface
uses uses
Classes, SysUtils, Classes, SysUtils,
LCLType, LCLProc, LMessages, Graphics, GraphType, LCLIntf, Controls; LCLType, LCLProc, LMessages, Graphics, GraphType, LCLIntf, Controls, ExtCtrls;
type type
TCustomPairSplitter = class; TCustomPairSplitter = class;
@ -144,8 +144,9 @@ type
procedure Register; procedure Register;
implementation implementation
uses uses
WSPairSplitter, ExtCtrls; WSPairSplitter;
procedure Register; procedure Register;
begin begin