How to display the output of a program in a seperate form?

Hi Vijay,

If you are intending just to display the result, there are two options 

 1. use outfile() to write to a file and view.

 2. use Dialog boxes to display the result, ex; hiDisplayAppDBox()

Regards

Ajay

I have some code which is works as you want. First you need to save this in file and load it. And then enter TrShapeReport(cv) in CIW. Hilighted code is for printing output at form(you can write here for your output).

 cv = geGetEditCellView(  )

procedure( TrShapeReportToPort( cv outport )
let( ( rectCount polygonCount pathCount miscCount )
rectCount = polygonCount = pathCount = miscCount = 0

fprintf(
outport
"%s %s %s contains:"
cv~>libName cv~>cellName cv~>viewName
);if u write anything in printf(outport............) format then that will be printed in on output file

foreach( shape cv~>shapes
case( shape~>objType
( "rect" rectCount++ )
( "polygon" polygonCount++ )
( "path" pathCount++ )
( t miscCount++ )
) ; case
) ; foreach
fprintf( outport "\n%-10s %-10d" "Rectangles" rectCount )
fprintf( outport "\n%-10s %-10d" "Polygons" polygonCount )
fprintf( outport "\n%-10s %-10d" "Paths" pathCount )
fprintf( outport "\n%-10s %-10d" "Misc" miscCount )

;if u write anything in printf(outport............) format then that will be printed in on output file
list( cv~>libName cv~>cellName cv~>viewName )
) ; let
) ; procedure

;below procedure is used for showing the form

TrReportBBox = ’((120 729) (372 876))
procedure( TrShapeReport( cv )
thePort = outfile( "/tmp/ShapeReport.txt" )
when( thePort
TrShapeReportToPort( cv thePort )
close( thePort )
) ; when
view( "/tmp/ShapeReport.txt" TrReportBBox "Shape Report" )
) ; procedure

I hope this will help you.

Thank you

 Thanks a lot Ajay,Sarvan.