تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
إختبار كود علي نسخة الكمبيوتر لديكم
#1
رجاء اختبار الكود التالي و إبلاغي بالنتائج التي سوف تعود بها MessageBox
الرجاء تحديد نوع نسخة الويندوز او نوعية نظام التشغيل أيضا
الرجاء تحديد نوع الكمبيوتر

الكود سهل و ليس به اي ضرر  من اي نوع


PHP كود :
Public Class Form1
    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load

        Dim dominant 
As Color Image.FromHbitmap(New Bitmap(Me.WidthMe.Height).GetHbitmap(), Me.Handle).GetPixel(00)
 
       Dim result As String String.Format("{0},{1},{2},{3}"dominant.Adominant.Rdominant.Gdominant.B)
 
       MessageBox.Show(result"dominant Color")
 
   End Sub

End 
Class 
و أيضا الكود التالي
أفترض أن النتائج ستكون واحدة في الحالتين

PHP كود :
Public Class Form1
    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load

        Dim dominant 
As Color Image.FromHbitmap(New Bitmap(Me.WidthMe.Height).GetHbitmap(), IntPtr.Zero).GetPixel(00)
 
       Dim result As String String.Format("{0},{1},{2},{3}"dominant.Adominant.Rdominant.Gdominant.B)
 
       MessageBox.Show(result"dominant Color")
 
   End Sub

End 
Class 
الرد
تم الشكر بواسطة:
#2
PHP كود :
code1:
dominant Color:
255,211,211,211 
PHP كود :
code2:
dominant Color:
255,211,211,211 

PHP كود :
OS:
Windows 10 Home

PC
:
Samsung Laptop

Screen resolution
:
1366x768 
الرد
تم الشكر بواسطة: silverlight
#3
تقبل تحياتي
نفس البيانات عندي مع اختلاف بسيط وهو أن نوع الكمبيوتر هو Dell
الرد
تم الشكر بواسطة: amgad525
#4
جميعها : 255,211,211,211
os : acer
windows 7 ultimate 64bit
الْلَّهُم صَلِّ وَسَلِم وَبَارِك عَلَى سَيِّدِنَا مُحَمَّد
الرد
تم الشكر بواسطة: silverlight
#5
رجاء ممن لديه أنظمة تشغيل أخري أقل
اختبار الكود و إبلاغي بالنتائج و سوف اأكون شاكرا له جدا
الرد
تم الشكر بواسطة:
#6
255,211,211,211
نفس الرسالة فى الكودين
ويندوز 8.1
32 بت
الرد
تم الشكر بواسطة: silverlight
#7
تفضل اخوي

نفس النتيجه في الكودين

النتيجه : 255,211,211,211

نفس نتيجة باقي الاخوان

ويندوز 10
64 bit

شكرا لكم
الحمد لله رب العالمين على كل شي
الرد
تم الشكر بواسطة: silverlight
#8
نفس النتيجه في الكودين

النتيجه : 255,211,211,211

ويندوز 10
32 bit
Mish3l
الرد
تم الشكر بواسطة: silverlight
#9
نفس النتيجه في الكودين

النتيجه : 255,211,211,211

ويندوز 7
32 bit
جهاز hp
الرد
تم الشكر بواسطة: silverlight
#10
(07-12-16, 01:48 AM)silverlight كتب : رجاء ممن لديه أنظمة تشغيل أخري أقل
اختبار الكود و إبلاغي بالنتائج و سوف اأكون شاكرا له جدا



ويندوز 7

32 bit


الملفات المرفقة صورة/صور
       
[صورة مرفقة: 000.gif]
الرد
تم الشكر بواسطة: silverlight


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] هل ممكن كود فيجوال بيسك لزر تغير تاريخ الكمبيوتر للوراء وكود اخر ارجاعه طبيبعي jam3h 13 402 20-09-20, 08:46 PM
آخر رد: jam3h
  رسالة خطأ تظهر في نسخة vb.net 2019 aftfm 3 330 12-08-20, 12:52 AM
آخر رد: حريف برمجة
  مطلوب طريقة طباعة 2 نسخة من تقرير كريستال ahmedramzyaish 3 353 04-07-20, 02:41 AM
آخر رد: عبد العزيز البسكري
  طلب أحدث نسخة كريستال ريبورت لفيجوال استوديو نت 15 برو Alhootti1 4 336 31-03-20, 09:44 PM
آخر رد: Alhootti1
  تعريف طابعة الكاشير على الكمبيوتر Rabeea Qbaha 1 6,921 08-01-20, 07:16 PM
آخر رد: علي العوجري
  ارسال بيانات من فورم الى فورم اخر مفتوح باكثر من نسخة. Rabeea Qbaha 2 605 16-12-19, 02:25 AM
آخر رد: Rabeea Qbaha
  كيفية حفظ نسخة من قاعدة البيانات على google drive المتألق9 1 670 26-10-19, 05:04 AM
آخر رد: asemshahen5
  [VB.NET] تشغيل الكمبيوتر فى وقت محدد سابقا abo_baraa2007 0 424 17-07-19, 09:01 PM
آخر رد: abo_baraa2007
  كيف اعرف لغة الكمبيوتر الخاصة بمستخدم برنامجي e-coder 1 516 05-05-19, 09:51 PM
آخر رد: Rabeea Qbaha
  هل هناك نسخة مكركة من Active report لفيجوال ستوديو ٢٠١٠ haider kh 14 1,466 03-05-19, 02:53 PM
آخر رد: ابراهيم ايبو

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


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