محبوبترینها
چگونه با ثبت آگهی رایگان در سایت های نیازمندیها، کسب و کارتان را به دیگران معرفی کنید؟
بهترین لوله برای لوله کشی آب ساختمان
دانلود آهنگ های برتر ایرانی و خارجی 2024
ماندگاری بیشتر محصولات باغ شما با این روش ساده!
بارش‌های سیل‌آسا در راه است! آیا خانه شما آماده است؟
بارش‌های سیل‌آسا در راه است! آیا خانه شما آماده است؟
قیمت انواع دستگاه تصفیه آب خانگی در ایران
نمایش جنگ دینامیت شو در تهران [از بیوگرافی میلاد صالح پور تا خرید بلیط]
9 روش جرم گیری ماشین لباسشویی سامسونگ برای از بین بردن بوی بد
ساندویچ پانل: بهترین گزینه برای ساخت و ساز سریع
خرید بیمه، استعلام و مقایسه انواع بیمه درمان ✅?
صفحه اول
آرشیو مطالب
ورود/عضویت
هواشناسی
قیمت طلا سکه و ارز
قیمت خودرو
مطالب در سایت شما
تبادل لینک
ارتباط با ما
مطالب سایت سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون
مطالب سایت سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون
آمار وبسایت
تعداد کل بازدیدها :
1846686248
کسی مشکل این برنامه رو میدونه -- حرفه ای ها -
واضح آرشیو وب فارسی:سایت ریسک: کسی مشکل این برنامه رو میدونه -- حرفه ای ها i_lover3000 08 اسفند 1386, 00:04با عرض سلام خدمت دوستان عزیز بازم به یه مشکل دیگه برخوردم برنامه دو تا رسم تو صفحه می کشه که رسم سمت چپ درسته اما رسم سمت راست ادامش میره پایین صفحه و قابل دیدن نیست the_king 08 اسفند 1386, 02:16کد برنامه را ویرایش کردم : Private Sub Command 1_Click() Unload Me End Sub Private Sub Form_Activate() Me.ScaleMode = vbPixels Me.AutoRedraw = True a = Me.ScaleWidth - 1 b = Me.ScaleHeight - 1 c = b / a d = a / b While i < a Line (i, 0)-(a, i * c), RGB(0, 255, 0) i = i + 13 Wend i = 0 While i < b Line (0, i)-(i * d, b), RGB(0, 255, 0) i = i + 13 * c Wend End Sub مورد اول : ترسیم های گرافیکی را با واحد Pixel انجام بدید و نه Twip که واحد پیشفرض ویژوال بیسیک است. از ScaleWidth و ScaleHeight برای این منظور استفاده می شود. مورد دوم : ترسیم گرافیکی در ویژوال بیسیک دو حالت متفاوت داره، با AutoRedraw فعال و غیر فعال. در حالت عادی AutoRedraw غیر فعال است و ترسیم شما فقط روی نمایشگر رسم می شود ولی در حافظه فرم ثبت نمیشه به همین دلیل اگر به هر علتی فرم ترسیم شده Refresh بشه، قسمت Refresh شده به حالت عادی برمی گرده و ترسیم ها فراموش می شوند. مثلا وقتی فرم دیگری روی فرم ما را بپوشاند، وقتی فرم بالایی کنار برود ترسیم های شما دیگر وجود ندارند. برعکس وقتی AutoRedraw فعال باشد، اول ترسیم ها در حافظه فرم ثبت می شوند و سپس روی صفحه نمایشگر نمایش داده می شود. به همین دلیل تا زمانی که خودمان فرمانی ندهیم پاک نمی شوند. مورد دوم بایستی در ترسیم شما بکار بروند، چون شما زمانی دارید در فرم ترسیم انجام می دهید که فرم بصورت کامل نمایش داده نشده، پس احتمال از دست رفتن ترسیم ها با AutoRedraw غیر فعال وجود دارد. مورد سوم : صفحه مانیتور مربع که نیست، نسبت طول به عرض صفحه را رعایت نکرده بودید. i_lover3000 10 اسفند 1386, 01:29با تشکر خیلی بهم کمک کردید موفق باشید ...
این صفحه را در گوگل محبوب کنید
[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 402]
-
گوناگون
پربازدیدترینها