paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

RxMDI - fix update window caption

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2816 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75 2013-10-29 19:18:06 +00:00
parent 199b0d183e
commit 38806e4bdc
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/rx/trunk/rxmdi.pas
View File

@ -375,6 +375,9 @@ var
i:integer;
B:TRxMDIButton;
begin
if (FCurrentChildWindow = F) and Assigned(FCloseButton) and FCloseButton.Enabled then
FCloseButton.FInfoLabel.Caption:=F.Caption;
for i:=0 to TaskPanel.ComponentCount -1 do
begin
if TRxMDIButton(TaskPanel.Components[i]).NavForm = F then