تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف الحصول على حجم نوافذ عملية
#1
اسف اذا كان الموضوع السابق كان مخالف للقوانين

كود :
           If Process.GetProcessesByName("calc").Length > 0 Then
            Dim calc_size As System.Drawing.Size
            Dim processWindowHandle As IntPtr = Process.GetProcessesByName("calc")(0).MainWindowHandle
            Dim s As Size = GetControlSize(processWindowHandle)
            calc_size = s
            Dim GWL_STYLE As Integer = -16
            Dim style As Integer = GetWindowLong(processWindowHandle, GWL_STYLE)
            original_style = style
            SetWindowLong(processWindowHandle, GWL_STYLE, original_style)
            MsgBox(calc_size.Width)
        End If
المشكلة ان الناتج 0
الرد }}}
تم الشكر بواسطة:
#2
السلام عليكم

الكود ناقص،
الرجاء وضع كامل الكود لمعرفة التصحيح المناسب.
الرد }}}
تم الشكر بواسطة: Mohamed20
#3
(06-03-17, 04:27 PM)مساعدة كتب : السلام عليكم

الكود ناقص،
الرجاء وضع كامل الكود لمعرفة التصحيح المناسب.

تم الحل بحمد الله

كود :
    Public Shared Function GetControlSize(hWnd As IntPtr) As Size
        Try
            Dim pRect As RECT
            Dim cSize As New Size()
            ' get coordinates relative to window
            GetWindowRect(hWnd, pRect)
            cSize.Width = pRect.Right - pRect.Left
            cSize.Height = pRect.Bottom - pRect.Top

            Return cSize
        Catch ex As Exception

        End Try
    End Function
     
 Dim p = (From x In Process.GetProcessesByName("calc") Order By x.StartTime).Last
       Dim processWindowHandle As IntPtr = p.MainWindowHandle
       Dim s As Size = GetControlSize(processWindowHandle)
       Dim calc_size As System.Drawing.Size
       calc_size = s
       MsgBox(calc_size.Width)

المشكلة ان كان يقرءة MainWindowHandle بعد اما يفتج المشروع

تم تصحيح الكود للافادة
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال عن عملية حذف سجل من قاعدة البيانات assuhimi 3 246 11-02-24, 08:43 PM
آخر رد: assuhimi
Heart [C#.NET] حول بطئ عملية نقل البينات الكثيرة من أكسس إلى داتا غريد فيو بلال بلال 11 702 15-12-23, 07:47 AM
آخر رد: foad8920
  [VB.NET] ناتج عملية الطرح للأرقام الشعرية خطا عبدالله الصافي 3 357 27-09-23, 11:01 AM
آخر رد: قناص المدينة
  عملية حسابية خاصة محمد خيري 6 494 22-08-23, 09:09 AM
آخر رد: مصمم هاوي
  كيف الحصول على قيمة الخلية بعد تحديد الصف في datagridview؟ hazim1 2 551 06-08-23, 01:12 AM
آخر رد: hazim1
  لا استطيع الحصول على الرقم التسلسلي للقرص C ابو محمد محمد محمد 6 736 27-04-23, 01:49 PM
آخر رد: ابو محمد محمد محمد
  ماهى عملية الضرب داخل sql حماده ممدوح البحيرى 5 822 18-12-22, 01:00 PM
آخر رد: Taha Okla
  تحديد الصف بعد عملية التحديث محمد اسماعيل 4 2,976 02-10-22, 12:50 PM
آخر رد: رضوان الجماعي
  طريقة لفتح نوافذ مبيعات مختلفة في نفس الوقت وكل فاتورة لها رقم تلقائي tfarejdz 10 3,967 25-09-22, 10:46 AM
آخر رد: رضوان الجماعي
Question [سؤال] تعبئة TreeView مع جود اكثر من عملية بحث ادخل جدوالين alims 1 1,864 22-05-22, 07:51 PM
آخر رد: samo123456

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم