[@@أبورائد@@]

سعود كتب :طيب هل يمكن تعطيل ذلك الزر من الكود؟

ali.alfoly كتب :اخوانى جزاكم الله خيرا وزادكم من علمه ونفعكم به فى الدنيا والاخرة
فعا كان المقصود الحماية من البداية لذلك وضعت الملفات فى الريسورس وقررت عرضها فى البرنامج عن طريق هذه الاداة ولاكن فجائنا اخى ابو رائد بذلك الزر
وكما ذكر اخى سعود هل من حل لتعطيل هذا الزر

السلام عليكم ورحمة الله وبركاته




الحمد لله...... وجدت هذا الكود (كود الحيلة) يقوم بغلق مربع حوار Save As عند بداية ظهوره... لعله يفيد.. ولكن يجب تجربته على ويندوز عربي أيضاً للإطمئنان

ضع تايمر Timer
Enabled=True
Interval=1

وضع هذا الكود

PHP كود :

Const WM_CLOSE As UInteger = &H10
    <Runtime.InteropServices.DllImport("user32.dll", EntryPoint:="FindWindow", SetLastError:=True)> _
    Private Shared Function FindWindow(ByVal lpClassName As String, ByVal lpWindowName As String) As IntPtr
    End Function
    <Runtime.InteropServices.DllImport("user32.dll", CharSet:=Runtime.InteropServices.CharSet.Auto)> _
    Private Shared Function SendMessage(ByVal hWnd As IntPtr, ByVal Msg As UInt32, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As IntPtr
    End Function
    Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As EventArgs) Handles Timer1.Tick
        Dim dialogBoxText As String = "Save As"
        SendMessage(FindWindow(Nothing, dialogBoxText), WM_CLOSE, IntPtr.Zero, IntPtr.Zero)
    End Sub 


السلام عليكم ورحمة الله وبركاته