سلام
این آموزش تضمینی نیست و ممکنه که برنامه شما هک شود اما امنیت را بسیار بالا می برد. ابتدا یک کتابخانه دارد که باید از اینجا دانلود کنید .
قبل از انجام درون پرداخت باید کد های زیر را بنویسید:
k1.Initialize
If k1.CheckPatcher = True Then
msgbox("شما از نرم افزار هک استفاده می کنید و نمی توانید از درون پرداخت استفاده کنید !","خطا")
else
'این جا درون پرداخت را انجام دهید.
End if
این نرم افزار برای تبدیل فایل های Jar به Exe می باشد که آموزش آن بعدا در سایت قرار خواهد گرفت.
Notepad ++ یک نرم افزار رایگان و متن باز می باشد که می توانید جایگرین خوبی برای نوت پد ویندوز باشد. در حال حاضر فقط در مایکروسافت ویندوز اجرا می شود. نوت پد ++ سرعت بالایی دارد و از حداقل Cpu و Ram استفاده می کند. یکی از ویژگی های مهم آن نوشته شدن آن با زبان C++ است. شما می توانید در این نرم افزار زبان برنامه نویسی خود را انتخاب کنید و بوسیله همین نرم افزار برنامه نویسی کنید. همچنین نوت پد ++ دارای افزونه های زیادی می باشد.
سپس هر زمان خواستید از این ساب استفاده کنید. این ساب از شما همان مقدار رنگ شبیه 0xFF45DD92 را می گیرد و کد RGB را به صورت مثلا 25,96,215 بر گشت می دهد.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
برای نمایش یک دیالوگ ( کادر محاوره ای ) حاوی متن می توانید از دستور زیر استفاده کنید:
آرگومان اول متن و در آرگومان دوم عنوان ( Subject ) را وارد کنید.fx.Msgbox("متن", "عنوان")
توضیح خاصی نیست.frmEditCodeCSS.Resizable = False
در این آموزش قرار است شفافیت یک عنصر یا متن یا ... را تغییر دهیم. شما می توانید یک عدد اعشاری از بین 0 تا 1 را انتخاب کنید. به مثال زیر توجه کنید:
Opacity: 0.8;
در این مطلب به آموزش ذخیره فایل حاوی متن و کاراکتر در B4J می پردازیم. کد به این صورت می باشد:
File.WriteString("D:\\", "filename.html", "charters")
ابتدا یک ComboBox در لایوت خود اضافه کنید و آن را به قسمت کدنویسی تعریف نمایید. حالا از کد زیر برای اضافه کردن آیتم به صورت کلی استفاده کنید:
عبارت ComboBox1 نام کمبو باکس شما می باشد. شما می توانید تعداد آیتم نا محدود اضافه کنید و آرگومان ها را بیش تر کنید.ComboBox1.Items.AddAll(Array As String("Item1","Item2","Item3","Item4"))