This commit is contained in:
Rich
868
PROMS/VEPROMS/PrintMSWord/frmAnalyze.cs
Normal file
868
PROMS/VEPROMS/PrintMSWord/frmAnalyze.cs
Normal file
@@ -0,0 +1,868 @@
|
||||
using System;
|
||||
using System.Collections.Generic;
|
||||
using System.ComponentModel;
|
||||
using System.Data;
|
||||
using System.Drawing;
|
||||
using System.Drawing.Imaging;
|
||||
using System.Text;
|
||||
using System.Windows.Forms;
|
||||
using System.IO;
|
||||
using VEPROMS.CSLA.Library;
|
||||
using System.Text.RegularExpressions;
|
||||
using LBWordLibrary;
|
||||
using Volian.Controls.Library;
|
||||
using Volian.Svg.Library;
|
||||
|
||||
namespace PrintMSWord
|
||||
{
|
||||
public partial class frmAnalyze : Form
|
||||
{
|
||||
public string MyStatus
|
||||
{
|
||||
get { return tsslStatus.Text; }
|
||||
set { tsslStatus.Text = value; Application.DoEvents(); }
|
||||
}
|
||||
private PDFMethod _MyPDFMethod = PDFMethod.ToPDF;
|
||||
internal PDFMethod MyPDFMethod
|
||||
{
|
||||
get { return _MyPDFMethod; }
|
||||
set
|
||||
{
|
||||
_MyPDFMethod = value;
|
||||
// Adjust Checked Status
|
||||
toPDFToolStripMenuItem.Checked = _MyPDFMethod == PDFMethod.ToPDF;
|
||||
toPDF2003BGToolStripMenuItem.Checked = _MyPDFMethod == PDFMethod.ToPDF2003BG;
|
||||
toPDF2003FGToolStripMenuItem.Checked = _MyPDFMethod == PDFMethod.ToPDF2003FG;
|
||||
toPDF2007ToolStripMenuItem.Checked = _MyPDFMethod == PDFMethod.toPDF2007;
|
||||
}
|
||||
}
|
||||
public frmAnalyze()
|
||||
{
|
||||
InitializeComponent();
|
||||
}
|
||||
private LBApplicationClass _MyApp = null;
|
||||
public LBApplicationClass MyApp
|
||||
{
|
||||
get
|
||||
{
|
||||
if (_MyApp == null)
|
||||
_MyApp = new LBApplicationClass();
|
||||
return _MyApp;
|
||||
}
|
||||
}
|
||||
private frmInfo _MyInfo = null;
|
||||
public frmInfo MyInfo
|
||||
{
|
||||
get
|
||||
{
|
||||
if (_MyInfo == null)
|
||||
{
|
||||
_MyInfo = new frmInfo(this);
|
||||
_MyInfo.FormClosed += new FormClosedEventHandler(_MyInfo_FormClosed);
|
||||
}
|
||||
return _MyInfo;
|
||||
}
|
||||
}
|
||||
private void _MyInfo_FormClosed(object sender, FormClosedEventArgs e)
|
||||
{
|
||||
_MyInfo = null;
|
||||
}
|
||||
public void AddInfo(string info, params object [] objs)
|
||||
{
|
||||
MyInfo.AddInfo(string.Format(info,objs));
|
||||
}
|
||||
public void AddInfo(string info)
|
||||
{
|
||||
MyInfo.AddInfo(info);
|
||||
}
|
||||
public void ClearInfo()
|
||||
{
|
||||
MyInfo.Clear();
|
||||
}
|
||||
void exitToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
this.Close();
|
||||
}
|
||||
private System.Diagnostics.Process [] WordProcesses
|
||||
{
|
||||
get
|
||||
{
|
||||
return System.Diagnostics.Process.GetProcessesByName("WINWORD");
|
||||
}
|
||||
}
|
||||
private void frmPrintMsWord_Load(object sender, EventArgs e)
|
||||
{
|
||||
CleanupMSWordProcesses();
|
||||
lbDocVersion.DataSource = DocVersionInfoList.Get();
|
||||
toPDFToolStripMenuItem.Tag = PDFMethod.ToPDF;
|
||||
toPDF2003BGToolStripMenuItem.Tag = PDFMethod.ToPDF2003BG;
|
||||
toPDF2003FGToolStripMenuItem.Tag = PDFMethod.ToPDF2003FG;
|
||||
toPDF2007ToolStripMenuItem.Tag = PDFMethod.toPDF2007;
|
||||
FileInfo xmlFile = new FileInfo("Proms2010Print.xml");
|
||||
if(xmlFile.Exists)
|
||||
_MyProms2010Print = SvgSerializer<Proms2010Print>.ReadFile(xmlFile.FullName);
|
||||
}
|
||||
private void CleanupMSWordProcesses()
|
||||
{
|
||||
System.Diagnostics.Process[] wordProcesses = WordProcesses;
|
||||
if (wordProcesses.Length > 0)
|
||||
{
|
||||
AddInfo("{0} copies of MS Word are running", wordProcesses.Length);
|
||||
if (MessageBox.Show("MS Word is Running and must be stopped", "MS Word is Running", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
|
||||
{
|
||||
TerminateProcesses(wordProcesses);
|
||||
ClearInfo();
|
||||
}
|
||||
}
|
||||
}
|
||||
private void TerminateProcesses(System.Diagnostics.Process[] wordProcesses)
|
||||
{
|
||||
foreach (System.Diagnostics.Process proc in wordProcesses)
|
||||
proc.Kill();
|
||||
}
|
||||
private void lbDocVersion_SelectedValueChanged(object sender, EventArgs e)
|
||||
{
|
||||
lbProcedure.DataSource = MyDocVersion.Procedures;
|
||||
}
|
||||
private void lbProcedure_SelectedValueChanged(object sender, EventArgs e)
|
||||
{
|
||||
lbSections.DataSource = MyProcedure.Sections;
|
||||
countToolStripMenuItem.Enabled = listSectionsToolStripMenuItem.Enabled = convertToPDFToolStripMenuItem.Enabled =
|
||||
countROsToolStripMenuItem.Enabled = convertToPDFwithROsToolStripMenuItem.Enabled = MyProcedure.Sections != null;
|
||||
}
|
||||
private void countToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
ShowSectionCounts(MyProcedure);
|
||||
}
|
||||
private void ShowSectionCounts(ProcedureInfo procInfo)
|
||||
{
|
||||
int total = 0;
|
||||
int totalLibraryDocs = 0;
|
||||
// for each section in the active procedure
|
||||
foreach (SectionInfo sect in procInfo.Sections)
|
||||
{
|
||||
// check to see if it contains a Word Document
|
||||
if (sect.MyContent.ContentEntryCount > 0)
|
||||
{
|
||||
total++;
|
||||
if (sect.MyContent.MyEntry.MyDocument.LibTitle != "")
|
||||
totalLibraryDocs++;
|
||||
}
|
||||
}
|
||||
AddInfo("Procedure {0} contains {1} MS Word Sections, and {2} Library Documents.", MyProcedure.DisplayNumber, total, totalLibraryDocs);
|
||||
}
|
||||
private void listSectionsToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
ListSections(MyProcedure);
|
||||
}
|
||||
|
||||
private void ListSections(ProcedureInfo procInfo)
|
||||
{
|
||||
int total = 0;
|
||||
// for each section in the active procedure
|
||||
AddInfo("Procedure {0}:", procInfo.DisplayNumber);
|
||||
foreach (SectionInfo sect in procInfo.Sections)
|
||||
{
|
||||
// check to see if it contains a Word Document
|
||||
if (sect.MyContent.ContentEntryCount > 0)
|
||||
{
|
||||
total++;
|
||||
AddInfo("\t section {0} - {1}", sect.DisplayNumber, sect.DisplayText);
|
||||
}
|
||||
}
|
||||
AddInfo("Procedure {0} contains {1} MS Word Sections.", procInfo.DisplayNumber, total);
|
||||
}
|
||||
|
||||
private void convertToPDFToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
// for each section in the active procedure
|
||||
AddInfo("Procedure {0}:", MyProcedure.DisplayNumber);
|
||||
int i = 0;
|
||||
foreach (SectionInfo sect in MyProcedure.Sections)
|
||||
{
|
||||
// check to see if it contains a Word Document
|
||||
if (sect.MyContent.ContentEntryCount > 0)
|
||||
{
|
||||
AddInfo("\t section {0} - {1}", sect.DisplayNumber, sect.DisplayText);
|
||||
using (DSOFile myFile = new DSOFile(sect.MyContent.MyEntry.MyDocument))
|
||||
{
|
||||
MyApp.Documents.Open(myFile.FullName);
|
||||
string fileName = string.Format("{0:00} ", ++i) + (sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber);
|
||||
CreatePDF(fileName,true);
|
||||
MyApp.ActiveDocument.Close();
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
private string CreatePDF(string fileName, bool openPdf)
|
||||
{
|
||||
string pdfFileName = null;
|
||||
switch (MyPDFMethod)
|
||||
{
|
||||
case PDFMethod.ToPDF:
|
||||
pdfFileName = MyApp.CreatePDF(@"C:\Temp\" + fileName + ".pdf", openPdf);
|
||||
break;
|
||||
case PDFMethod.ToPDF2003BG:
|
||||
pdfFileName = MyApp.CreatePDF2003BG(@"C:\Temp\" + fileName + ".pdf", openPdf);
|
||||
break;
|
||||
case PDFMethod.ToPDF2003FG:
|
||||
pdfFileName = MyApp.CreatePDF2003FG(@"C:\Temp\" + fileName + ".pdf", openPdf);
|
||||
break;
|
||||
case PDFMethod.toPDF2007:
|
||||
pdfFileName = MyApp.CreatePDF2007(@"C:\Temp\" + fileName + ".pdf", openPdf);
|
||||
break;
|
||||
}
|
||||
_PDFFiles.Add(pdfFileName);
|
||||
return pdfFileName;
|
||||
}
|
||||
private void countROsToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
// for each section in the active procedure
|
||||
AddInfo("Procedure {0}:", MyProcedure.DisplayNumber);
|
||||
int i = 0;
|
||||
foreach (SectionInfo sect in MyProcedure.Sections)
|
||||
{
|
||||
// check to see if it contains a Word Document
|
||||
if (sect.MyContent.ContentEntryCount > 0)
|
||||
{
|
||||
AddInfo("\t section {0} - {1} - {2} ROs", sect.DisplayNumber, sect.DisplayText, ROCount(sect) );
|
||||
}
|
||||
}
|
||||
}
|
||||
private int ROCount(SectionInfo sect)
|
||||
{
|
||||
string searchText = sect.MyContent.MyEntry.MyDocument.DocAscii;
|
||||
MatchCollection matches = Regex.Matches(searchText, @"\<[^>]*\>");
|
||||
return matches.Count;
|
||||
}
|
||||
private void pDFToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
using (DSOFile myFile = new DSOFile(MySection.MyContent.MyEntry.MyDocument))
|
||||
{
|
||||
MyApp.Documents.Open(myFile.FullName);
|
||||
string fileName = MySection.DisplayNumber == "" ? MySection.DisplayText : MySection.DisplayNumber;
|
||||
CreatePDF(fileName,true);
|
||||
MyApp.ActiveDocument.Close();
|
||||
}
|
||||
}
|
||||
private void listROsToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
ListROs(MySection);
|
||||
}
|
||||
private void ListROs(SectionInfo sect)
|
||||
{
|
||||
string searchText = sect.MyContent.MyEntry.MyDocument.DocAscii;
|
||||
ProcedureInfo proc = sect.ActiveParent as ProcedureInfo;
|
||||
MatchCollection matches = Regex.Matches(searchText, @"\<[^>]*\>");
|
||||
AddInfo("{0}:{1} contains {2} ROs", proc.DisplayNumber, (sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber), matches.Count);
|
||||
foreach (Match match in matches)
|
||||
AddInfo("RO - '{0}'", match.Value);
|
||||
}
|
||||
private void findROsToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
ToPDFReplaceROs(MySection, true);
|
||||
}
|
||||
private string ToPDFReplaceROs(SectionInfo sect, bool openPdf)
|
||||
{
|
||||
int docStyleIndex = ((int)sect.MyContent.Type) % 10000;
|
||||
DocStyle myDocStyle = sect.ActiveFormat.PlantFormat.DocStyles.DocStyleList[docStyleIndex];
|
||||
PageStyle myPageStyle = myDocStyle.pagestyle;
|
||||
ProcedureInfo proc = sect.ActiveParent as ProcedureInfo;
|
||||
DocVersionInfo dvi = proc.ActiveParent as DocVersionInfo;
|
||||
ROFstInfo rofst = dvi.DocVersionAssociations[0].MyROFst;
|
||||
ROFSTLookup lookup = rofst.ROFSTLookup;
|
||||
string igPrefix = dvi.DocVersionConfig.RODefaults_graphicsprefix;
|
||||
string spPrefix = dvi.DocVersionConfig.RODefaults_setpointprefix;
|
||||
// string AccPageID = string.Format("<{0}-{1}>", accPrefix, roch.appid);
|
||||
|
||||
//AddInfo("{0}:{1}", proc.DisplayNumber, (sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber));
|
||||
using (DSOFile myFile = new DSOFile(sect.MyContent.MyEntry.MyDocument))
|
||||
{
|
||||
LBDocumentClass myDoc = MyApp.Documents.Open(myFile.FullName);
|
||||
float newTop = (float)myDocStyle.Layout.TopRow;
|
||||
float newLeft = (float)myDocStyle.Layout.LeftMargin;
|
||||
float newLength = (float)myDocStyle.Layout.PageLength;
|
||||
float newWidth = (float)myDocStyle.Layout.PageWidth;
|
||||
float oldTop = myDoc.PageSetup.TopMargin;
|
||||
float oldLeft = myDoc.PageSetup.LeftMargin;
|
||||
float oldBottom = myDoc.PageSetup.BottomMargin;
|
||||
float oldRight = myDoc.PageSetup.RightMargin;
|
||||
float oldHeight = myDoc.PageSetup.PageHeight;
|
||||
float oldWidth = myDoc.PageSetup.PageWidth;
|
||||
float newRight = oldWidth - (newWidth + newLeft);
|
||||
if (newRight < 0) newRight = 0;
|
||||
float newBottom = oldBottom - newTop;
|
||||
//Console.WriteLine("{0},{1},{2},{3},{4},{5},{6},{7},{8},{9}", newTop, newLeft, newLength, newWidth, oldTop, oldLeft, oldBottom, oldRight,oldHeight,oldWidth);
|
||||
myDoc.PageSetup.BottomMargin = 0;// 11 * 72 - (newTop + newLength);
|
||||
myDoc.PageSetup.RightMargin = newRight;
|
||||
myDoc.PageSetup.LeftMargin = newLeft;
|
||||
myDoc.PageSetup.TopMargin = newTop;
|
||||
LBSelection sel = FindRO();
|
||||
while (sel != null)
|
||||
{
|
||||
string val = lookup.GetROValueByAccPagID(sel.Text, spPrefix, igPrefix);
|
||||
int? type = lookup.GetROTypeByAccPagID(sel.Text, spPrefix, igPrefix);
|
||||
if ((int)type == 8) // Image
|
||||
{
|
||||
//Console.WriteLine("Image: {0} - {1}", sect.MyContent.Number, sect.MyContent.Text);
|
||||
bool imageROTokenReplaced = false;
|
||||
string [] vals = val.Split("\n".ToCharArray());
|
||||
ROImageInfo roImage = ROImageInfo.GetByROFstID_FileName(rofst.ROFstID, vals[0]);
|
||||
if (roImage != null)
|
||||
{
|
||||
ROImageFile roImageFile = new ROImageFile(roImage);
|
||||
float width = 72 * Int32.Parse(vals[3], System.Globalization.NumberStyles.AllowHexSpecifier) / 12.0F;
|
||||
int lines = Int32.Parse(vals[2], System.Globalization.NumberStyles.AllowHexSpecifier);
|
||||
float height = 72 * lines / 6.0F;
|
||||
//sel.MoveEnd(LBWdUnits.wdLine, lines);// The number of lines depends on the third parameter
|
||||
//sel.EndKey(LBWdUnits.wdLine, true);
|
||||
//sel.MoveEnd(LBWdUnits.wdCharacter, -1);
|
||||
//Console.WriteLine("Lines = {0}", lines);
|
||||
sel.Text = "";
|
||||
// TODO: Need to create a temporary file for printing.
|
||||
// TODO: Need a way to eliminate the temporary file when done printing.
|
||||
// LBInlineShape shape = sel.InlineShapes.AddPicture(@"C:\Plant\HLP\VEHLP\ro\No1Seal.bmp");
|
||||
float x = (float)sel.get_Information(LBWdInformation.wdHorizontalPositionRelativeToPage);
|
||||
float y = (float)sel.get_Information(LBWdInformation.wdVerticalPositionRelativeToPage);
|
||||
//LBInlineShape shape = sel.InlineShapes.AddPicture(pngFile);
|
||||
LBRange myRange = sel.Paragraphs.First.Range;
|
||||
float yTop = (float)myRange.get_Information(LBWdInformation.wdVerticalPositionRelativeToPage);
|
||||
LBShape shape = myDoc.Shapes.AddPicture(roImageFile.MyFile.FullName, x, y - yTop, sel.Range);
|
||||
// LBInlineShape shape = sel.InlineShapes.AddPicture(roImageFile.MyFile.FullName);
|
||||
//Console.WriteLine("{0} Shape Width {1} Height {2}", val.Replace("\n", "','"), shape.Width, shape.Height);
|
||||
shape.Width = width;
|
||||
shape.Height = height;
|
||||
//Console.WriteLine("{0} Shape Width {1} Height {2}", val.Replace("\n", "','"), shape.Width, shape.Height);
|
||||
imageROTokenReplaced = true;
|
||||
}
|
||||
if(!imageROTokenReplaced)
|
||||
sel.Text = string.Format("Bad Image Link (Missing Image File:{0})",vals[0]);
|
||||
}
|
||||
else if ((int)type == 4) // X-Y Plot
|
||||
{
|
||||
val = val.Replace("`", "\xB0");
|
||||
//AddInfo("\tRO Found {0} = '{1}'", sel.Text, val);
|
||||
sel.Text = "";
|
||||
//float width = 72 * Int32.Parse(vals[3], System.Globalization.NumberStyles.AllowHexSpecifier) / 12.0F;
|
||||
//float height = 72 * lines / 6.0F;
|
||||
string pngFile = @"C:\Temp\XYPlot1.png";
|
||||
RectangleF plotRect = CreatePlot(pngFile, val, 600F);
|
||||
//LBShape shape = myDoc.Shapes.AddPicture(@"C:\Temp\XYPlot.png", 0, 0, sel.Range);
|
||||
float x = (float) sel.get_Information(LBWdInformation.wdHorizontalPositionRelativeToPage);
|
||||
float y = (float) sel.get_Information(LBWdInformation.wdVerticalPositionRelativeToPage);
|
||||
//LBInlineShape shape = sel.InlineShapes.AddPicture(pngFile);
|
||||
LBRange myRange = sel.Paragraphs.First.Range;
|
||||
float yTop = (float)myRange.get_Information(LBWdInformation.wdVerticalPositionRelativeToPage);
|
||||
float xAdjust = float.Parse(tbAdjustX.Text);
|
||||
float yAdjust = float.Parse(tbAdjustY.Text);
|
||||
LBShape shape = myDoc.Shapes.AddPicture(pngFile, x + xAdjust + plotRect.X, yAdjust + y - yTop + plotRect.Y, sel.Range);
|
||||
//Console.WriteLine(",{0},{1},{2},{3}", x, y - yTop, xAdjust,yAdjust);
|
||||
shape.LockAspectRatio = LBMsoTriState.msoTrue;
|
||||
//shape.Width = .89F * shape.Width;
|
||||
//shape.Width = float.Parse(tbAdjust.Text) * shape.Width;
|
||||
shape.Width = plotRect.Width;
|
||||
//shape.Height = .89F * shape.Height;
|
||||
sel.WholeStory();
|
||||
sel.Range.Font.Color = LBWdColor.wdColorRed;
|
||||
//Console.WriteLine("{0} Shape Width {1} Height {2}", val.Replace("\n", "','"), shape.Width, shape.Height);
|
||||
//shape.Width = width;
|
||||
//shape.Height = height;
|
||||
//Console.WriteLine("{0} Shape Width {1} Height {2}", val.Replace("\n", "','"), shape.Width, shape.Height);
|
||||
//imageROTokenReplaced = true;
|
||||
}
|
||||
else
|
||||
{
|
||||
val = val.Replace("`", "\xB0");
|
||||
AddInfo("\tRO Found {0} = '{1}'", sel.Text, val);
|
||||
InsertROValue(sel, val, sect.ActiveFormat.PlantFormat.FormatData.ROData.UpRoIfPrevUpper);
|
||||
}
|
||||
sel = FindRO();
|
||||
}
|
||||
sel = MyApp.Selection;
|
||||
sel.WholeStory();
|
||||
sel.Range.Font.Color = LBWdColor.wdColorRed;
|
||||
sel.ParagraphFormat.LineSpacingRule = LBWdLineSpacing.wdLineSpaceExactly;
|
||||
sel.ParagraphFormat.LineSpacing = 12;
|
||||
//Console.WriteLine("{0},{1}", sel.ParagraphFormat.LineSpacing, sel.ParagraphFormat.LineSpacingRule);
|
||||
string fileName = sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber;
|
||||
//MyApp.Visible = true;
|
||||
//MessageBox.Show("Ready to make PDF");
|
||||
//MyApp.Visible = false;
|
||||
fileName=CreatePDF(fileName, openPdf);
|
||||
//MyApp.Visible = true;
|
||||
MyApp.ActiveDocument.Close();
|
||||
MyApp.Quit();
|
||||
_MyApp = null;
|
||||
return fileName;
|
||||
}
|
||||
}
|
||||
private RectangleF CreatePlot(string pngFile, string xyPlot, float resolution)
|
||||
{
|
||||
RectangleF retval = new RectangleF(0, 0, 0, 0);
|
||||
Graphics grfx = this.CreateGraphics();
|
||||
string emfFile = pngFile.Replace(".png", ".emf");
|
||||
Metafile mf = new Metafile(emfFile, grfx.GetHdc());
|
||||
grfx.Dispose();
|
||||
grfx = Graphics.FromImage(mf);
|
||||
float dpi = grfx.DpiX;
|
||||
//grfx.ScaleTransform(resolution / grfx.DpiX, (resolution +1F) / grfx.DpiY);
|
||||
grfx.ScaleTransform(resolution / grfx.DpiX, resolution / grfx.DpiY);
|
||||
grfx.InterpolationMode = System.Drawing.Drawing2D.InterpolationMode.NearestNeighbor;
|
||||
grfx.SmoothingMode = System.Drawing.Drawing2D.SmoothingMode.HighQuality;
|
||||
grfx.TextRenderingHint = System.Drawing.Text.TextRenderingHint.AntiAlias;
|
||||
grfx.Clear(Color.Transparent);
|
||||
XYPlots.XYPlot.BlackColor = Color.Red;
|
||||
XYPlots.XYPlot myPlot = new XYPlots.XYPlot(xyPlot);
|
||||
myPlot.SetMargins(0, 0, 0, 0);
|
||||
myPlot.Process(new VG.VGOut_Graphics(grfx));
|
||||
grfx.Dispose();
|
||||
GraphicsUnit gu = new GraphicsUnit();
|
||||
retval = mf.GetBounds(ref gu);
|
||||
retval.Width *= dpi / resolution;
|
||||
retval.Height *= dpi / resolution;
|
||||
retval.X *= dpi / resolution;
|
||||
retval.Y *= dpi / resolution;
|
||||
//retval.X = myPlot.Width-retval.Width;
|
||||
AddInfo("{0},{1},{2},{3},{4},{5}", myPlot.Width, myPlot.Height, retval.Width, retval.Height,retval.X,retval.Y);
|
||||
//Console.Write("{0},{1},{2},{3}", myPlot.Width, myPlot.Height, retval.Width, retval.Height);
|
||||
mf.Save(pngFile, ImageFormat.Png);
|
||||
//Console.WriteLine("'pngfile','{0}'", pngFile);
|
||||
mf.Dispose();
|
||||
FileInfo myFile = new System.IO.FileInfo(emfFile);
|
||||
myFile.Delete();
|
||||
return retval;
|
||||
}
|
||||
private static void InsertROValue(LBSelection sel, string roValue, bool upRoIfPrevUpper)
|
||||
{
|
||||
if (roValue == null)
|
||||
{
|
||||
sel.Text = "RO Not Found";
|
||||
sel.Font.Color = LBWdColor.wdColorRed;
|
||||
}
|
||||
else
|
||||
{
|
||||
if (upRoIfPrevUpper && sel.LastWasUpper) roValue = roValue.ToUpper();
|
||||
// Convert fortran formatted numbers to scientific notation.
|
||||
|
||||
string tmp = DisplayRO.ConvertFortranFormatToScienctificNotation(roValue);
|
||||
// Look for superscript or subscript and insert the appropriate commands
|
||||
Match roMatch = Regex.Match(tmp, @"(.*?)\\(super|sub) (.*?)\\nosupersub ");
|
||||
if (roMatch.Groups.Count == 4)// Superscript or subscript found
|
||||
{
|
||||
sel.Font.Color = LBWdColor.wdColorRed;
|
||||
while (roMatch.Groups.Count == 4)
|
||||
{
|
||||
sel.TypeText(roMatch.Groups[1].Value); // output the text preceeding the super or sub command
|
||||
sel.Font.Position = roMatch.Groups[2].Value=="super" ? 2 : -2; // Shift the vertical position for super or sub
|
||||
sel.TypeText(roMatch.Groups[3].Value); // output the superscript or subscript
|
||||
sel.Font.Position = 0; // restore the vertical position
|
||||
tmp = tmp.Substring(roMatch.Length); // remove the processed text
|
||||
roMatch = Regex.Match(tmp, @"(.*?)\\(super|sub) (.*?)\\nosupersub "); // check to see if the text contain another super or sub
|
||||
}
|
||||
if(tmp != "")// Add any remaining text
|
||||
sel.TypeText(tmp);
|
||||
sel.Font.Color = LBWdColor.wdColorAutomatic;
|
||||
}
|
||||
else // if no superscripts or subscripts just output the text
|
||||
{
|
||||
sel.Text = roValue;
|
||||
sel.Font.Color = LBWdColor.wdColorRed;
|
||||
}
|
||||
}
|
||||
}
|
||||
private LBSelection FindRO()
|
||||
{
|
||||
LBSelection sel = MyApp.Selection;
|
||||
LBFind find = sel.Find;
|
||||
find.ClearFormatting();
|
||||
find.Text = "[<](?@)-(?@)[>]";
|
||||
//find.Wrap = LBWdFindWrap.wdFindStop;
|
||||
find.Wrap = LBWdFindWrap.wdFindContinue;
|
||||
find.MatchCase = false;
|
||||
find.MatchWholeWord = false;
|
||||
find.MatchWildcards = true;
|
||||
find.MatchSoundsLike = false;
|
||||
find.MatchAllWordForms = false;
|
||||
if (find.Execute()) return sel;
|
||||
return null;
|
||||
}
|
||||
private void frmPrintMsWord_FormClosing(object sender, FormClosingEventArgs e)
|
||||
{
|
||||
if (MyApp != null)
|
||||
_MyApp.Quit();
|
||||
//Console.WriteLine("Closing --- {0}", e.CloseReason);
|
||||
LBApplicationClass.ClosePDFs();
|
||||
RemovePDFFiles();
|
||||
}
|
||||
private void convertToPDFwithROsToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
// for each section in the active procedure
|
||||
AddInfo("Procedure {0}:", MyProcedure.DisplayNumber);
|
||||
int i = 0;
|
||||
if (MyProcedure.Sections == null)
|
||||
{
|
||||
AddInfo(" No Sections", MyProcedure.DisplayNumber);
|
||||
MessageBox.Show("No Sections");
|
||||
return;
|
||||
}
|
||||
foreach (SectionInfo sect in MyProcedure.Sections)
|
||||
{
|
||||
// check to see if it contains a Word Document
|
||||
if (sect.MyContent.ContentEntryCount > 0)
|
||||
{
|
||||
ToPDFReplaceROs(sect,true);
|
||||
AddInfo("\t section {0} - {1} - {2} ROs", sect.DisplayNumber, sect.DisplayText, ROCount(sect));
|
||||
}
|
||||
}
|
||||
}
|
||||
private void closeAcrobatToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
LBApplicationClass.ClosePDFs();
|
||||
}
|
||||
List<string> _PDFFiles = new List<string>();
|
||||
private void removePDFsToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
RemovePDFFiles();
|
||||
}
|
||||
|
||||
private void RemovePDFFiles()
|
||||
{
|
||||
Application.DoEvents();
|
||||
while (_PDFFiles.Count > 0)
|
||||
{
|
||||
string fileName = _PDFFiles[0];
|
||||
//Console.WriteLine("Start==={0:s.ffff}==========={1}", DateTime.Now, fileName);
|
||||
System.IO.FileInfo fi = new System.IO.FileInfo(fileName);
|
||||
try
|
||||
{
|
||||
fi.Delete();
|
||||
_PDFFiles.Remove(fileName);
|
||||
}
|
||||
catch (Exception ex)
|
||||
{
|
||||
AddInfo("Error==={0:s.ffff}==========>{1} - {2}", DateTime.Now, ex.GetType().Name, ex.Message);
|
||||
Application.DoEvents();
|
||||
}
|
||||
}
|
||||
}
|
||||
private void toPDFMethodToggle_Click(object sender, EventArgs e)
|
||||
{
|
||||
ToolStripMenuItem mi = sender as ToolStripMenuItem;
|
||||
MyPDFMethod = (PDFMethod)mi.Tag;
|
||||
}
|
||||
private void rOTypesToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
}
|
||||
private void FindROTypes(ProcedureInfo proc, Dictionary<int, int> roTypes, ROFSTLookup lookup, string igPrefix, string spPrefix)
|
||||
{
|
||||
foreach (SectionInfo sect in proc.Sections)
|
||||
{
|
||||
if (sect.MyContent.ContentEntryCount == 1)
|
||||
{
|
||||
MyStatus = string.Format("{0}:{1}", proc.DisplayNumber, sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber);
|
||||
FindROTypes(proc, sect, roTypes, lookup, igPrefix, spPrefix);
|
||||
}
|
||||
}
|
||||
}
|
||||
private void FindROTypes(ProcedureInfo proc, SectionInfo sect, Dictionary<int, int> roTypes, ROFSTLookup lookup, string igPrefix, string spPrefix)
|
||||
{
|
||||
string searchText = sect.MyContent.MyEntry.MyDocument.DocAscii;
|
||||
MatchCollection matches = Regex.Matches(searchText, @"\<[^>]*\>");
|
||||
foreach (Match match in matches)
|
||||
{
|
||||
int? roType = lookup.GetROTypeByAccPagID(match.Value.Replace(" ",""), spPrefix, igPrefix);
|
||||
if (roType != null)
|
||||
{
|
||||
if (roTypes.ContainsKey((int)roType))
|
||||
{
|
||||
roTypes[(int)roType]++;
|
||||
if (roType == 8)
|
||||
{
|
||||
AddInfo("{0}:{1}", proc.DisplayNumber, sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber);
|
||||
AddInfo("{0} Type '{1}' '{2}'\r\n", match.Value.Replace(" ", ""), roType,
|
||||
lookup.GetROValueByAccPagID(match.Value.Replace(" ", ""), spPrefix, igPrefix).Replace("\n","','"));
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
roTypes.Add((int)roType, 1);
|
||||
AddInfo("{0}:{1}", proc.DisplayNumber, sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber);
|
||||
AddInfo("{0} Type {1} \r\nValue '{2}'\r\n", match.Value.Replace(" ", ""), roType, lookup.GetROValueByAccPagID(match.Value.Replace(" ", ""), spPrefix, igPrefix));
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
AddInfo("{0}:{1} - {2}", proc.DisplayNumber, sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber, match.Value);
|
||||
}
|
||||
}
|
||||
}
|
||||
private void getAllPlotsToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
if (MyDocVersion.DocVersionAssociationCount <= 0)
|
||||
{
|
||||
MessageBox.Show("No RO data associations!", "No RO data", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
|
||||
return;
|
||||
}
|
||||
ROFstInfo rofst = MyDocVersion.DocVersionAssociations[0].MyROFst;
|
||||
ROFSTLookup lookup = rofst.ROFSTLookup;
|
||||
List<ROFSTLookup.rochild> plots = lookup.GetRoChildrenByType(4);
|
||||
foreach (ROFSTLookup.rochild plot in plots)
|
||||
AddInfo("plots.Add(\"{0}\",\"{1}\");", plot.appid, ToCode(plot.value ?? "No Plot"));
|
||||
}
|
||||
private string ToCode(string text)
|
||||
{
|
||||
|
||||
string retval = text.Replace("\"","\\\"");
|
||||
retval = retval.Replace("\r\n", "\\r\\n\" +\r\n\t\"");
|
||||
return retval;
|
||||
}
|
||||
private void getAllFortranNumbersToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
if (MyDocVersion.DocVersionAssociationCount <= 0)
|
||||
{
|
||||
MessageBox.Show("No RO data associations!", "No RO data", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
|
||||
return;
|
||||
}
|
||||
ROFstInfo rofst = MyDocVersion.DocVersionAssociations[0].MyROFst;
|
||||
ROFSTLookup lookup = rofst.ROFSTLookup;
|
||||
List<ROFSTLookup.rochild> roValues = lookup.GetRoChildrenByType(1);
|
||||
foreach (ROFSTLookup.rochild roValue in roValues)
|
||||
if(Regex.IsMatch(roValue.value,".*[0-9.]E[-+0-9].*"))
|
||||
AddInfo("_Numbers.Add(new FortranNumber(\"{0}\"));", roValue.value);
|
||||
}
|
||||
private void getAllImagesToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
if (MyDocVersion.DocVersionAssociationCount <= 0)
|
||||
{
|
||||
MessageBox.Show("No RO data associations!", "No RO data", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
|
||||
return;
|
||||
}
|
||||
ROFstInfo rofst = MyDocVersion.DocVersionAssociations[0].MyROFst;
|
||||
ROFSTLookup lookup = rofst.ROFSTLookup;
|
||||
List<ROFSTLookup.rochild> plots = lookup.GetRoChildrenByType(8);
|
||||
foreach (ROFSTLookup.rochild plot in plots)
|
||||
AddInfo("plots.Add(\"{0}\",\"{1}\");", plot.roid, plot.appid);
|
||||
|
||||
}
|
||||
private void determineLengthToolStripMenuItem1_Click(object sender, EventArgs e)
|
||||
{
|
||||
AddInfo("Length of {0} = {1}", MySection.MyContent.Number ?? MySection.MyContent.Text, DetermineLength(MySection));
|
||||
MyApp.Quit();
|
||||
_MyApp = null;
|
||||
}
|
||||
private float DetermineLength(SectionInfo sect)
|
||||
{
|
||||
float retval=0;
|
||||
using (DSOFile myFile = new DSOFile(sect.MyContent.MyEntry.MyDocument))
|
||||
{
|
||||
LBDocumentClass myDoc = MyApp.Documents.Open(myFile.FullName);
|
||||
retval = myDoc.Length;
|
||||
myDoc.Close();
|
||||
}
|
||||
//MyApp.Quit();
|
||||
//_MyApp = null;
|
||||
return retval;
|
||||
}
|
||||
private void determineLengthToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
AddInfo("{0}:", MyProcedure.DisplayNumber);
|
||||
int i = 0;
|
||||
if (MyProcedure.Sections == null)
|
||||
{
|
||||
AddInfo(" No Sections", MyProcedure.DisplayNumber);
|
||||
return;
|
||||
}
|
||||
foreach (SectionInfo sect in MyProcedure.Sections)
|
||||
{
|
||||
// check to see if it contains a Word Document
|
||||
if (sect.MyContent.ContentEntryCount > 0)
|
||||
{
|
||||
AddInfo("\t{0:00.00} pages - {1} - {2} ", DetermineLength(sect), sect.DisplayNumber, sect.DisplayText);
|
||||
}
|
||||
}
|
||||
MyApp.Quit();
|
||||
_MyApp = null;
|
||||
}
|
||||
private void WalkItems(ItemInfo itemInfo)
|
||||
{
|
||||
MyInfo.MyStatus = string.Format("Processing {0}", ShortPath(itemInfo));
|
||||
WalkSteps(itemInfo);
|
||||
MyInfo.MyStatus = string.Format("Ready - Output copied to clipboard");
|
||||
}
|
||||
private int testID = 442;
|
||||
private void WalkSteps(ItemInfo itemInfo)
|
||||
{
|
||||
if(itemInfo.ItemID == testID)
|
||||
AddInfo("Found TestID");
|
||||
WalkSteps(itemInfo.Cautions);
|
||||
WalkSteps(itemInfo.Notes);
|
||||
MyInfo.AddInfoPartial("{0},'{1}','{2}','{3}'", itemInfo.ItemID, ShortPath(itemInfo), ShortPath(itemInfo.SearchNext), ShortPath(itemInfo.SearchPrev));
|
||||
WalkSteps(itemInfo.RNOs);
|
||||
WalkSteps(itemInfo.Tables);
|
||||
WalkSteps(itemInfo.Procedures);
|
||||
WalkSteps(itemInfo.Sections);
|
||||
WalkSteps(itemInfo.Steps);
|
||||
}
|
||||
private string ShortPath(ItemInfo itemInfo)
|
||||
{
|
||||
if (itemInfo == null)
|
||||
return "";
|
||||
if (itemInfo.IsProcedure)
|
||||
return itemInfo.DisplayNumber;
|
||||
if (itemInfo.IsSection)
|
||||
return itemInfo.DisplayNumber != "" ? itemInfo.DisplayNumber : itemInfo.DisplayText;
|
||||
return itemInfo.Path.Substring(itemInfo.ActiveSection.Path.Length);
|
||||
}
|
||||
private void WalkSteps(ItemInfoList itemInfoList)
|
||||
{
|
||||
if(itemInfoList != null)
|
||||
foreach (ItemInfo itemInfo in itemInfoList)
|
||||
WalkSteps(itemInfo);
|
||||
}
|
||||
private void lbSections_DoubleClick(object sender, EventArgs e)
|
||||
{
|
||||
promsPrinterToolStripMenuItem1_Click(sender, e);
|
||||
}
|
||||
private void AddPageTemplate(string msWordPdf, SectionInfo sect)
|
||||
{
|
||||
// Create Page Template based upon PageList items and genmac
|
||||
int docStyleIndex = ((int)sect.MyContent.Type) % 10000;
|
||||
DocStyle myDocStyle = sect.ActiveFormat.PlantFormat.DocStyles.DocStyleList[docStyleIndex];
|
||||
PageStyle myPageStyle = myDocStyle.pagestyle;
|
||||
foreach (PageItem pageItem in myPageStyle.PageItems)
|
||||
{
|
||||
AddInfo("{0},{1},'{2}','{3}','{4}'", pageItem.Row, pageItem.Col, pageItem.Font, pageItem.Justify, pageItem.Token);
|
||||
}
|
||||
AddInfo("GenMac\r\n{0}",sect.ActiveFormat.GenMac);
|
||||
}
|
||||
|
||||
private void promsPrinterToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
Proms2010Procedure prProc = _MyProms2010Print.GetProcedure(MyProcedure);
|
||||
PromsPrinter pp = new PromsPrinter(MyProcedure,prProc.Rev,prProc.RevDate,"DRAFT");
|
||||
pp.Print(@"C:\TEMP\32Bit",_MyProms2010Print, null,this);
|
||||
}
|
||||
|
||||
private void promsPrinterToolStripMenuItem1_Click(object sender, EventArgs e)
|
||||
{
|
||||
Proms2010Procedure prProc = _MyProms2010Print.GetProcedure(MySection.MyProcedure);
|
||||
string wordFile = null;
|
||||
if(MySection.MyContent.ContentEntryCount == 1)
|
||||
wordFile = ToPDFReplaceROs(MySection, false);
|
||||
PromsPrinter pp = new PromsPrinter(MySection, prProc.Rev, prProc.RevDate,"DRAFT");
|
||||
pp.Print(@"C:\TEMP\32Bit",_MyProms2010Print, wordFile,this);
|
||||
}
|
||||
Proms2010Print _MyProms2010Print;
|
||||
private void buldXMLToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
// Walk through contents of the 16Bit Folder and create Proms2010 Structure
|
||||
Proms2010Print _MyProms2010Print = new Proms2010Print();
|
||||
_MyProms2010Print.PROMS16_Folder = @"C:\TEMP\16Bit";
|
||||
_MyProms2010Print.Procedures = new Proms2010Procedures();
|
||||
DirectoryInfo myDirectory = new DirectoryInfo(_MyProms2010Print.PROMS16_Folder);
|
||||
foreach (FileInfo myFile in myDirectory.GetFiles("*.pdf"))
|
||||
{
|
||||
ProcedureInfo myProc = GetProcedure(myFile.Name.Replace(".pdf",""));
|
||||
if (myProc != null)
|
||||
{
|
||||
Proms2010Procedure proc = new Proms2010Procedure(myProc);
|
||||
proc.PageCount = VolianPdf.PageCount(myFile.FullName);
|
||||
_MyProms2010Print.Procedures.Add(proc);
|
||||
}
|
||||
}
|
||||
// Output xml to frmInfo
|
||||
ClearInfo();
|
||||
SvgSerializer<Proms2010Print>.WriteFile(_MyProms2010Print, "Proms2010Print.xml");
|
||||
AddInfo(SvgSerializer<Proms2010Print>.StringSerialize(_MyProms2010Print));
|
||||
}
|
||||
private ProcedureInfo GetProcedure(string procNumber)
|
||||
{
|
||||
// Loop through the list looking for a matching number
|
||||
foreach (ProcedureInfo proc in MyDocVersion.Procedures)
|
||||
if (proc.DisplayNumber == procNumber)
|
||||
return proc;
|
||||
return null;
|
||||
}
|
||||
|
||||
private void typesToolStripMenuItem_Click(object sender, EventArgs e)
|
||||
{
|
||||
// Initialize Dictionary
|
||||
Dictionary<int, int> roTypes = new Dictionary<int, int>();
|
||||
// Spin Through Procedures for selected DocVersion
|
||||
if (MyDocVersion.DocVersionAssociationCount == 0)
|
||||
{
|
||||
MessageBox.Show("No associated ROFST");
|
||||
return;
|
||||
}
|
||||
ROFstInfo rofst = MyDocVersion.DocVersionAssociations[0].MyROFst;
|
||||
ROFSTLookup lookup = rofst.ROFSTLookup;
|
||||
string igPrefix = MyDocVersion.DocVersionConfig.RODefaults_graphicsprefix;
|
||||
string spPrefix = MyDocVersion.DocVersionConfig.RODefaults_setpointprefix;
|
||||
foreach (ProcedureInfo proc in MyDocVersion.Procedures)
|
||||
FindROTypes(proc, roTypes, lookup, igPrefix, spPrefix);
|
||||
// Output Dictionary Results
|
||||
foreach (int roType in roTypes.Keys)
|
||||
AddInfo("Type {0}, Count {1}", roType, roTypes[roType]);
|
||||
}
|
||||
|
||||
private void walkStepsToolStripMenuItem1_Click(object sender, EventArgs e)
|
||||
{
|
||||
MyInfo.MyStatus = string.Format("Processing");
|
||||
if (MyDocVersion != null)
|
||||
{
|
||||
MyInfo.Clear();
|
||||
foreach (ProcedureInfo procInfo in MyDocVersion.Procedures)
|
||||
ProcedureWalkSteps(procInfo);
|
||||
MyInfo.CopyOutput();
|
||||
MyInfo.MyStatus = string.Format("Ready - Output copied to clipboard");
|
||||
}
|
||||
|
||||
}
|
||||
private void walkStepsToolStripMenuItem2_Click(object sender, EventArgs e)
|
||||
{
|
||||
ProcedureWalkSteps(MyProcedure);
|
||||
MyInfo.CopyOutput();
|
||||
MyInfo.MyStatus = string.Format("Ready - Output copied to clipboard");
|
||||
}
|
||||
private void walkStepsToolStripMenuItem3_Click(object sender, EventArgs e)
|
||||
{
|
||||
if (MySection != null) WalkItems(MySection);
|
||||
}
|
||||
private void ProcedureWalkSteps(ProcedureInfo procInfo)
|
||||
{
|
||||
MyInfo.MyStatus = string.Format("Processing {0}", procInfo.MyContent.Number);
|
||||
if (procInfo != null) WalkItems(procInfo);
|
||||
}
|
||||
public DocVersionInfo MyDocVersion
|
||||
{
|
||||
get { return lbDocVersion.SelectedValue as DocVersionInfo; }
|
||||
}
|
||||
public ProcedureInfo MyProcedure
|
||||
{
|
||||
get { return lbProcedure.SelectedValue as ProcedureInfo; }
|
||||
}
|
||||
public SectionInfo MySection
|
||||
{
|
||||
get { return lbSections.SelectedValue as SectionInfo; }
|
||||
}
|
||||
|
||||
private void countToolStripMenuItem1_Click(object sender, EventArgs e)
|
||||
{
|
||||
foreach (ProcedureInfo procInfo in MyDocVersion.Procedures)
|
||||
ShowSectionCounts(procInfo);
|
||||
}
|
||||
|
||||
private void listSectionsToolStripMenuItem1_Click(object sender, EventArgs e)
|
||||
{
|
||||
foreach (ProcedureInfo procInfo in MyDocVersion.Procedures)
|
||||
ListSections(procInfo);
|
||||
}
|
||||
}
|
||||
enum PDFMethod
|
||||
{
|
||||
ToPDF,
|
||||
ToPDF2003BG,
|
||||
ToPDF2003FG,
|
||||
toPDF2007
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user