diff --git a/PROMS/VEPROMS User Interface/frmPSI.cs b/PROMS/VEPROMS User Interface/frmPSI.cs
index 3d4363a7..e8fcb14d 100644
--- a/PROMS/VEPROMS User Interface/frmPSI.cs	
+++ b/PROMS/VEPROMS User Interface/frmPSI.cs	
@@ -51,7 +51,7 @@ namespace VEPROMS
 				if (fld.type.ToLower() == "text")
 				{
 					StepRTB tb = new StepRTB();
-					tb.Font = new Font("Arial", tb.Font.Size);
+					tb.Font = tb.FormatFont = new Font("Arial", 8);
 					string mystr = tb.FontTable;
 					_DicStepRtb.Add(fld.name, tb);
 					tb.MyItemInfo = pi as ItemInfo;
diff --git a/PROMS/VEPROMS User Interface/frmProcedureProperties.cs b/PROMS/VEPROMS User Interface/frmProcedureProperties.cs
index 02d62c9e..66ffb711 100644
--- a/PROMS/VEPROMS User Interface/frmProcedureProperties.cs	
+++ b/PROMS/VEPROMS User Interface/frmProcedureProperties.cs	
@@ -41,10 +41,12 @@ namespace VEPROMS
 			//this.Text = string.Format("{0}  {1} Properties", procedureConfig.Number, procedureConfig.Title);
 			ItemInfo itmInfo = ItemInfo.Get(_ProcedureConfig.MyProcedure.ItemID);
 			this.Text = string.Format("{0}  {1} Properties", itmInfo.DisplayNumber, itmInfo.DisplayText);
+			ppProcTitleStpRTB.Font = ppProcTitleStpRTB.FormatFont = new System.Drawing.Font("Microsoft Sans Serif", 10F);
 			ppProcTitleStpRTB.FieldToEdit = E_FieldToEdit.Text;
 			ppProcTitleStpRTB.BorderStyle = BorderStyle.Fixed3D;
 			ppProcTitleStpRTB.MyItemInfo = itmInfo;
 			ppProcTitleStpRTB.RefreshDisplay(true);
+			ppProcNumStpRTB.Font = ppProcNumStpRTB.FormatFont = new System.Drawing.Font("Microsoft Sans Serif", 10F);
 			ppProcNumStpRTB.FieldToEdit = E_FieldToEdit.Number;
 			ppProcNumStpRTB.BorderStyle = BorderStyle.Fixed3D;
 			ppProcNumStpRTB.MyItemInfo = itmInfo;