ورود به حساب ثبت نام جدید فراموشی کلمه عبور
برای ورود به حساب کاربری خود، نام کاربری و کلمه عبورتان را در زیر وارد کرده و روی “ ورود به حساب” کلیک کنید.





اگر فرم ثبت نام برای شما نمایش داده نمیشود، اینجا را کلیک کنید.









اگر فرم بازیابی کلمه عبور برای شما نمایش داده نمیشود، اینجا را کلیک کنید.





نمایش نتایج: از 1 به 1 از 1
  1. #1
    vahid4251
    مدیر بخش
    تاریخ عضویت
    2011 Dec
    محل سکونت
    tehran & esfhan & uromie
    نوشته ها
    180
    14
    197

    حرکت دادن فرمهای بدون نوار عنوان!

    از اين تابع (Api) برای حركت دادن فرمی كه نوار عنوان نداره استفاده می شه .برای نمايش يك فرم بدون نوار عنوان خاصيت Border styleرو برابر None قرار بدید.حالا کد Api زير رو تو يه ماژول كپی كنيد.



     Public Const HTCAPTION = 2 Public Const WM_NCLBUTTONDOWN = &HA1 Public Declare Function ReleaseCapture Lib "user32" () As Long Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Long) As Long


    حالا برای اينكه كد زير در رويداد فرم قابل اجرا باشد كد زير را در پنجره كد كپی كنيد.



     Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 1 Then Call ReleaseCapture Call SendMessage(Me.hwnd, WM_NCLBUTTONDOWN, HTCAPTION, 0) End If End Sub
    دارم برنامه طراحی قالب وبلاگ مینویم کم پیدام نظر بدین
    [برای نمایش لینک باید عضو شوید. ]
    اگر از مطالب خوشتون اومد چیکار میکنین؟معلوم تشکر یا اعتبار

    يادم باشد و يادت نرود که ما براي يکبار ايستادن هزار بار افتاده ايم.
  2. 2
نمایش نتایج: از 1 به 1 از 1

اطلاعات موضوع

کاربرانی که در حال مشاهده این موضوع هستند

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

کلمات کلیدی این موضوع

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  

Content Relevant URLs by vBSEO 3.6.0 RC 2