Esempio n. 1
0
        public Form1()
        {
            InitializeComponent();

            AutoCAD.AcadApplication ACAD1 = new AutoCAD.AcadApplication();
            AutoCAD.AcadDocuments   Docs1 = ACAD1.Documents;
            AutoCAD.AcadDocument    Doc1  = Docs1.Add();

            ACAD1.Visible = true;

            double[] T1 = { 10, 10, 0 };
            double[] T2 = { 200, 200, 0 };
            double[] T3 = { 200, 10, 0 };
            double[] T4 = { 15, 200, 0 };

            Doc1.ModelSpace.Addline(T1, T2);

            Doc1.ModelSpace.Addline(T2, T3).Color = AutoCAD.ACAD_COLOR.acRed;

            Doc1.ModelSpace.AddText("Горизонтальный", T4, 22);

            Doc1.ModelSpace.AddText("Вертикальный", T1, 22).Rotation = Math.PI / 2;

            Doc1.SaveAs(@"e:\draw.dwg");

            ACAD1.Quit();
        }
Esempio n. 2
0
        private void button3_Click(object sender, EventArgs e)
        {
            AutoCAD.AcadApplication newapp = new AutoCAD.AcadApplication();
            AutoCAD.AcadDocument    doc    = null;

            newapp.Application.Visible = true;
            try
            {
                doc = newapp.Documents.Open(this.textBox1.Text, Type.Missing, Type.Missing);

                AutoCAD.AcadLayout layout = doc.ActiveLayout;

                AutoCAD.AcadPlotConfiguration oplot = doc.PlotConfigurations.Add("PDF", layout.ModelType);
                oplot.PaperUnits         = AutoCAD.AcPlotPaperUnits.acMillimeters;
                oplot.StyleSheet         = "monochrome.ctb";
                oplot.PlotWithPlotStyles = true;
                oplot.ConfigName         = "DWG To PDF.pc3";
                oplot.UseStandardScale   = true;
                oplot.StandardScale      = AutoCAD.AcPlotScale.acScaleToFit;
                oplot.PlotType           = AutoCAD.AcPlotType.acExtents;
                oplot.CenterPlot         = true;


                layout.CopyFrom(oplot);
                layout.PlotRotation = AutoCAD.AcPlotRotation.ac0degrees;
                layout.RefreshPlotDeviceInfo();
                doc.SetVariable("BACKGROUNDPLOT", 0);
                doc.Plot.QuietErrorMode = true;
                doc.Plot.PlotToFile(this.textBox2.Text, "DWG To PDF.pc3");
                oplot.Delete();
                oplot = null;
            }
            catch {}
        }