1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
3 * This file is part of the LibreOffice project.
5 * This Source Code Form is subject to the terms of the Mozilla Public
6 * License, v. 2.0. If a copy of the MPL was not distributed with this
7 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
9 * This file incorporates work covered by the following license notice:
11 * Licensed to the Apache Software Foundation (ASF) under one or more
12 * contributor license agreements. See the NOTICE file distributed
13 * with this work for additional information regarding copyright
14 * ownership. The ASF licenses this file to you under the Apache
15 * License, Version 2.0 (the "License"); you may not use this file
16 * except in compliance with the License. You may obtain a copy of
17 * the License at http://www.apache.org/licenses/LICENSE-2.0 .
20 #include <helper/tagwindowasmodified.hxx>
21 #include <pattern/window.hxx>
24 #include <com/sun/star/awt/XWindow.hpp>
26 #include <com/sun/star/lang/XServiceInfo.hpp>
27 #include <com/sun/star/util/XModifyBroadcaster.hpp>
28 #include <com/sun/star/util/XModifiable.hpp>
29 #include <com/sun/star/frame/FrameAction.hpp>
31 #include <toolkit/helper/vclunohelper.hxx>
32 #include <vcl/window.hxx>
33 #include <vcl/syswin.hxx>
34 #include <vcl/svapp.hxx>
35 #include <vcl/wrkwin.hxx>
36 #include <tools/wintypes.hxx>
40 TagWindowAsModified::TagWindowAsModified()
44 TagWindowAsModified::~TagWindowAsModified()
48 void SAL_CALL
TagWindowAsModified::initialize(const css::uno::Sequence
< css::uno::Any
>& lArguments
)
50 css::uno::Reference
< css::frame::XFrame
> xFrame
;
52 if (lArguments
.hasElements())
53 lArguments
[0] >>= xFrame
;
63 xFrame
->addFrameActionListener(this);
67 void SAL_CALL
TagWindowAsModified::modified(const css::lang::EventObject
& aEvent
)
69 css::uno::Reference
< css::util::XModifiable
> xModel
;
70 css::uno::Reference
< css::awt::XWindow
> xWindow
;
73 xModel
.set(m_xModel
.get (), css::uno::UNO_QUERY
);
74 xWindow
.set(m_xWindow
.get(), css::uno::UNO_QUERY
);
77 ( ! xWindow
.is () ) ||
78 (aEvent
.Source
!= xModel
)
83 bool bModified
= xModel
->isModified ();
86 SolarMutexGuard aSolarGuard
;
88 VclPtr
<vcl::Window
> pWindow
= VCLUnoHelper::GetWindow(xWindow
);
92 bool bSystemWindow
= pWindow
->IsSystemWindow();
93 bool bWorkWindow
= (pWindow
->GetType() == WindowType::WORKWINDOW
);
94 if (!bSystemWindow
&& !bWorkWindow
)
98 pWindow
->SetExtendedStyle(WindowExtendedStyle::DocModified
);
100 pWindow
->SetExtendedStyle(WindowExtendedStyle::NONE
);
104 void SAL_CALL
TagWindowAsModified::frameAction(const css::frame::FrameActionEvent
& aEvent
)
107 (aEvent
.Action
!= css::frame::FrameAction_COMPONENT_REATTACHED
) &&
108 (aEvent
.Action
!= css::frame::FrameAction_COMPONENT_ATTACHED
)
112 css::uno::Reference
< css::frame::XFrame
> xFrame
;
115 xFrame
.set(m_xFrame
.get(), css::uno::UNO_QUERY
);
117 ( ! xFrame
.is () ) ||
118 (aEvent
.Source
!= xFrame
)
123 impl_update (xFrame
);
126 void SAL_CALL
TagWindowAsModified::disposing(const css::lang::EventObject
& aEvent
)
130 css::uno::Reference
< css::frame::XFrame
> xFrame(m_xFrame
.get(), css::uno::UNO_QUERY
);
133 (aEvent
.Source
== xFrame
)
140 css::uno::Reference
< css::frame::XModel
> xModel(m_xModel
.get(), css::uno::UNO_QUERY
);
143 (aEvent
.Source
== xModel
)
151 void TagWindowAsModified::impl_update (const css::uno::Reference
< css::frame::XFrame
>& xFrame
)
156 css::uno::Reference
< css::awt::XWindow
> xWindow
= xFrame
->getContainerWindow ();
157 css::uno::Reference
< css::frame::XController
> xController
= xFrame
->getController ();
158 css::uno::Reference
< css::frame::XModel
> xModel
;
159 if (xController
.is ())
160 xModel
= xController
->getModel ();
163 ( ! xWindow
.is ()) ||
170 // Note: frame was set as member outside ! we have to refresh connections
171 // regarding window and model only here.
176 css::uno::Reference
< css::util::XModifyBroadcaster
> xModifiable(xModel
, css::uno::UNO_QUERY
);
177 if (xModifiable
.is ())
178 xModifiable
->addModifyListener (this);
181 } // namespace framework
183 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */