از کار انداختن پنجره های Common Dialog

[M.T.P]

دوستان گرامی...

کسی میدونه چطور میشه از باز شدن پنجره های Common dialog مثل پنجره Open ، Save ، Color ، Font جلوگیری کرد. یعنی هیچ برنامه ای نتونه اینا رو باز کنه.

با هر روش ممکن که بشه این پنجره ها رو ساقط کرد. (ریجیستری ، API ، ... )

پیشاپیش سپاسگزارم. :قلب:

[Veteran]

:متفکر: یعنی چی ؟
یعنی مثلا ی کاری کنیم که پنجره سیو در تمامی برنامه از کار بیفته ؟ مثلا پنجره سیو notepad و دیگر برنامه ها از کار بیفته ؟

[M.T.P]

:متفکر: یعنی چی ؟
یعنی مثلا ی کاری کنیم که پنجره سیو در تمامی برنامه از کار بیفته ؟ مثلا پنجره سیو notepad و دیگر برنامه ها از کار بیفته ؟

دقیقا
------------------------------------------

[Veteran]

تونستم غیر فعالش کنم اما اینکه چجوری کلا کاری کنیم که اصلا پیداش نشه و بالا نیاد و نشون داده نشه رو نمیدونم
اول هندل پیدا کن بعد
با این api غیر فعالش کن

Private Declare Function EnableWindow Lib "user32" (ByVal hwnd As Long, ByVal fEnable As Long) As Long


call EnableWindow(hwnd, False)

[sr2m72]

دوستان گرامی...

کسی میدونه چطور میشه از باز شدن پنجره های Common dialog مثل پنجره Open ، Save ، Color ، Font جلوگیری کرد. یعنی هیچ برنامه ای نتونه اینا رو باز کنه.

با هر روش ممکن که بشه این پنجره ها رو ساقط کرد. (ریجیستری ، API ، ... )

پیشاپیش سپاسگزارم. :قلب:

بفرما داداش، اين از باز شدن پنجره Open جلوگيري ميكنه.
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Private Sub Timer1_Timer()
hw = FindWindow(vbNullString, "Open")
If hw <> 0 Then
SendKeys "%{f4}"
End If
End Sub

فقط حواستون باشه اينترول تايمر رو خيلي كم نكنيد(200 باشه خوبه).

[M.T.P]

دوستان با FindWindow که نمیشه چون پنجره Open یا Save همیشه عنوان ثابتی نداره!
:متفکر:

[IamOverlord]

پس به جای عنوان پنجره باید نام کلاس رو به تابع FindWindows بفرستی...