Search Results

Hi, I'm facing the same problem, is it possible to know how you solved it? B4i Msgbox2 in general works like B4A Msgbox2Async. The dialog is not a modal. For example, Msgbox2("Msg", "Do you want to do delete document?", "Title", Array ("Yes", "No")). To retrieve the answer, you can use Wait For
link: Hi, I'm facing the same problem, is it possible to know how you solved it? In particular if it is possible to include an image in a msgbox2 how to do?
link: How to implement Msgbox2Async with B4i ?

This is called from Application_Start when the app starts and works fine when testing. When I upload the app the msgbox is not called. Dim T As String = "See Medicolegal disclaimer?" Dim Title As String = "www.makindo.co.uk" Dim sf As Object = xui.Msgbox2Async(T, Title, "Yes", "Cancel", "
link: Not sure what you mean with "upload the app". Make sure to test it in release mode before you submit it to the store. Try to add Sleep(0) before.
link: Thanks - it works with the developer app fine which i submit but then doesn't work in the downloaded app

XUI.Msgbox2Async(msg,"Title","Yes","","No",Null) Wait For MsgBox_Result(Result As Int) If Result<>XUI.DialogResponse_Positive Then Log("qq") Return End If
link: This code works well with B4a, as replace it in B4I ? Msgbox2Async("","the customer already exists, do you want to overwrite it?", "yes", "", "No",
link: Thank you with all my heart

Correct way to use Msgbox2: Msgbox2("Msg", "Do you want to do delete document?", "Title", Array ("Yes", "No")) Wait For Msg_Click (ButtonText As String) If ButtonText = "Yes" Then 'delete document End If No need to handle a different event. You have access to everything.
link: Thank you erel, I hadn't thought about wait for !
link: Hi all. it's possible to get the msgbox2 title in MsgBox2_Click(ButtonText as string) event ? Thanks in advice

Yes you can, . It is the same as for xui.Msgbox2Async
link: This is still a problem. I cannot wait for xui.MsgboxAsync The wait for is for xui.Msgbox2Async
link: Dim sf As Object = xui.MsgboxAsync("Delete file?", "Title") Wait For (sf) Msgbox_Result (Result As Int)
link: #if b4a xui.MsgBoxAsync("message","title") #else if b4i wait for xui.MsgBoxAsync("message","title") #end if B4xpages.("Mainpage") Should I do it this

MsgboxAsync("This app requires an internet connection"&CRLF&"Please check your connection and restart the app.", "No Internet Connection!") tmrCon.Enabled=False Wait For MsgBox_Result (Result As Int) I use the above code in B4A to show a message box to the user then wait for
link: There is a cross-platform version (xui.) of asynchronous msg boxes. https://www.b4x.-with-xui-msgboxasync-text-title-with-b4xpages-closepage-me-page-
link: My search skills must be getting rusty. I searched, but couldn't find that before I posted my question. Time to check that thread out and get it worki

ah...i see the typo...great thanks Erel.
link: ", "W A R N I N G ", "C L O S E", "", "S A V E", Null)) Msgbox_Result (Resp As Int) If Resp = xui.DialogResponse_Positive Then Log("TRUE")
link: No: else if xui.DialogResponse_Negative Then Yes: Else If resp = xui.DialogResponse_Negative Then

Type this: Dim sf As Object = xui.Msgbox2Async("Removing from Home Screen.....", $"Remove "Tips"?"$", "Remove from Home Screen", "Delete App", "Cancel", Null) Wait For (sf) Msgbox_Result (Result As Int) If Result = xui.DialogResponse_Positive Then Log("Deleted!!!") End If
link: Hi, Thanks. I know how to create msgbox. How to create customize msgbox. (change text color , font , bold , ... ) like picture.
link: Can change default msgbox b4i like this picture?? 135905

A Msgbox that disappears automatically after the set timeout. The result is "Cancel". Sub ShowMessageWithTimeout(text As String, timeout As Int) As ResumableSub Dim sf As Object = Msgbox2("Msg", text, "Title", Array ("Yes", "No", "Cancel")) Dim cancel(1) As Boolean CheckForTimeout(sf, time
link: Perfect! :)

Dear Filippo unfortunately it isn't so. Even by inserting an MsgBox2 on the ipad Pro 13.4.1 (both from tests carried out by us and from tests carried out by apple for this reason we realized that the ipad was not running) the problem remains
link: Change your code to: Sub btnChoosePicture_Click Dim btn As B4XView = sender Dim sf As Object = xui.Msgbox2Async( "VUOI CAMBIARE LA FOTO DEL T
link: Hi all this code work without problem with iPhone: Sub btnChoosePicture_Click Dim sf As Object = xui.Msgbox2Async( "VUOI CAMBIARE LA FOTO DEL TUO

Powered by ColBERT