سوال: جابه جا کردن صفحه برنامه

تعرفه تبلیغات در سایت
عنوان عکس عنوان عکس عنوان عکس عنوان عکس
عنوان عکس عنوان عکس عنوان عکس عنوان عکس
عنوان عکس عنوان عکس عنوان عکس عنوان عکس
عنوان عکس عنوان عکس عنوان عکس عنوان عکس
عنوان عکس عنوان عکس عنوان عکس عنوان عکس

آرشیو مطالب

جستجوگر

یافته ها در جستجو

    امکانات وب

    برچسب ها

    نقل قول نوشته شده توسط IntelBoy مشاهده تاپیک

    دوستان عزیز سلام
    صفحه برنامه من style اش none هست و همان طور که خوتان میدونید با این حالت نمی شود صفحه را در دسکتاپ جا به جا کرد(منظور اینکه صفحه برنامه را از مثلا بالا به پایین بیاوریم)
    من می خواهم با این وجود جا به جا کنم آیا ممکن است؟

    سلام
    ابتدا کد های زیر را در بخش ماژول عمومی فرم وارد کن :

    Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, LParam As Any) As Long
    Private Declare Sub ReleaseCapture Lib "user32" ()
    Const WM_NCLBUTTONDOWN = &HA1 'when left mouse button is clicked
    Const HTCAPTION = 2 'signed that mouse is working on titlebar.

    سپس یک نوار عنوان با استفاده از picturebox یا Image درست کن و کدزیر در رویداد MouseDown آن وارد کن :

    If Button = 1 Then
    Call ReleaseCapture 'tell system through mouse didn't working anymore.
    Call SendMessage(Me.hwnd(), WM_NCLBUTTONDOWN, HTCAPTION, 0&)
    End If

    در زمان اجراء ، موس را بر روی نوار عنوان پائین نگه دار و فرم را جابجا کن
    موفق باشید

  • مطالب مرتبط
  • مبتدی: باز کردن web application در تلفن همراه اندرویدی
  • سوال: پاسخ به درخواست های همزمان
  • سوال: راهنمایی در مورد بررسی شرط
  • سوال: انتخاب تصویر اصلی هنگام آپلود عکس
  • سوال: تبدیل int به int چرا؟
  • سوال: محاسبه خدمتی سربازی
  • نویسنده : محمد رضا جوادیان بازدید : 7 تاريخ : شنبه 25 شهريور 1396 ساعت: 3:38

    خبرنامه

    عضویت

    نام کاربري :
    رمز عبور :