Text Box Height & Border Around Label

[ceaser]

Hi

1. Is it possible that I can set my own height of my text boxes and not let Basic4ppc set the height according to the font size that I have selected.

2. It would be nice to be able to have the label box have a border around.

Thanks
Michael
(ceaser)
Civil Engineering And Surveying Earthworks Routines

 

[Erel]

1. This is the underlying OS control behavior. If Multiline is set to true it is possible to change the height.
2. You can draw the border. Something like:

Sub App_Start
    Form1.Show
    DrawBorder("Label1",cBlack)
End Sub

Sub DrawBorder(label,color)
    x = Control(label).Left-1
    y = Control(label).Top-1
    form1.Line(x,y,x + Control(label).Width+2,y + Control(label).Height + 2,color,b)
End Sub

 

[ceaser]

Thanks

Sorry about these questions. Having programmed in NSBasic for 3 years and only 2 weeks with Basic4ppc, I am still trying to find my feet!

Michael

 

[Erel]

No problem. Please feel free to ask any question!