分享一些程式寫作的小技巧

rr09192084

這是一個將 DataGridView 相關的一些常用到的功能，作一些小小分享，其中就包括轉成EXCEL檔案、列印等。
其中也有一些平常設計程式會用到的小技巧，諸如資料模組的設計，擴充法、資料型別的轉換等等，給大家參考。
這是Form1.cs

1. using System;
   
2. using System.Collections.Generic;
   
3. using System.ComponentModel;
   
4. using System.Data;
   
5. using System.Drawing;
   
6. using System.Drawing.Printing;
   
7. using System.IO;
   
8. using System.Linq;
   
9. using System.Runtime.InteropServices;
   
10. using System.Text;
    
11. using System.Threading.Tasks;
    
12. using System.Windows.Forms;
    
13. using Excel = Microsoft.Office.Interop.Excel;
    
14. 
    
15. namespace ListToDataGridView
    
16. {
    
17.     public partial class Form1 : Form
    
18.     {
    
19.         //通常定義欄位都是以private為主
    
20.         private List<PersonModel> person;
    
21.         private string toExcelString = "";
    
22.         private Timer timer;
    
23.         //定義常數
    
24.         private const int WM_CLOSE = 0x10;
    
25.         public Form1()
    
26.         {
    
27.             InitializeComponent();
    
28.         }
    
29.         //API
    
30.         [DllImport("User32.dll", EntryPoint = "FindWindow", SetLastError = true, CharSet = CharSet.Auto)]
    
31.         public static extern IntPtr FindWindow(string lpClassName, string lpWindowName);
    
32.         [DllImport("User32.dll", EntryPoint = "PostMessage", SetLastError = true, CharSet = CharSet.Auto)]
    
33.         public static extern bool PostMessage(IntPtr hWnd, uint Msg, UIntPtr wParam, IntPtr lParam);
    
34. 
    
35.         private void Form1_Load(object sender, EventArgs e)
    
36.         {
    
37.             //建構時一次加入3筆資料
    
38.             person = new List<PersonModel>()
    
39.             {
    
40.                 new PersonModel
    
41.                 {
    
42.                     Name = "王大維",
    
43.                     ID = "B122111111",
    
44.                     Birthday = "19680705",
    
45.                     TEL = "07-23593512",
    
46.                     CellPhone = "0982-333-333",
    
47.                     Address = "高雄市苓雅區中華西路二段451號" ,
    
48.                     EMail = "daviwang@msa.hinet.net"
    
49.                 },
    
50.                 new PersonModel
    
51.                 {
    
52.                     Name = "姜中華",
    
53.                     ID = "C122221221",
    
54.                     Birthday = "19771025",
    
55.                     TEL = "04-23257066",
    
56.                     CellPhone = "0952-666-666",
    
57.                     Address = "台中市北屯區中西三路1026號",
    
58.                     EMail = "hwa661025888@yahoo.com.tw"
    
59.                 },
    
60.                 new PersonModel
    
61.                 {
    
62.                     Name = "張小明",
    
63.                     ID = "A122331331",
    
64.                     Birthday = "19780630",
    
65.                     TEL = "02-25805632",
    
66.                     CellPhone = "0988-999-999",
    
67.                     Address = "台北市大安區復興南路一段203號10樓之16",
    
68.                     EMail = "ming53621107@gmail.com"
    
69.                 }
    
70.             };
    
71. 
    
72.             //或是後來再加入1筆資料
    
73.             person.Add(new PersonModel
    
74.                 {
    
75.                     Name = "李維勳",
    
76.                     ID = "T122551551",
    
77.                     Birthday = "19750630",
    
78.                     TEL = "02-23231122",
    
79.                     CellPhone = "0938-777-777",
    
80.                     Address = "台北市松山區信義路二段300號11樓之1",
    
81.                     EMail = "waishin@dodogogo.com"
    
82.                 });
    
83.             
    
84.             //實際應用時也許會像這樣
    
85.             /*
    
86.             person.Add(new PersonModel
    
87.             {
    
88.                 Name = textBox1.Text,
    
89.                 ID = textBox2.Text,
    
90.                 Birthday = textBox3.Text,
    
91.                 TEL = textBox4.Text,
    
92.                 CellPhone = textBox5.Text,
    
93.                 Address = textBox6.Text,
    
94.                 EMail = textBox7.Text
    
95.             });  */
    
96.             //=============================================================
    
97.             //這段程式碼是將 List 放到 dataGridView1 裡
    
98.             //這裡我在 ExtensionUtility.cs 這個類別裡寫的一個擴充方法
    
99.             dataGridView1.DataSource = person.ToBindingSource<PersonModel>();
    
100.             //=============================================================
     
101. 
     
102.             //=============================================================
     
103.             //設定欄位寬度，這段也可以放到dataGridView1_DataBindingComplete裡面
     
104.             for (int i = 0; i < dataGridView1.ColumnCount; i++)
     
105.             {
     
106.                 dataGridView1.Columns[i].AutoSizeMode = DataGridViewAutoSizeColumnMode.DisplayedCells;
     
107.             }
     
108.             //=============================================================
     
109.         }
     
110. 
     
111.         //匯出EXCEL檔案功能按鈕
     
112.         private void toExcelButton_Click(object sender, EventArgs e)
     
113.         {
     
114.             if (toExcelString == "") return;
     
115.             //為了避免相互干擾，會強制關閉執行中EXCEL
     
116.             initailExcel();
     
117.             //所以要確認其它開啟的EXCEL檔案已經存檔並關閉。
     
118.             Excel.Application xlApplication = new Excel.Application();
     
119.             Excel.Workbook workBook = null;
     
120.             Excel.Worksheet first_sheet = null;
     
121.             Excel.Range tmprng = null;
     
122.             string xlfilename = "";
     
123.             FolderBrowserDialog fd = new FolderBrowserDialog();
     
124.             if (fd.ShowDialog() == System.Windows.Forms.DialogResult.OK)
     
125.             {
     
126.                 if (fd.SelectedPath.Substring(fd.SelectedPath.Length-1, 1) == @"\")
     
127.                     //如果是選根目錄
     
128.                     xlfilename = fd.SelectedPath + @"(" + convertDate(DateTime.Now) + ")-個人資料(明細表).xlsx";
     
129.                 else
     
130.                     //選子目錄
     
131.                     xlfilename = fd.SelectedPath + @"\(" + convertDate(DateTime.Now) + ")-個人資料(明細表).xlsx";
     
132.             }
     
133.             else
     
134.             {
     
135.                 return;
     
136.             }
     
137.             try
     
138.             {
     
139.                 //EXCEL檔案如果已經存在就直接刪除
     
140.                 if (File.Exists(xlfilename)) { File.Delete(xlfilename); }
     
141.                 //建立新的EXCEL檔案
     
142.                 workBook = xlApplication.Workbooks.Add();
     
143.                 first_sheet = workBook.Sheets[1] as Excel.Worksheet;
     
144.                 //將文字複製到剪貼簿
     
145.                 Clipboard.SetText(toExcelString, TextDataFormat.UnicodeText);
     
146.                 //將C到E欄和G欄設定為文字格式並靠右對齊
     
147.                 tmprng = first_sheet.Range["C:E"];
     
148.                 tmprng.NumberFormat = "@";
     
149.                 tmprng.HorizontalAlignment = Microsoft.Office.Interop.Excel.XlHAlign.xlHAlignRight;
     
150.                 //在A1貼上剪貼簿上的內容
     
151.                 first_sheet.Paste(first_sheet.Range["A1", Type.Missing], false);
     
152.                 first_sheet.Name = "服務事項明細表";
     
153.                 //設定自動欄寬
     
154.                 first_sheet.Cells.EntireColumn.AutoFit();
     
155.                 //設定自動篩選
     
156.                 tmprng = first_sheet.get_Range("A1", "A1");
     
157.                 tmprng.AutoFilter(1, Type.Missing, Excel.XlAutoFilterOperator.xlAnd, Type.Missing, true);
     
158.                 //不詢問直接覆蓋原有檔案
     
159.                 xlApplication.DisplayAlerts = false;
     
160.                 //存檔為 EXCEL 2007 格式
     
161.                 workBook.SaveAs(xlfilename, Excel.XlFileFormat.xlWorkbookDefault);
     
162.             }
     
163.             catch (Exception ex)
     
164.             {
     
165.                 //這一段是秀出錯誤訊息並且5秒鐘後自動關閉
     
166.                 StartTimerKillMessageBox(5);
     
167.                 MessageBox.Show(ex.Message + ex.ToString(), "MessageBox");
     
168.             }
     
169.             finally
     
170.             {
     
171.                 //釋放掉一些資源的程式碼
     
172.                 NAR(tmprng);
     
173.                 NAR(first_sheet);
     
174.                 NAR(workBook);
     
175.                 xlApplication.Quit();
     
176.                 NAR(xlApplication);
     
177.                 GC.Collect();
     
178.                 if (File.Exists(xlfilename)) MessageBox.Show("匯出成功！！");
     
179. 
     
180.             }
     
181.         }
     
182. 
     
183.         //列印功能按鈕
     
184.         private void toPrinter_Click(object sender, EventArgs e)
     
185.         {
     
186.             if (toExcelString == "") return;
     
187.             string tmpstr = "";
     
188.             string[] ss = System.Text.RegularExpressions.Regex.Split(toExcelString, "\r\n");
     
189.             foreach (string s in ss)
     
190.             {   //以下這段程式是將文字稍作排版
     
191.                 if (s.Length < 5) continue;
     
192.                 string[] sv = System.Text.RegularExpressions.Regex.Split(s, "\t");
     
193.                 if (sv.Length == 7)
     
194.                 {
     
195.                     tmpstr += sv[0] + new String(' ', 12 - ChtStr_Lenght(sv[0]));
     
196.                     tmpstr += sv[1] + new String(' ', 11 - ChtStr_Lenght(sv[1]));
     
197.                     tmpstr += sv[2] + new String(' ', 11 - ChtStr_Lenght(sv[2]));
     
198.                     tmpstr += sv[3] + new String(' ', 16 - ChtStr_Lenght(sv[3]));
     
199.                     tmpstr += sv[4] + new String(' ', 16 - ChtStr_Lenght(sv[4]));
     
200.                     tmpstr += sv[5] + new String(' ', 40 - ChtStr_Lenght(sv[5]));
     
201.                     tmpstr += sv[6] + new String(' ', 28 - ChtStr_Lenght(sv[6])) + "\r\n";
     
202.                 }
     
203.             }
     
204.             PrintDocument p = new PrintDocument();
     
205.             //把版面設定成橫印
     
206.             p.DefaultPageSettings.Landscape = true;
     
207.             p.PrintPage += delegate(object sender1, PrintPageEventArgs e1)
     
208.             {   //這個列印程式只能印出第一頁，如果要印出多頁，這段程式要做修改
     
209.                 e1.Graphics.DrawString(tmpstr, new Font("標楷體", 11),
     
210.                                        new SolidBrush(Color.Black),
     
211.                                        new RectangleF(25, 50, p.DefaultPageSettings.PrintableArea.Height,
     
212.                                        p.DefaultPageSettings.PrintableArea.Width));
     
213. 
     
214.             };
     
215.             try
     
216.             {
     
217.                 p.Print();
     
218.             }
     
219.             catch (Exception ex)
     
220.             {
     
221.                 throw new Exception("列印出錯：", ex);
     
222.             }
     
223.         }
     
224. 
     
225.         private void dataGridView1_DataBindingComplete(object sender, DataGridViewBindingCompleteEventArgs e)
     
226.         {
     
227.             //每次DataBinding完成時都將person這個List轉成PersonExcelModel這個模組型態(LINQ語法)
     
228.             //並且輸出成以TAB相隔的字串，方便貼到EXCEL工作表上
     
229.             //其實這一整段基本上是可以放在Button_Click裡面的
     
230.             toExcelString = "姓名\t證號\t生日\t電話\t手機\t地址\t電郵\r\n";
     
231. 
     
232.             //這個是LINQ語法，我個人覺得是很好用東東
     
233.             //=============================================================
     
234.             var personexcel = from p in person
     
235.                             group p by new {
     
236.                                 p.Name,
     
237.                                 p.ID,
     
238.                                 p.Birthday,
     
239.                                 p.TEL,
     
240.                                 p.CellPhone,
     
241.                                 p.Address,
     
242.                                 p.EMail
     
243.                             } into rs
     
244.                             select new PersonExcelModel()
     
245.                             {
     
246.                                 姓名 = rs.Key.Name,
     
247.                                 證號 = rs.Key.ID,
     
248.                                 生日 = rs.Key.Birthday,
     
249.                                 電話 = rs.Key.TEL,
     
250.                                 手機 = rs.Key.CellPhone,
     
251.                                 地址 = rs.Key.Address,
     
252.                                 電郵 = rs.Key.EMail
     
253.                             };
     
254.             //=============================================================
     
255. 
     
256.             //所以personexcel現在已經是PersonExcelModel這種形態了
     
257.             foreach (var item in personexcel)
     
258.             {
     
259.                 toExcelString += item.ToString(); //這裡應用的就是之前複寫的ToString()方法
     
260.             }
     
261.         }
     
262. 
     
263.         //啟動關閉訊息框
     
264.         public void StartTimerKillMessageBox(int sec, string msg = "MessageBox")
     
265.         {
     
266.             timer = new Timer();
     
267.             timer.Interval = sec * 1000; //等sec秒
     
268.             timer.Tag = msg;
     
269.             timer.Tick += new EventHandler(Timer_CloseMessageBox);
     
270.             timer.Start();
     
271.         }
     
272. 
     
273.         public void Timer_CloseMessageBox(object sender, EventArgs e)
     
274.         {
     
275.             KillMessageBox(Convert.ToString(((Timer)sender).Tag));
     
276.             //停止Timer
     
277.             ((Timer)sender).Stop();
     
278.         }
     
279. 
     
280.         public void KillMessageBox(string msg)
     
281.         {
     
282.             //依MessageBox的標題,找出MessageBox的視窗
     
283.             IntPtr ptr = FindWindow(null, msg);
     
284.             if (ptr != IntPtr.Zero)
     
285.             {
     
286.                 //找到則關閉MessageBox視窗
     
287.                 PostMessage(ptr, WM_CLOSE, UIntPtr.Zero, IntPtr.Zero);
     
288.             }
     
289.         }
     
290. 
     
291.         //傳回自訂格式的日期
     
292.         public string convertDate(DateTime dt)
     
293.         {
     
294.             return dt.Year.ToString("0000") + dt.Month.ToString("00") + dt.Day.ToString("00");
     
295.         }
     
296. 
     
297.         //傳回有中文的字串的真實長度
     
298.         public int ChtStr_Lenght(string a_SrcStr)
     
299.         {
     
300.             byte[] l_byte = System.Text.Encoding.Default.GetBytes(a_SrcStr);
     
301.             return l_byte.Length;
     
302.         }
     
303. 
     
304.         //釋放占用的資源
     
305.         public void NAR(object sender)
     
306.         {
     
307.             try
     
308.             {
     
309.                 if (sender != null)
     
310.                 {
     
311.                     while (Marshal.ReleaseComObject(sender) > 0) ;
     
312.                 }
     
313.             }
     
314.             finally
     
315.             { sender = null; }
     
316.         }
     
317.         public void initailExcel()
     
318.         {
     
319.             //檢查PC有無Excel在執行，有的話強制關閉。
     
320.             foreach (var item in System.Diagnostics.Process.GetProcesses())
     
321.             {
     
322.                 if (item.ProcessName.ToUpper() == "EXCEL")
     
323.                 {
     
324.                     item.Kill();
     
325.                     item.WaitForExit();
     
326.                 }
     
327.             }
     
328.         }
     
329.     }
     
330. }

複製代碼

這是DataModel.cs，用來設計資料的模組

1. using System;
   
2. using System.Collections.Generic;
   
3. using System.Linq;
   
4. using System.Text;
   
5. using System.Threading.Tasks;
   
6. 
   
7. namespace ListToDataGridView
   
8. {
   
9.     class PersonModel : IEquatable<PersonModel>
   
10.     {
    
11.         public string Name { get; set; }
    
12.         public string ID { get; set; }
    
13.         public string Birthday { get; set; }
    
14.         public string TEL { get; set; }
    
15.         public string CellPhone { get; set; }
    
16.         public string Address { get; set; }
    
17.         public string EMail { get; set; }
    
18. 
    
19.         //IEquatable這個介面需要實作Equals這個方法
    
20.         public bool Equals(PersonModel other)
    
21.         {
    
22.             return this.ID.Equals(other.ID);
    
23.         }
    
24.     }
    
25. 
    
26.     class PersonExcelModel : IEquatable<PersonExcelModel>
    
27.     {
    
28.         public string 姓名 { get; set; }
    
29.         public string 證號 { get; set; }
    
30.         public string 生日 { get; set; }
    
31.         public string 電話 { get; set; }
    
32.         public string 手機 { get; set; }
    
33.         public string 地址 { get; set; }
    
34.         public string 電郵 { get; set; }
    
35. 
    
36.         //IEquatable這個介面需要實作Equals這個方法
    
37.         public bool Equals(PersonExcelModel other)
    
38.         {   
    
39.             return this.證號.Equals(other.證號);
    
40.         }
    
41. 
    
42.         //再寫一個多載方法可以和PersonModel做比對
    
43.         public bool Equals(PersonModel other)
    
44.         {
    
45.             return this.證號.Equals(other.ID);
    
46.         }
    
47. 
    
48.         //這裡我們複寫ToString()這個方法，以便讓它可以符合輸出到EXCEL的需求
    
49.         public override string ToString()
    
50.         {
    
51.             return this.姓名 + "\t" + this.證號 + "\t" + this.生日
    
52.                         + "\t" + this.電話 + "\t" + this.手機
    
53.                         + "\t" + this.地址 + "\t" + this.電郵 + "\r\n";
    
54.         }
    
55.     }
    
56. }

複製代碼

這是ExtensionUtility.cs，裡面裝了一個把List轉成BindingSource的擴充方法

1. using System;
   
2. using System.Collections.Generic;
   
3. using System.ComponentModel;
   
4. using System.Linq;
   
5. using System.Text;
   
6. using System.Threading.Tasks;
   
7. using System.Windows.Forms;
   
8. 
   
9. namespace ListToDataGridView
   
10. {
    
11.     public static class ExtensionUtility
    
12.     {
    
13.         //擴充方法，有興趣自己找資料研究，可以先看看MSDN的說明
    
14.         //https://msdn.microsoft.com/zh-tw/library/bb383977.aspx
    
15.         public static BindingSource ToBindingSource<TSource>(this IList<TSource> data)
    
16.         {
    
17.             var bindingList = new BindingList<TSource>(data);
    
18.             return new BindingSource(bindingList, null);
    
19. 
    
20.         }
    
21.     }
    
22. }

複製代碼

請大家不吝指教...

瀏覽完整內容，請先 註冊 或 登入會員

SIHEOT

太神啦
感謝大大的分享

jasonme168

神人!
感謝您的分享，造福後學。

min721107

謝謝大大分享,收下使用

bigpig200126

小弟也是新手，最近在研究Kendo UI ，發現他蠻好用的，可以直接幫你把Girid的資料產出成Excel，完全不用寫程式，你可以試試看唷

c15722145

不建議這樣操作Excel
樓上ODBC方式較佳
不然也可找open source有可以直接生成excel檔案的方法

licious0421

很棒呀!!!
我也算是C#新手八= =
剛好目前有遇到~DATAGREADVIEW TO EXCEL~
完全就是我的需要阿!!

superwaterdog

不錯的範例
謝謝分享
不過要有一點工夫才看得懂

這範例解說真不錯
剛好最近有需要用到類似的功能
範例先收下當參考了

謝謝大大分享^^

superwaterdog

還不錯的介紹

程式的基礎架構都有
當然純看CODE 會有一些基礎會比較好
如有用到INTERFACE 等技巧

孤單小呆呆

最近剛好從C++跳過來
很多都還看不懂

感謝大大的分享
讓我有學習的地方

rr09192084

smallanan 發表於 2015-9-24 12:04 AM

下載: 訪客無法瀏覽下載點，請先 註冊 或 登入會員

個人會比較建議如果依照datagridview一模一樣的方式匯出excel檔案的話

使用odbc效率會比較好（而且不用安 ...

哈哈，我說怎麼都沒人回應呢？感謝您的指教！！
...

瀏覽完整內容，請先 註冊 或 登入會員

個人會比較建議如果依照datagridview一模一樣的方式匯出excel檔案的話

使用odbc效率會比較好（而且不用安裝office）

如果有特殊需求（如：要匯出exce的報表）那這種才使用這種方式寫入excel

rr09192084

列印與匯出成EXCEL檔案部分有做一些修正與加強，列印部分改成可以列出多頁。匯出EXCEL部分增加了會出後直接開啟EXCEL檔案的功能。
要改的地方蠻多的
1.在欄位的地方增加

1. private PrintDocument pd = new PrintDocument();
   
2. private string stringToPrint = "";

複製代碼

2.在Form_Load裏加上

1. pd.PrintPage += new PrintPageEventHandler(printDocument_PrintPage);

複製代碼

3.把 或是後來再加入1筆資料 這一段改成下面這一段程式，直接增加70筆資料，列印時會分成2頁。

1.             //或是後來再加入70筆資料
   
2.             for (int i = 0; i < 70; i++)
   
3.             {
   
4.                 int idnum = 122551551;
   
5.                 person.Add(new PersonModel
   
6.                 {
   
7.                     Name = "李維勳",
   
8.                     ID = "T" + (idnum + i).ToString(),  //ID不同才會被視為不同一筆資料
   
9.                     Birthday = "19750630",
   
10.                     TEL = "02-23231122",
    
11.                     CellPhone = "0938-777-777",
    
12.                     Address = "台北市松山區信義路二段300號11樓之1",
    
13.                     EMail = "waishin64@extenalmail.dodogogo.com.tw"
    
14.                 });
    
15.             }

複製代碼

4.在toExcelButton_Click裏面finally這一段改成

1.                 //釋放掉一些資源的程式碼
   
2.                 NAR(tmprng);
   
3.                 NAR(first_sheet);
   
4.                 NAR(workBook);
   
5.                 xlApplication.Quit();
   
6.                 NAR(xlApplication);
   
7.                 GC.Collect();
   
8.                 if (File.Exists(xlfilename))
   
9.                 {
   
10.                     StartTimerKillMessageBox(3);
    
11.                     MessageBox.Show("匯出成功！！3秒後將會開啟檔案...", "MessageBox");
    
12.                     System.Diagnostics.Process ps = new System.Diagnostics.Process();
    
13.                     //開啟EXCEL檔案
    
14.                     ps.StartInfo = new System.Diagnostics.ProcessStartInfo(xlfilename);
    
15.                     //或是開啟EXCEL檔案所在的目錄
    
16.                     //ps.StartInfo = new System.Diagnostics.ProcessStartInfo(fd.SelectedPath);
    
17.                     ps.Start();
    
18.                 }

複製代碼

5.把toPrinter_Click裡面所有程式碼改成

1.             if (toExcelString == "") return;
   
2.             string tmpstr = "";
   
3.             string[] ss = System.Text.RegularExpressions.Regex.Split(toExcelString, "\r\n");
   
4.             foreach (string s in ss)
   
5.             {   //以下這段程式是將文字稍作排版
   
6.                 if (s.Length < 5) continue;
   
7.                 string[] sv = System.Text.RegularExpressions.Regex.Split(s, "\t");
   
8.                 if (sv.Length == 7)
   
9.                 {   
   
10.                     //姓名是中文資料，要另外處理,所以又加了另一個擴充方法ToChtSubstring
    
11.                     tmpstr += (ChtStr_Length(sv[0]) <= 12) ? sv[0] + new String(' ', 12 - ChtStr_Length(sv[0])) : sv[0].ToChtSubstring(0, 12);
    
12.                     tmpstr += (sv[1].Length <= 11) ? sv[1] + new String(' ', 11 - ChtStr_Length(sv[1])) : sv[1].Substring(0, 11);
    
13.                     tmpstr += (sv[2].Length <= 11) ? sv[2] + new String(' ', 11 - ChtStr_Length(sv[2])) : sv[2].Substring(0, 11);
    
14.                     tmpstr += (sv[3].Length <= 16) ? sv[3] + new String(' ', 16 - ChtStr_Length(sv[3])) : sv[3].Substring(0, 16);
    
15.                     tmpstr += (sv[4].Length <= 16) ? sv[4] + new String(' ', 16 - ChtStr_Length(sv[4])) : sv[4].Substring(0, 16);
    
16.                     //地址也是中文資料，同樣另外處理
    
17.                     tmpstr += (ChtStr_Length(sv[5]) <= 42) ? sv[5] + new String(' ', 42 - ChtStr_Length(sv[5])) : sv[5].ToChtSubstring(0, 42);
    
18.                     tmpstr += (sv[6].Length <= 40) ? sv[6] + new String(' ', 40 - ChtStr_Length(sv[6])) : sv[6].Substring(0, 40);
    
19.                     tmpstr += "\r\n";
    
20.                 }
    
21.             }
    
22.             stringToPrint = tmpstr;
    
23.             try
    
24.             {
    
25.                 //設定成橫印
    
26.                 pd.DefaultPageSettings.Landscape = true;
    
27.                 //列印輸出
    
28.                 //叫出列印對話框
    
29.                 PrintDialog pdialog = new PrintDialog();
    
30.                 pdialog.Document = pd;
    
31.                 if (pdialog.ShowDialog() == DialogResult.OK)
    
32.                 {
    
33.                     pd.Print();
    
34.                 }
    
35.             }
    
36.             catch (Exception ex)
    
37.             {
    
38.                 throw new Exception("列印出錯：", ex);
    
39.             }

複製代碼

6.增加一個PrintDocument處理PrintPage事件的函式

1.         private void printDocument_PrintPage(object sender, PrintPageEventArgs e)
   
2.         {
   
3.             //每頁字數
   
4.             int charactersOnPage = 0;
   
5.             //每頁的列數
   
6.             int linesPerPage = 0;
   
7.             //目前預設印表機可印範圍的高度
   
8.             float h = pd.DefaultPageSettings.PrintableArea.Height - 40;
   
9.             //目前預設印表機可印範圍的寬度(這裡將兩個參數減掉一些數據，是因為通常都不會滿版列印)
   
10.             float w = pd.DefaultPageSettings.PrintableArea.Width - 80;
    
11.             //如果是設定為橫印時，要將寬與高對調
    
12.             if (pd.DefaultPageSettings.Landscape)
    
13.             {
    
14.                 float tmp = h;
    
15.                 h = w;
    
16.                 w = tmp;
    
17.             }
    
18.             //計算出每頁字數，每頁列數
    
19.             e.Graphics.MeasureString(stringToPrint,
    
20.                 new Font("標楷體", 11),
    
21.                 new SizeF(w, h),
    
22.                 StringFormat.GenericTypographic,
    
23.                 out charactersOnPage,  //輸出給每頁字數的變數
    
24.                 out linesPerPage);     //輸出給每頁列數的變數
    
25.             //畫出列印頁面
    
26.             e.Graphics.DrawString(stringToPrint,
    
27.                 new Font("標楷體", 11),
    
28.                 Brushes.Black,
    
29.                 new RectangleF(20, 50, w, h), //這是跟邊界有關的4個參數
    
30.                 StringFormat.GenericTypographic);
    
31. 
    
32.             //取出每一頁字數的剩餘部分
    
33.             stringToPrint = stringToPrint.Substring(charactersOnPage);
    
34.             //一直到沒有頁面可以列印為止
    
35.             e.HasMorePages = (stringToPrint.Length > 0);
    
36.         }

複製代碼

7.在ExtensionUtility裏增加一個ToChtSubstring()的擴充方法

1.         public static String ToChtSubstring(this String s, int starindex, int lenght)
   
2.         {
   
3.             byte[] linestr = System.Text.Encoding.Default.GetBytes(s);
   
4.             return System.Text.Encoding.Default.GetString(linestr, starindex, lenght);
   
5.         }

複製代碼

嫌麻煩的話可以直接下載整個專案檔案來參考看看喔

下載: 訪客無法瀏覽下載點，請先 註冊 或 登入會員

...

瀏覽完整內容，請先 註冊 或 登入會員