Hi All,
environment v 15. I have a printed form with a few fixed height and width
objects that are set to multi style. If object gets to large (width or
height). I will be placing text on another page and a note that states more
info is in comments section

I thought operhaps I could use object get best size,but find it does not
work as I expected

I have the following code

*C_LONGINT*($OLeft_L;$ORight_L;$OTop_L;$OBottom_L;$BWidth_l;$BHieght_L;
$OWidth_L;$OHeight_L)

*OBJECT GET COORDINATES*(*;"v_164_056_txt";$OLeft_L;$OTop_L;$ORight_L;
$OBottom_L)

$OWidth_L:=$ORight_L-$OLeft_L

$OHeight_L:=$OBottom_L-$OTop_L


*ST SET TEXT*(v_164_056_txt;"CAUSE OF DAMAGE : "+
[LSS_Inspection]LSS_DamageCause_txt;ST Start text;ST End text)

$pos_L:=*Position*(":";v_164_056_txt)  //

*ST SET ATTRIBUTES*(v_164_056_txt;1;$pos_L+2;Attribute bold style;1)

*ST SET ATTRIBUTES*(v_164_056_txt;1;$pos_L+2;Attribute background color
;"LightGray")

v_164_056_txt:=v_164_056_txt+" Testing height this is a test with losts of
wrapping and no CRs. "

v_164_056_txt:=v_164_056_txt+" Testing height this is a test with losts of
wrapping and no CRs. "

v_164_056_txt:=v_164_056_txt+" Testing height this is a test with losts of
wrapping and no CRs. "

v_164_056_txt:=v_164_056_txt+" Testing height this is a test with losts of
wrapping and no CRs. "

v_164_056_txt:=v_164_056_txt+" Testing height this is a test with losts of
wrapping and no CRs. "

v_164_056_txt:=v_164_056_txt+" Testing height this is a test with losts of
wrapping and no CRs. "

v_164_056_txt:=v_164_056_txt+" Testing height this is a test with losts of
wrapping and no CRs. "

v_164_056_txt:=v_164_056_txt+" Testing height this is a test with losts of
wrapping and no CRs. "

v_164_056_txt:=v_164_056_txt+" Testing height this is a test with losts of
wrapping and no CRs. "

v_164_056_txt:=v_164_056_txt+" Testing height this is a test with losts of
wrapping and no CRs. "


*OBJECT GET BEST SIZE*(*;"v_164_056_txt";$BWidth_l;$BHieght_L)

Thde width is way to wide. Is there a way I can adjust this so as to not
exceed the width as it appears on the form so only hieght changes in object
get best size

I am planning on writing some additional code to place text in arrays and
populate the text area one word at a time. If it gets too wide. I will add
a carriage return. This is a a lot of coding but should wortk. Any other
ideas out there

Thanks and regards

Chuck
-- 
-----------------------------------------------------------------------------------------
 Chuck Miller Voice: (617) 739-0306 Fax: (617) 232-1064
 Informed Solutions, Inc.
 Brookline, MA 02446 USA Registered 4D Developer
       Providers of 4D, Sybase & SQL Server connectivity
          http://www.informed-solutions.com
-----------------------------------------------------------------------------------------
This message and any attached documents contain information which may be
confidential, subject to privilege or exempt from disclosure under
applicable law.  These materials are intended only for the use of the
intended recipient. If you are not the intended recipient of this
transmission, you are hereby notified that any distribution, disclosure,
printing, copying, storage, modification or the taking of any action in
reliance upon this transmission is strictly prohibited.  Delivery of this
message to any person other than the intended recipient shall not
compromise or waive such confidentiality, privilege or exemption
from disclosure as to this communication.
**********************************************************************
4D Internet Users Group (4D iNUG)
Archive:  http://lists.4d.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub:  mailto:[email protected]
**********************************************************************

Reply via email to