کتابخانه jParvaSQLite - فراخوانی و تغییر اطلاعات دیتابیس

کتابخانه ای جهت کار با دیتابیس برای شما آماده کرده ایم. این کتابخانه مورد استفاده در B4J می باشد. توضیحات و نمونه کد ها در قسمت توضیحات هر متد ذکر شده، اما مثالی هم قرار دادم. برای مشاهده ویژگی ها و دانلود این کتابخانه به ادامه مطلب مراجعه کنید.

گرفتن یک متن از کلیپبورد ( Clipboard ) در B4J

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

Dim a As String
If fx.Clipboard.HasString = True Then
    a = fx.Clipboard.GetString
End If

به این ترتیب مقدار متغیر a با متن کلیپبورد برابر می شود.

فرستادن یک متن به کلیپبورد ( Clipboard ) در B4J

برای کپی کردن یک متن در برنامه از کد زیر استفاده می شود:

fx.Clipboard.SetString("متن مورد نظر")

در قسمت متن مورد نظر متنی که قصد فرستادن آن را به کلیپبورد دارید بنویسید.
موفق باشید

آموزش گرفتن آیکون فایل اجرایی ( Exe ) در B4J

برای گرفتن آیکون یک فایل اجرایی ابتدا باید ساب زیر را بنویسید:

Sub GetFileIcon(Dir As String, FileName As String) As Image
   Dim jo As JavaObject
   Dim JavaFile As JavaObject
   JavaFile.InitializeNewInstance("java.io.File", Array(File.Combine(Dir, FileName)))
   Dim icon As JavaObject = jo.InitializeStatic("sun.awt.shell.ShellFolder").RunMethodJO( _
     "getShellFolder", Array(JavaFile)).RunMethod("getIcon", Array(True))
   Return AwtImageToImage(icon)
End Sub

Private Sub AwtImageToImage(img As JavaObject) As Image
   Dim jo As JavaObject
   Return jo.InitializeStatic("javafx.embed.swing.SwingFXUtils").RunMethod("toFXImage", Array(img, Null))
End Sub

برای استفاده هم باید نام ساب یعنی GetFileIcon را بنویسید و ورودی اول مسیر فایل و ورودی دوم نام فایل را از شما می گیرید و یک متغیراز نوع Image به شما برگردانده می شود.

سورس ماشین حساب ساده برای B4J ( + صفحه کلید سفارشی )

این سورس ماشین حساب بسیار ساده می باشد که بوسیله B4J و با صفحه کلید سفارشی ساخته شده است. این سورس دارای باگ هایی می باشد. اگر توانستید آن ها را حل کنید سورس ویرایش شده را در نظرات ارسال کنید.

دانلود سورس کد

تبدیل کد رنگ برگشتی در B4J به فرمت RGB

شاید زمانی که قصد دارید رنگ یک ویو را بگیرید یا از ColorPicker در B4J استفاده می کنید خواهید دید که کد برگشتی شبیه 0xFF45DD92 می باشد. برای تبدیل شاب زیر را به پروژه اضافه کنید:

Sub GetColorRGB(ColorValue As Paint) As String
    Dim result As String = ""
    Dim joCV As JavaObject = ColorValue
    Dim R As Double = joCV.RunMethod("getRed", Null)
    Dim G As Double = joCV.RunMethod("getGreen", Null)
    Dim B As Double = joCV.RunMethod("getBlue", Null)
    result = Round(R * 255) & "," & Round(G * 255) & "," & Round(B * 255)
    Return result
End Sub

سپس هر زمان خواستید از این ساب استفاده کنید. این ساب از شما همان مقدار رنگ شبیه 0xFF45DD92 را می گیرد و کد RGB را به صورت مثلا 25,96,215 بر گشت می دهد.

آموزش نمایش دیالوگ انتخاب مسیر فایل ( File Chooser ) در B4J

شاید در برنامه هایی مثل نوت پد ویندوز دیده باشید زمانی که قصد ذخیره یا باز کردن یک فایل را دارید پنجره ای باز می شود و از شما درخواست انتخاب مسیر را می کند. در این آموزش روش ساخت چنین پنجره ای را در B4J داریم. در ادامه با وب سایت فرا آموزش همراه باشید.
ابتدا باید یک متغیر از نوع File Chooser تعریف کنید و آن را Initialize کنید.

نمایش کادر محاوره ای ( Msgbox ) در B4J

برای نمایش یک دیالوگ ( کادر محاوره ای ) حاوی متن می توانید از دستور زیر استفاده کنید:

fx.Msgbox("متن", "عنوان")

آرگومان اول متن و در آرگومان دوم عنوان ( Subject ) را وارد کنید.

لغو قابلیت تغییر اندازه فرم در B4J

برای لغو قابلیت تغییر اندازه فرم از کد زیر استفاده می شود:

frmEditCodeCSS.Resizable = False

توضیح خاصی نیست.

ذخیره فایل حاوی متن در B4J

در این مطلب به آموزش ذخیره فایل حاوی متن و کاراکتر در B4J می پردازیم. کد به این صورت می باشد:

File.WriteString("D:\\", "filename.html", "charters")

در آرگومان اول مسیر ذخیره سازی و آرگومان دوم نام فایل و پسوند ذخیره شده و آرگومان سوم محتویات فایل می باشد.
شما می توانید از هر فرمتی برای ذخیره سازی استفاده کنید.