CVS difference for arm/progs/arm_rtf.ads

Differences between 1.10 and version 1.11
Log of other versions for file arm/progs/arm_rtf.ads

--- arm/progs/arm_rtf.ads	2006/09/22 04:40:48	1.10
+++ arm/progs/arm_rtf.ads	2006/09/26 05:12:14	1.11
@@ -75,6 +75,7 @@
     --		- RLB - Added picture command.
     --  3/30/06 - RLB - Added shape id counter.
     --  9/21/06 - RLB - Added Body_Font.
+    --  9/25/06 - RLB - Added Last_Column_Width to Start_Table.
 
     type RTF_Output_Type is new ARM_Output.Output_Type with private;
 
@@ -221,13 +222,15 @@
     procedure Start_Table (Output_Object : in out RTF_Output_Type;
 			   Columns : in ARM_Output.Column_Count;
 			   First_Column_Width : in ARM_Output.Column_Count;
+			   Last_Column_Width : in ARM_Output.Column_Count;
 			   Alignment : in ARM_Output.Column_Text_Alignment;
 			   No_Page_Break : in Boolean;
 			   Has_Border : in Boolean;
 			   Small_Text_Size : in Boolean;
 			   Header_Kind : in ARM_Output.Header_Kind_Type);
 	-- Starts a table. The number of columns is Columns; the first
-	-- column has First_Column_Width times the normal column width.
+	-- column has First_Column_Width times the normal column width, and
+	-- the last column has Last_Column_Width times the normal column width.
 	-- Alignment is the horizontal text alignment within the columns.
 	-- No_Page_Break should be True to keep the table intact on a single
 	-- page; False to allow it to be split across pages.
@@ -460,6 +463,7 @@
 	Table_Indent : Natural := 0; -- The indent of the table, in twips.
 	Table_Column_Width : Natural := 0; -- The column width of the table, in twips.
 	Table_First_Column_Mult : ARM_Output.Column_Count := 1; -- The multiple of the first column.
+	Table_Last_Column_Mult : ARM_Output.Column_Count := 1; -- The multiple of the last column.
 	Table_Alignment : ARM_Output.Column_Text_Alignment := ARM_Output.Center_All;
 	Table_No_Page_Break : Boolean := False; -- Is a page break allowed in the table?
 	Table_Has_Border : Boolean := False; -- Does the table have a border?

Questions? Ask the ACAA Technical Agent