Android Question Customize B4XDialog

[Sergey_New]

Alexander Stolte shared a dialogue.

Spoiler

    dia.BlurBackground = True  
    dia.BackgroundColor = xui.Color_ARGB(255,32, 33, 37)  
    dia.ButtonsTextColor = xui.Color_ARGB(255,20, 160, 130)
    dia.ButtonsColor = dia.BackgroundColor  
    dia.BorderWidth = 0
    dia.BorderCornersRadius = 10  
    dia.TitleBarColor = xui.Color_ARGB(255,32, 33, 37)
    dia.TitleBarTextColor = xui.Color_ARGB(255,20, 160, 130)
   
    dia.Title = "Delete"
    Dim sf As Object = dia.Show("Are you sure you want to delete this picture?","Yes", "No", "Abort")
    dia.TitleBar.GetView(0).SetTextAlignment("CENTER","LEFT")
    dia.TitleBar.GetView(0).Left = 10dip
    Dim Content As B4XView = dia.Base.GetView(dia.Base.NumberOfViews - 1)
    Content.GetView(0).Left = 10dip
    Content.GetView(0).width = Content.GetView(0).width - 5dip

Please tell me how to change the text color of the message from white to yellow?

 

[teddybear]

Alexander Stolte shared a dialogue.

Spoiler

    dia.BlurBackground = True
    dia.BackgroundColor = xui.Color_ARGB(255,32, 33, 37)
    dia.ButtonsTextColor = xui.Color_ARGB(255,20, 160, 130)
    dia.ButtonsColor = dia.BackgroundColor
    dia.BorderWidth = 0
    dia.BorderCornersRadius = 10
    dia.TitleBarColor = xui.Color_ARGB(255,32, 33, 37)
    dia.TitleBarTextColor = xui.Color_ARGB(255,20, 160, 130)
 
    dia.Title = "Delete"
    Dim sf As Object = dia.Show("Are you sure you want to delete this picture?","Yes", "No", "Abort")
    dia.TitleBar.GetView(0).SetTextAlignment("CENTER","LEFT")
    dia.TitleBar.GetView(0).Left = 10dip
    Dim Content As B4XView = dia.Base.GetView(dia.Base.NumberOfViews - 1)
    Content.GetView(0).Left = 10dip
    Content.GetView(0).width = Content.GetView(0).width - 5dip

Please tell me how to change the text color of the message from white to yellow?

Dim cs As CSBuilder

Dim sf As Object = dia.Show(cs.Initialize.Color(Colors.Yellow).Append("Are you sure you want To delete this picture?").PopAll,"Yes", "No", "Abort")

 

[Sergey_New]

Thank you! I want to clarify, but does B4XDialog have its own method to change the color of the message text? Maybe add your own template? I didn't find how to do it.

 

[teddybear]

Thank you! I want to clarify, but does B4XDialog have its own method to change the color of the message text? Maybe add your own template? I didn't find how to do it.

 dia.BodyTextColor = Colors.Yellow
 Dim sf As Object = dia.Show("Are you sure you want to delete this picture?","Yes", "No", "Abort")

 

[Sergey_New]

teddybear, thank you!

 

[AnandGupta]

@Sergey_New , you should mark @teddybear message as solution, not your thank you one.

 

[Sergey_New]

AnandGupta,​

Posted at 9:58 but made a mistake and tagged in the wrong post. Thank you!