I try to create a PDF document using this library, based in the example of the post.
It is a profile form, with a title in a rectangle and an image,
The title with the rectangle is printing, but the image don't.
What could be happen? How can I fix this?
The code is below and the example is...
Hello everyone. So right now i want to make a loop to get all item selected. Im using map to pass the data into the server. So here is my code. Any idea ?
B4X:
Dim dpList As List
dpList.Initialize
Dim i As Map
i.Initialize
i.Put("ITEM_QTY", txtQte.Text)...
Based on this open source project: https://github.com/avishorp/TM1637
Timer example:
B4X:
Sub Process_Globals
Public Serial1 As Serial
Private tm As TM1637Display
Private timer1 As Timer
End Sub
Private Sub AppStart
Serial1.Initialize(115200)
Log("AppStart")
tm.Initialize(2...
This code does not work. The pointlist has 4 entries, but as they are added to the poly line points, the log shows the size remains as 0.
My code for a polyline:
Course =gmap.AddPolyline
For Each px As LatLng In pointlist
Course.Points.Add(px)
Log(px.Latitude)...
B4X:
dim fc As FileChooser
dim sql as SQL
fc.Initialize
fc.Title="Select File" 'title of the dialog box
fc.setExtensionFilter("MDB file", Array As String("*.mdb"))
myfname=fc.ShowOpen(RemoteResultform) 'myfname contains the full path...
how can I create a BBLabel by code, without using the designer?
I want to add it to a panel, and put a text in BBLabel on it, I've tried it in many ways, but it always says you need to initialize ...
if i do it via designer it works blz, but in my case i will need it via code, because i will...
This code.
B4X:
Sub Process_Globals
Private fx As JFX
Private MainForm As Form
Dim CVS As B4XCanvas
Dim RPane As B4XView
Dim Xui As XUI
End Sub
Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
'MainForm.RootPane.LoadLayout("Layout1") 'Load the layout...
For B4i:
Run this JavaScript code after the page is loaded:
Sub webview_PageFinished (Success As Boolean, Url As String)
wait for (webview.EvaluateJavaScript("document.documentElement.scrollHeight")) webview_JSComplete (Success As Boolean, Result As String)
If Success Then...
Dependency: WebViewExtras2 (v2.20)
Add WebViewExtra and DefaultJavascriptInterface variable in Global Sub:
Sub Globals
Dim wve As WebViewExtras
Dim jsi As DefaultJavascriptInterface
End Sub
Initialize WebViewExtra and DefaultJavascriptInterface before loading content in WebView...
When creating an object that raises an event, is it possible to automatically address the caller module?
In the following example, the testobject object raises an event: in the Initialize sub, I used Me to specify the current module.
Is there another way to do it, so the Initialize sub can have...
i am trying to handle a huge requests within the server by sending data From each Client Class as a Queue
in the Client Class i have setup a Timer
B4X:
Dim SendTimerQueue As Timer
Dim ClientCMdList As List
Dim SendingQueue As Boolean
and each Time the Timer Fired it should handle the list of...
Good day!
I am having problem with implementing the sliding drawer in a b4xpage.
I used "Root" since I cannot use "Activity" in the drawer initialization parameter.
B4X:
Private Sub B4XPage_Created (Root1 As B4XView)
Root = Root1
Drawer.Initialize(Me, "Drawer", Root, 300dip)...
Hi to all, im using this code to show the firebase notifications
B4X:
Dim n As NB6
Dim icono As Bitmap = LoadBitmapResize(File.DirAssets, "icon.png", 24dip, 24dip, False)
n.Initialize("default", Application.LabelName, "HIGH").AutoCancel(True).SmallIcon(icono)
Dim cs...
Hi
I have an app that works fine and connects nicely to mqtt with newer Android (8,9,10). I am using mqtt lib 1.01
I have tried to install it in a old 6.1 phone I have and the app crashes upon calling:
B4X:
mqtt.Initialize("mqtt", BrokerProtocol & "://" & BrokerAddr & ":" & BrokerPort...
I am trying to port this example "CustomB4XDialogTemplate" into my B4XPages app.
I receive this error:
This is my code for B4XPage2:
B4X:
Sub Class_Globals
Private Root As B4XView 'ignore
Private xui As XUI 'ignore
Private Dialog As B4XDialog
Dim mt As MyTemplate
End Sub...
Hi guys !!!!
I'm trying to update a Google Spreadsheet, using OAuth2 library.
This is my piece of code:
B4X:
Sub Process_Globals
Dim ClientId As String = "..."
Private oauth2 As GoogleOAuth2
End Sub
Sub Activity_Create(FirstTime As Boolean)
...
If FirstTime Then...
Hey
I'm using the same example of dialog.showtemplate in B4A for pressing Button10
I defined "options As B4XListTemplate" in Globals. Then initialize it after my layout has been loaded (which contains Button10) and put the options in options
B4X:
Activity.LoadLayout("Mobile")...
B4X:
Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
Activity.LoadLayout("splash")
timer1.Initialize("timer1", 5000)
timer1.Enabled = True
myimage.Initialize(File.DirAssets, "DSCF2955.jpeg")...
Hi for all, i need a bit help with this plz.
Im using this code and works fine, but i need some more.
this code:
Base = Activity
Dialog.Initialize (Base)
SearchTemplate.Initialize
Dim Items As List
Items.Initialize...