Kbase P21839: How to Dynamically resize the frame to accommodate large text and move controls accordingly on Actua
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
16/10/2008 |
|
Status: Unverified
GOAL:
How to Dynamically resize the frame to accommodate large text and move controls accordingly on Actuate
FIX:
1) Declare a variable TxtControlHeight the final size of the text control
2) In the AdjustSize method of the frame add this code to increase the size of the frame according to the size of the text
if TxtControlHeight > 354 then
size.height = me.getheight + (ControlSize -354)
end if
3) In the finish() method of the controls check whether the text control has grown and if yes move the control accordingly.
if TxtControlHeight > 354 then
me.position.y = me.getTop + (ControlSize - 354)
end if
4) In the BuildFromRow() of the textcontrol add the following code
Dim displayheight As Integer
displayheight = GetDisplayHeight( "display", Size.Width, myrow.customers_customname, Font, TextPlacement )
TxtControlHeight = displayheight