Why the open file dialog form goes to SAP background.

Question

I created a addon form and there is a button to open a file dialog. When I click it, this dialog went to the background of SAP. How to fix.Please

Answer 1

Hi,
Just add a class and give this source
Public Class WindowWrapper
    Implements System.Windows.Forms.IWin32Window
    Private _hwnd As IntPtr
    Public Sub New(ByVal handle As IntPtr)
        _hwnd = handle
    End Sub
    Public ReadOnly Property Handle() As System.IntPtr Implements System.Windows.Forms.IWin32Window.Handle
        Get
            Return _hwnd
        End Get
    End Property
End Class
Give this source in ur add-on class
Public ShowFolderBrowserThread As Threading.Thread
Public Sub ShowFolderBrowser()
        Try
            Dim MyTest As New OpenFileDialog
            Dim MyProcs() As Process
            MyProcs = Process.GetProcessesByName("SAP Business One")
            If MyProcs.Length = 1 Then
                For i As Integer = 0 To MyProcs.Length - 1
                    Dim MyWindow As New WindowWrapper(MyProcs(i).MainWindowHandle)
                    MyTest.InitialDirectory = "C:\"
                    MyTest.ShowDialog(MyWindow)
                    Dim ab As New System.IO.FileInfo(MyTest.FileName)
                    Dim db As SAPbouiCOM.DBDataSource = frm.DataSources.DBDataSources.Item("@BR_ATTACH")
                    mat1 = frm.Items.Item("ATMatrix").Specific
                    mat1.AddRow()
                    db.SetValue("U_Path", db.Offset, ab.DirectoryName)
                    db.SetValue("U_FileName", db.Offset, ab.DirectoryName + "\" + ab.Name)
                    mat1.SetLineData(1)
                Next
            Else
                Console.WriteLine("No SBO instances found.")
            End If
        Catch ex As Exception
        End Try
    End Sub
Give this source in item event
Case SAPbouiCOM.BoEventTypes.et_CLICK
If pVal.ItemUID = "BtnBrowse" And pVal.BeforeAction = False Then
                        ShowFolderBrowserThread = New Threading.Thread(AddressOf ShowFolderBrowser)
                        If ShowFolderBrowserThread.ThreadState = Threading.ThreadState.Unstarted Then
                            ShowFolderBrowserThread.SetApartmentState(Threading.ApartmentState.STA)
                            ShowFolderBrowserThread.Start()
                            ShowFolderBrowserThread.Join()
                        Else
                            ShowFolderBrowserThread.Abort()
                        End If
Try this......................... it worked out well for me....
Edited by: Sridhar R Badri on Apr 23, 2008 7:47 AM
Edited by: Sridhar R Badri on Apr 23, 2008 8:07 AM
Edited by: Sridhar R Badri on Apr 23, 2008 8:08 AM