B4J Question [Solved] Show and edit a textfield with emoji and text

asales · Feb 12, 2022

I have a sqlite table with fields that have emojis and text:

When I try to load this content in a TextField:

B4X:

tfTitle.Text = rs.GetString("title")
tfNotification.Text = rs.GetString("message")

The emojis is not show correctly:

How can I show (load from sqlite), edit and save this fields with emojis and text?

Thanks in advance for any tip.

Erel · Feb 13, 2022

Does it show properly if you set the string directly in the code?
Please post the text as text.

asales · Feb 13, 2022

Erel said:
Does it show properly if you set the string directly in the code?
Please post the text as text.

Directly works:

B4X:

tfTitle.Text = "New version in Play Store ?❤️?"
tfNotification.Text = "This is a notification test ? Check this ??♥️"

Read from SQLite, don't':

B4X:

Dim rs As ResultSet = B4XPages.MainPage.sql1.ExecQuery("SELECT id, title, message, sended FROM notifications WHERE id = " & B4XPages.MainPage.id_msg)

TILogistic · Feb 13, 2022

remember that emojis are unicode.

and from what I see it does not convert them.

can you upload an example of dbase sqlite.

asales · Feb 13, 2022

Omar Parra A. said:
remember that emojis are unicode.

and from what I see it does not convert them.

can you upload an example of dbase sqlite.

Thanks for the answer.

Here the project with the sqlite database.

I use the SQLiteStudio tool to create the original database and the fields is filled with a Delphi program.
In both I can see the text and emojis in the fields.

Now I try to port to B4J, but I get stuck with this problem to show and edit the unicode content of the fields.

Erel · Feb 14, 2022

1. This is considered broken code:

B4X:

Dim rs As ResultSet = sql1.ExecQuery("SELECT id, titulo, mensagem FROM mensagens WHERE id = " & id_msg)

2. You are not closing the ResultSet.
3. Using File.DirApp is a mistake if you plan to release your app as a standalone app.
4. Using B4XPage_Appear is almost always a mistake. B4XPages are much simpler than activities and you don't need to wait for the page to appear to do something.

Looks like the jdbc driver uses the incorrect encoding. Get the bytes directly and convert them to string:

B4X:

Dim b() As Byte = rs.GetBlob("titulo")
tfNotification.Text = BytesToString(b, 0, b.Length, "utf8")

B4J Question [Solved] Show and edit a textfield with emoji and text

asales

Expert

Erel

B4X founder

asales

Expert

TILogistic

Expert

asales

Expert

Attachments

Erel

B4X founder

Similar Threads

B4J Question [Solved] Show and edit a textfield with emoji and text

asales

Expert

Erel

B4X founder

asales

Expert

TILogistic

Expert

asales

Expert

Attachments

Erel

B4X founder

Similar Threads

Privacy & Transparency

Privacy & Transparency