iOS Question Round button

[stari]

hi, i can't find, how to make round Button in B4i, like in B4a -
cdwColor.Initialize(Colors.White ,50dip).

 

[ciginfo]

With Corner radius Property in th designer

 

[klaus]

Set the Width and Height properties to the same value and the corner radius to the half of that value.

 

[stari]

Set the Width and Height properties to the same value and the corner radius to the half of that value.

thks, klaus. And with the code ? Ah, can i achive this with SetBorder ?

 

[klaus]

Dim Button1 As Button
Button1.Initialize("Button1")
Activity.AddView(Button1, 50dip, 50dip, 100dip, 100dip)
Button1.Text="TEST1"
Dim cdw As ColorDrawable
cdw.Initialize2(Colors.Red, 50dip, 1dip, Colors.Black)
Button1.Background = cdw

 

[stari]

Dim Button1 As Button
Button1.Initialize("Button1")
Activity.AddView(Button1, 50dip, 50dip, 100dip, 100dip)
Button1.Text="TEST1"
Dim cdw As ColorDrawable
cdw.Initialize2(Colors.Red, 50dip, 1dip, Colors.Black)
Button1.Background = cdw

Thks very much.

 

[stari]

Dim Button1 As Button
Button1.Initialize("Button1")
Activity.AddView(Button1, 50dip, 50dip, 100dip, 100dip)
Button1.Text="TEST1"
Dim cdw As ColorDrawable
cdw.Initialize2(Colors.Red, 50dip, 1dip, Colors.Black)
Button1.Background = cdw

Ops, what library must i use for ColorDrawable in B4i ?? I can't find.

 

[klaus]

You don't need any library it's part of the core library.

 

[stari]

You don't need any library it's part of the core library.

Hello,
my B4i is version 1.80, iCore version 1.78 but for me "ColorDrawable" don't work. (Missing a library reference). I don't understand.

 

[klaus]

Sorry, I was thinking in B4A instead of B4i !

Private Button1 As Button
Button1.InitializeCustom("Button1", Colors.Black, Colors.Blue)
Page1.RootPanel.AddView(Button1, 50, 50, 100, 100)
Button1.Color = Colors.Red
Button1.SetBorder(1, Colors.Black, 50)

 

[stari]

Sorry, I was thinking in B4A instead of B4i !

Private Button1 As Button
Button1.InitializeCustom("Button1", Colors.Black, Colors.Blue)
Page1.RootPanel.AddView(Button1, 50, 50, 100, 100)
Button1.Color = Colors.Red
Button1.SetBorder(1, Colors.Black, 50)

Tank you, klaus, all is workong OK. Have a nice weekend.