public void Diafrm_Output_Word_FormClosed(object sender, FormClosedEventArgs e)
{
foreach (IntPtr H in WindowHandles)
{
APIWindows.EnableWindow(H, true);
}
}
/// <summary>
/// Showdialog式加载
/// </summary>
/// <param name="sender"></param>
/// <param name="e"></param>
/// <remarks></remarks>
public void frm_Output_Word_Load(object sender, EventArgs e)
{
//刷新时间
dateThisday = APPLICATION_MAINFORM.MainForm.Form_Rolling.Rollingday;
//设置初始界面
LabelDate.Text = dateThisday.ToString("yyyy/MM/dd");
ChkBxSelect.CheckState = CheckState.Unchecked;
CheckBox_PlanView.Checked = false;
CheckBox_SectionalView.Checked = false;
btnExport.Enabled = false;
//为数组中的每一个元素赋值，以便于后面的统一操作：清空内容、全部选择，取消全选
F_arrListBoxes[0] = ListBoxMonitor_Dynamic;
F_arrListBoxes[1] = ListBoxMonitor_Static;
//
F_SelectedDrawings = new Drawings_For_Output(this);
//刷新主程序与界面
AmeDrawings AllDrawing = GlobalApplication.Application.ExposeAllDrawings();
// ---------- 禁用所有绘图窗口
WindowHandles = GlobalApplication.GetWindwosHandles(AllDrawing);
foreach (IntPtr H in WindowHandles)
{
APIWindows.EnableWindow(H, false);
}
//
RefreshUI(AllDrawing);
}
private void ExportToWord(Application WdApp, Drawings_For_Output selectedDrawings)
{
Word.Range rg = WdDoc.Range(Start: 0);
//在写入标题部分内容时所占的进度
int intProgressForStartPart = 10;
//一共要导出的元素个数
int intElementsCount = selectedDrawings.Count();
//每一个导出的元素所占的进度
float sngUnit = (float)((double)(100 - intProgressForStartPart) / intElementsCount);
//实时的进度值
int intProgress = intProgressForStartPart;
try
{
//写入标题项
Export_OverView(ref rg);
}
catch (Exception)
{
MessageBox.Show("写入概述部分出错，但可以继续工作。", "Warning", MessageBoxButtons.OK, MessageBoxIcon.Warning);
}
finally
{
APPLICATION_MAINFORM.MainForm.ShowProgressBar_Continue(intProgressForStartPart);
}
// ------------- 取消绘图窗口的禁用 ------------------
//一定要在将绘图窗口中的图形导出到Word之前取消窗口的禁用，
//否则的话，当调用这些窗口的Application属性时，就会出现报错：应用程序正在使用中。
foreach (IntPtr H in WindowHandles)
{
APIWindows.EnableWindow(H, true);
}
//输出每一个选定的图形
// ------------- 开挖平面图 ------------------
try
{
ClsDrawing_PlanView D = selectedDrawings.PlanView;
if (D != null)
{
Page page = D.Page;
//
NewLine(rg, ParagraphStyle.Title_2);
rg.InsertAfter("开挖平面图：");
//
Export_VisioPlanview(page, ref rg);
//
intProgress += (int)sngUnit;
APPLICATION_MAINFORM.MainForm.ShowProgressBar_Continue(intProgress);
}
}
catch (Exception ex)
{
MessageBox.Show(
"导出Visio开挖平面图出错，但可以继续工作。" + "\r\n" + ex.Message + "\r\n" + "报错位置：" + ex.TargetSite.Name, "Warning",
MessageBoxButtons.OK, MessageBoxIcon.Warning);
}
// ------------- 剖面标高图 -------------------------
try
{
ClsDrawing_ExcavationElevation D = selectedDrawings.SectionalView;
if (D != null)
{
//
NewLine(rg, ParagraphStyle.Title_2);
rg.InsertAfter("开挖剖面图：");
//
Export_ExcelChart(D.Chart, ref rg);
//
intProgress += (int)sngUnit;
APPLICATION_MAINFORM.MainForm.ShowProgressBar_Continue(intProgress);
}
}
catch (Exception ex)
{
MessageBox.Show(
"导出Excel开挖剖面图出错，但可以继续工作。" + "\r\n" + ex.Message + "\r\n" + "报错位置：" + ex.TargetSite.Name, "Warning",
MessageBoxButtons.OK, MessageBoxIcon.Warning);
}
// ---------------------- 监测曲线图 --------------------
Chart cht = default(Chart);
foreach (ClsDrawing_Mnt_Base Drawing in selectedDrawings.MntDrawings)
{
try
{
switch (Drawing.Type)
{
// ------------- 测斜曲线图 ---------------------------------------------------
case DrawingType.Monitor_Incline_Dynamic:
ClsDrawing_Mnt_Incline D_1 = (ClsDrawing_Mnt_Incline)Drawing;
cht = D_1.Chart;
//
NewLine(rg, ParagraphStyle.Title_2);
rg.InsertAfter(D_1.Chart_App_Title);
//
Export_ExcelChart(cht, ref rg);
break;
// ------------- 动态监测曲线图 ---------------------------------------------
case DrawingType.Monitor_Dynamic:
ClsDrawing_Mnt_OtherDynamics D_2 = (ClsDrawing_Mnt_OtherDynamics)Drawing;
cht = D_2.Chart;
//
NewLine(rg, ParagraphStyle.Title_2);
rg.InsertAfter(D_2.Chart_App_Title);
Export_ExcelChart(cht, ref rg);
break;
// ------------- 静态监测曲线图 ---------------------------------------------
case DrawingType.Monitor_Static:
ClsDrawing_Mnt_Static D_3 = (ClsDrawing_Mnt_Static)Drawing;
cht = D_3.Chart;
//
NewLine(rg, ParagraphStyle.Title_2);
rg.InsertAfter(D_3.Chart_App_Title);
Export_ExcelChart(cht, ref rg);
break;
// ------------- 静态监测曲线图 ---------------------------------------------
case DrawingType.Monitor_Incline_MaxMinDepth:
ClsDrawing_Mnt_MaxMinDepth D = (ClsDrawing_Mnt_MaxMinDepth)Drawing;
cht = D.Chart;
//
NewLine(rg, ParagraphStyle.Title_2);
rg.InsertAfter(D.Chart_App_Title);
Export_ExcelChart(cht, ref rg);
break;
default:
break;
}
}
catch (Exception ex)
{
MessageBox.Show("导出监测曲线图\"" + Drawing.Chart_App_Title.ToString() + "\"出错，但可以继续工作。" +
"\r\n" + ex.Message + "\r\n" + "报错位置：" +
ex.TargetSite.Name, "Warning", MessageBoxButtons.OK, MessageBoxIcon.Warning);
}
finally
{
intProgress += (int)sngUnit;
APPLICATION_MAINFORM.MainForm.ShowProgressBar_Continue(intProgress);
}
}
}
