iOS Question Can't change alignment of text in button

RVP · Aug 21, 2015

I have added a button to my page in Designer, it is marked as Style Custom, then in my code I am doing:

B4X:

Private Sub Page1_Resize(Width As Int, Height As Int)
        btnCompany.CustomLabel.TextAlignment = btnCompany.CustomLabel.ALIGNMENT_LEFT
        btnLocation.CustomLabel.TextAlignment = btnLocation.CustomLabel.ALIGNMENT_LEFT
End Sub

But the aligment remains centered

narek adonts · Aug 21, 2015

Try to create a label first and set that lavel to a button

Button.label=label1

RVP · Aug 21, 2015

Cant access .Label ?

tufanv · Aug 21, 2015

RVP said:
Cant access .Label ?

button.text = label1

RVP · Aug 21, 2015

B4X:

    lblbtnCompany.Initialize("lblbtnCompany")
    lblbtnLocation.Initialize("lblbtnLocation")
    lblbtnCompany.TextAlignment = lblbtnCompany.ALIGNMENT_LEFT
    lblbtnLocation.TextAlignment = lblbtnLocation.ALIGNMENT_LEFT
    lblbtnCompany.Text = cid
    lblbtnLocation.Text = loca
   
    btnCompany.Text = lblbtnCompany
    btnLocation.Text = lblbtnLocation

That gives a warning Object Converted to String This is probably a programming mistake and then displays the object information when run instead of the actual txt

tufanv · Aug 21, 2015

why dont you use label as button ? IS there any special reason for you to use button instead of label ?

RVP said:
B4X:

lblbtnCompany.Initialize("lblbtnCompany") lblbtnLocation.Initialize("lblbtnLocation") lblbtnCompany.TextAlignment = lblbtnCompany.ALIGNMENT_LEFT lblbtnLocation.TextAlignment = lblbtnLocation.ALIGNMENT_LEFT lblbtnCompany.Text = cid lblbtnLocation.Text = loca btnCompany.Text = lblbtnCompany btnLocation.Text = lblbtnLocation

That gives a warning Object Converted to String This is probably a programming mistake and then displays the object information when run instead of the actual txt

RVP · Aug 23, 2015

Ahhhh, I guess because I didn't think of that?

ilan · Nov 7, 2015

tufanv said:
why dont you use label as button ? IS there any special reason for you to use button instead of label ?

the button has different settings like "pressed text color" or "pressed background image",...
would also interest me why the code above does not work

and also why there is no "Text aligment" in the designer when i choose a button?

tufanv · Nov 7, 2015

ilan said:
the button has different settings like "pressed text color" or "pressed background image",...
would also interest me why the code above does not work

and also why there is no "Text aligment" in the designer when i choose a button?

dont know the answer but maybe you can use timer for what you want with an interval of 500 maybe

ilan · Nov 7, 2015

i am doing it allready like you suggest (via timer) but i think that it would be good for us to know why this code doesnot work and what is the right code.
maybe @Erel could bring some light to the darkness

Erel · Nov 8, 2015

It is always better to start a new thread for a new question.

You can use this code to set the button's alignment:

B4X:

'0 - center, 1 - left, 2 - right
Sub SetButtonAlignment(btn As Button, alignment As Int)
   Dim no As NativeObject = btn
   no.SetField("contentHorizontalAlignment", alignment)
End Sub

ilan · Nov 8, 2015

Erel said:
It is always better to start a new thread for a new question.

It is the same question as above (title)
Thatswhy i didnot start a new thread.

Just searched by my self for "button alignment - b4i" and this thread was in first place so i thought it would be good to have an answer to this thread...

iOS Question Can't change alignment of text in button

RVP

Active Member

narek adonts

Well-Known Member

RVP

Active Member

tufanv

Expert

RVP

Active Member

tufanv

Expert

RVP

Active Member

ilan

Expert

tufanv

Expert

ilan

Expert

Erel

B4X founder

ilan

Expert

Similar Threads

iOS Question Can't change alignment of text in button

Active Member

Well-Known Member

Active Member

Expert

Active Member

Expert

Active Member

Expert

Expert

Expert

B4X founder

Expert

Similar Threads

Privacy & Transparency

Privacy & Transparency