VclPtr: fix crash on loading kde86727-1.html

and all the other html crashtest loading failures
I believe

Change-Id: I38d3e1ad283efc08f468d9062e520149663e3e84

include/svtools/filectrl.hxx

@@ -102,6 +102,8 @@ public:
     //use this to manipulate the dialog bevore executing it:
     void            SetDialogCreatedHdl( const Link<>& rLink ) { maDialogCreatedHdl = rLink; }
     const Link<>&   GetDialogCreatedHdl() const { return maDialogCreatedHdl; }
+
+    void            SetEditModifyHdl( const Link<>& rLink );
 };
 
 #endif

svtools/source/control/filectrl.cxx

@@ -193,14 +193,17 @@ IMPL_LINK_NOARG(FileControl, ButtonHdl)
     return 0;
 }
 
-
-
 void FileControl::GetFocus()
 {
     maEdit->GrabFocus();
 }
 
-
+void FileControl::SetEditModifyHdl( const Link<>& rLink )
+{
+    if (!maEdit || maEdit->IsDisposed())
+        return;
+    maEdit->SetModifyHdl(rLink);
+}
 
 void FileControl::Draw( OutputDevice* pDev, const Point& rPos, const Size& rSize, sal_uLong nFlags )
 {

svtools/source/uno/unoiface.cxx

@@ -595,11 +595,11 @@ void VCLXFileControl::SetWindow( const VclPtr< vcl::Window > &pWindow )
 {
     VclPtr< FileControl > pPrevFileControl = GetAsDynamic< FileControl >();
     if ( pPrevFileControl )
-        pPrevFileControl->GetEdit().SetModifyHdl( Link<>() );
+        pPrevFileControl->SetEditModifyHdl( Link<>() );
 
     FileControl* pNewFileControl = dynamic_cast<FileControl*>( pWindow.get() );
     if ( pNewFileControl )
-        pNewFileControl->GetEdit().SetModifyHdl( LINK( this, VCLXFileControl, ModifyHdl ) );
+        pNewFileControl->SetEditModifyHdl( LINK( this, VCLXFileControl, ModifyHdl ) );
 
     VCLXWindow::SetWindow( pWindow );
 }