pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

RxFPC:fix demo for RxMDI

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6135 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2018-01-15 12:39:14 +00:00
parent 66045e97c0
commit 30e30984b0
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
components/rx/trunk/demos/RxMDI/project1.lps
View File

@@ -18,8 +18,9 @@
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="Unit1"/>
<IsVisibleTab Value="True"/>
<TopLine Value="108"/>
<CursorPos X="10" Y="126"/>
<CursorPos X="3" Y="114"/>
<UsageCount Value="25"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
@@ -69,10 +70,9 @@
<Unit6>
<Filename Value="../../rxcontrols/rxmdi.pas"/>
<UnitName Value="RxMDI"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="1"/>
<TopLine Value="191"/>
<CursorPos X="52" Y="215"/>
<CursorPos X="6" Y="208"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit6>

2
components/rx/trunk/demos/RxMDI/unit1.pas
View File

@@ -111,7 +111,7 @@ end;
procedure TForm1.FormCreate(Sender: TObject);
begin
//UpdateOptions;
UpdateOptions;
end;
procedure TForm1.optHideCloseButtonExecute(Sender: TObject);