منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : كيف اجعل ايقونة الفورم في جهة اليمين ؟؟
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الاخوه الكرام
السلام عليكم ورحمة وبركاته
كيف اجعل ايقونة الفورم في جهة اليمين ؟؟
ملاحة هامه
كيف اجعل ايقونة الفورم في جهة اليمين بدون أي تاثير على الفوم كامل

نامل من الله المساعدة والله يحفظكم ويرعاكم
لقد حاولت عملها من قبل كما هو الحال في vb.net لكن فشلت

على ما اعتقد هذا شيء غير مدعوم في اللغة أصلا
وعليكم السلام ورحمة الله وبركاته

جرب التالي
كود :
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Const ws = &H400000
Const gw = -20
Private Sub Form_Load()
Dim o As Long
o = GetWindowLong(hwnd, gw)
SetWindowLong hwnd, gw, o Or ws
End Sub

بالتوفيق
اخي العزيز
السلام عليكم ورحمة وبركاته
عند وضع الكود وتكبير الفورم انظر ماذا سوف يحصل ؟؟
والله يحفظكم ويرعاكم