Search Results

Introducing a new library that allows you to create your own settings page with minimal code... manage your settings. It supports booleans, free text, numbers, comboboxes, action buttons and more, giving you a wide range of options to customize your settings page. With this library, you can quickly and easily create a professional-looking settings page for your application or app without having to... https://www.b4x.com/android/forum/threads/b4x-as-settings-boolean-property.159261/ 150843 Action...

The modes are explained here: https://www.sqlite.org/pragma.html#pragma_journal_mode The two cases where it is important to set the journal mode: 1. WAL - B4J server solutions: https://www.b4x.com/android/forum/threads/webapp-concurrent-access-to-sqlite-databases.39904/#content 2. DELETE - when it is important that the database will be made of a single file. sql.ExecQuerySingleResult("PRAGMA journal_mode = delete") Log("Current mode: " & sql.ExecQuerySingleResult...

I've just wasted an hour trying to understand why a desktop program that I'm using for many months failed to upload a file to a FTP server. I realized that the only thing that was recently changed is that B4J was running with Java 10. Mistakenly I assumed that it is related to IPv6 handling (the server is using IPv4). What actually happened is that after Java 10 was installed, at some poi...

151615 Private Sub SetTextViewLinkAttributes(view As TextView, Foreground As Int, LineColor As Int) Dim no As NativeObject = view Dim m As Map = CreateMap("NSColor": no.ColorToUIColor(Foreground), "NSUnderlineColor": no.ColorToUIColor(LineColor)) no.SetField("linkTextAttributes", m.ToDictionary) End Sub Example: Private Sub B4XPage_Created (Root1...").PopAll TextView1.AttributedText = cs SetTextViewLinkAttributes(TextView1, xui.Color_Red...

Cross platform code to change the date format with an explicit locale: Private Sub SetDateFormat...("anywheresoftware.b4a.keywords.DateTime", "getInst", Null, Null) r.SetField2("dateFormat...("dateFormat").SetField("locale", locale) DateTime.DateFormat = format #End if... Dim format As String = "dd MMM, yyyy" SetDateFormat("en", "US", format) Log(DateTime.Date(DateTime.Now)) SetDateFormat("he", "IL", format...

This is regarding me making my own navbar (see this thread for more info). Normally the status bar piggybacks on the color of the navigation bar. In my case I'm building my own navigation bar, which means I'm hiding the real one. And when I hide the real one, the status bar doesn't pick up the (disabled) navigation bar color. Which brings me to my question: How to set the color (both background and text color) of the status bar? I found a web page showing how to do this (at least...

https://www.b4x.com/android/forum/threads/b4x-xui-as-settings.147435/ With this property, the user... platform. 150851 150852 Example 'ComboBox AS_Settings1.MainPage.AddProperty_ComboBox...)) ComboBox2 The problem with the normal ComboBox is that you can only set one value and this value...,"DisplayText 3","DisplayText 4")) AS_Settings1.MainPage.AddProperty_ComboBox2.... Private Sub AS_Settings1_ValueChanged(Property As AS_Settings_Property, Value As Object) 'Log...

https://www.b4x.com/android/forum/threads/b4x-xui-as-settings.147435/ With this property... the B4XBreadCrumb comes outside the group Example AS_Settings1.MainPage.AddGroup("Group1","Group") AS_Settings1.MainPage.AddProperty_Boolean("Group1","Prop1","Prop 1","",Null,True) AS_Settings1.MainPage.AddProperty_Boolean("Group1","Prop2","Prop 2","",Null,False) AS_Settings1...

,100dip,100dip) SetPanelCornerRadius(xpnl_MyPanel,20dip,True,True,False,False) Private Sub SetPanelCornerRadius(View As B4XView, CornerRadius As Float,TopLeft As Boolean,TopRight As Boolean,BottomLeft.../individually-change-corner-radius-of-a-view.127751/post-800352 View.SetColorAndBorder(View.Color...,0) + IIf(BottomRight,8,0) View.As(NativeObject).GetField ("layer").SetField... Is GradientDrawable Then jo.RunMethod("setCornerRadii", Array As Object(Array As Float(IIf...

Edit: This sub is included in XUI Views library: XUIViewsUtils.SetTextOrCSBuilderToLabel This sub accepts a string or CSBuilder and sets it as the Label's text. It is useful for cross platform solutions. Note that the Text parameter type is Object. Public Sub SetTextOrCSBuilderToLabel(xlbl As B4XView, Text As Object) #if B4A or B4J xlbl.Text = Text #else if B4i If Text...: SetTextOrCSBuilderToLabel(lbl, "" & 123) ...