رفتن به مطلب

آموزش استفاده از msgbox3


احسان کرمی

ارسال‌های توصیه شده

سلام


تو این آموزش یاد خواهید گرفت که چجوری یک msgbox شخصی سازی شده با امکان تغییر رنگ بسازید


درصورت نیاز ، نیز میتوانید یک icon هم تو این msgbox بگذارید


اول باید کتابخونه ی RichString و SPDialogs رو فعال کنید


تو قسمت Sub Globals هم فراخوانیش کنید به این صورت



Dim msg As Msgbox3
Dim rs As RichString

حالا توی دکمه ی مورد نظر یا هرجا که قصد دارید این msgbox نمایش داده بشه این کد هارو بنویسید (که من برای آزمایش گذاشتمش توی Activity_Create) 



Sub Activity_Create(FirstTime As Boolean)

rs.Initialize(“{R}{T}{Blue}این{Blue}{T}{R} {U}یک{U} متن {Red}{BI}آزمایشی{Red} است {BI}”)
rs.Color2(Colors.Blue,”{Blue}”)
rs.RelativeSize2(1.5, “{R}”)
rs.Typeface2(“Serif”,”{T}”)
rs.Underscore2(“{U}”)
rs.Color2(Colors.Red, “{Red}”)
rs.Style2(rs.STYLE_BOLD_ITALIC, “{BI}”)

msg.Show(rs, “عنوان”, “تأیید”, “”, “”,LoadBitmap(File.DirAssets,”mypic.png”))

End Sub

خب اون قسمت هایی که توی خط اول فارسی هستند متن های شما در msgbox هستند.


توی خط دوم و شیشم اومدیم رنگ رو به ترتیب آبی و قرمز کردیم که شما میتونید به  دلخواه رنگ مورد نظر خودتون رو بزارید


توی خط سوم سایز فونت رو گذاشتیم 1.5 که اینو هم میتونید به دلخواه  تغییر بدید


توی خط چهارم گفتیم فونتمون از نوع serif باشه 


توی خط پنجم گفتیم متنمون Underline باشه 


خط شیشم رو هم که قبلاً گفتم رنگ قرمز هست


خط هفتم هم متن رو هم بولد و هم  ایتالیک میکنه


 


برای مثال میتونید با کد های اختصاری فوق که یکیشون {Blue} هست متن نوشته های msgbox خودتون رو آبی کنید


چطوری ؟ فقط کافیه توی ( خط اول کد ها ) اول و آخر متن تون بنویسید {Blue}


برای مثال : {Blue}  سلام این نوشته آبی است {Blue}


بقیه کد های اختصاری هم به همین صورت…


توی خط هشتم میایم عنوان پیغام , گزینه های تأیید ، بله و خیر رو اضافه میکنیم (چجوریش رو توی سورس مثال آموزش دادم)


آخرش هم که اومدیم عکس دلخواهمون رو لود کردیم


اینم از عکسش


Capture.PNG


کتابخونه ی SPdialogs رو هم پیوست کردمSPDialogs_1.01.zip


(این اولین آموزش من تو این انجمن بود اگه مشکلی بود ببخشید.اون پسندیدم رو هم بزنید اشکالی نداره ها:دی)


موفق باشید


لینک ارسال
به اشتراک گذاری در سایت های دیگر

:| خودت میدونی چی نوشتی ؟

آره:دی

اولش نمی دونم  چی شد اونجوری شد.ببخشید

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...