n1\V 4.2 \Vc2qc2 (2"Arial("Arial&f&&Nom&&z& &AppCode&x 4 ]22<Fddhh(P%2"Arial&n'---Constante--- CX_SPACE = 20 CY_SPACE = 20 'MINWIDTH = 100 'MAXWIDTH = 200 '---Visibility--- Nom.visible = 1 'shape.&z&.width = min(shape.width/4, shape.height-2*CY_SPACE, MAXWIDTH) 'shape.&z&.width = max(shape.&z&.width, MINWIDTH) 'shape.&z&.height = shape.&z&.width shape.width = max(Nom.width + 3 * CX_SPACE + shape.&z&.width,shape.width) Nom.width = shape.width - 3 * CX_SPACE - shape.&z&.width AppCode.width = Nom.width shape.height = max (shape.height, shape.&z&.height + 2 * CY_SPACE,Nom.height + AppCode.height + 4 * CY_SPACE) shape.&z&.left = shape.left + CX_SPACE shape.&z&.top = shape.top + CY_SPACE Nom.left = shape.&z&.right+ CX_SPACE Nom.top = shape.top + CY_SPACE AppCode.left = Nom.left AppCode.top = Nom.bottom + CY_SPACE dd 7!=DrwContainer`Y Z"T3`!u\ DrwGroupner`Y Z"T3`!u\ DrwRRRpner`Y Z"T3`!u\ DrwRectangle`Y Z"T3`!u\ RDrwFoldedCorner`Y Z"T3`!u\ DrwOblongorner`Y Z"T3`!u\ DrwEllipserner`Y Z"T3`!u\ EDrwRoundRecter`Y Z"T3`!u\ ADrwLozengeter`Y Z"T3`!u\ LDrwLinegeter`Y Z"T3`!u\ PDrwShapeeter`Y Z"T3`!u\ FDrwTexteter`Y Z"T3`!u\ TDrwTextFielder`Y Z"T3`!u\ IDrwMetafileer`Y Z"T3`!u\ ZDrwBitmapeer`Y Z"T3`!u\ BDrwTextAttributeY Z"T3`!u\ DrwShapeFieldteY Z"T3`!u\ DrwTextLineAttributeZ"T3`!u\ PathAttributeributeZ"T3`!u\ DrwPathibuteributeZ"T3`!u\ ~DrwArraybuteributeZ"T3`!u\ DrwLanePoolHintbuteZ"T3`!u\ DrwLanePoolintbuteZ"T3`!u\ DrwSmartPolygonbuteZ"T3`!u\ DrwHintDotygonbuteZ"T3`!u\ DrwDropTargetnbuteZ"T3`!u\ DrwSatelliteConnectorZ"T3`!u\ LineShapeEndonnectorZ"T3`!u\ +R GG{`0`{ +R0`> V+Tz a&Nom&}{`0`,+P0` "[gecdek}n}qsro{~|}}}{vsqooqge{c[cXcUgUV[+P0`i "~zwtrrtz|+P0`J "zwtrstz}|qrssqk}h}ecceZXUUVZ|~+P 0`+"hrpooqvy{}}yheccdh}+T l&AppCode&}