電力系統(tǒng)及其自動(dòng)化畢業(yè)設(shè)計(jì)（論文）微機(jī)數(shù)據(jù)采集系統(tǒng)

1、<p>　　電 子 科 技 大 學(xué)</p><p>　　畢 業(yè) 設(shè) 計(jì)（論 文）</p><p>　　論文題目：微機(jī)數(shù)據(jù)采集系統(tǒng) </p><p>　　學(xué)習(xí)中心（或辦學(xué)單位）：成都孟翔教育</p><p>　　指導(dǎo)老師： 職 稱： 講師</p><

2、;p>　　學(xué)生姓名： 學(xué) 號(hào): w121080694201003</p><p>　　專 業(yè)：電力系統(tǒng)及其自動(dòng)化</p><p>　　2013年 9月25日</p><p>　　電 子 科 技 大 學(xué)</p><p>　　畢業(yè)設(shè)計(jì)（論文）任務(wù)書(shū)</p><p>　　題目：微

3、機(jī)數(shù)據(jù)采集系統(tǒng)</p><p><b>　　任務(wù)與要求：</b></p><p>　　實(shí)現(xiàn)采集一條10kv線路的變壓器的電壓、電流、有功、無(wú)功、功率因數(shù)、電壓質(zhì)量</p><p>　　等實(shí)時(shí)數(shù)據(jù)，而且還提供了豐富的控制和管理功能，如：用電情況實(shí)時(shí)分析、線損計(jì)算、異常報(bào)警等,對(duì)于有條件的用戶還可以實(shí)現(xiàn)備用變自動(dòng)投切等功能.</p>

4、<p>　　時(shí)間： 2013 年 9 月 2 日 至 2013 年 10月 4日 共 周</p><p>　　學(xué)習(xí)中心：（或辦學(xué)單位） 成都孟翔教育</p><p>　　學(xué)生姓名： 學(xué) 號(hào)：w121080694201003</p><p>　　專業(yè)

5、： 電力系統(tǒng)及其自動(dòng)化</p><p>　　指導(dǎo)單位或教研室： </p><p>　　指導(dǎo)教師： 職 稱：講師</p><p>　　2013年 9月25日</p><p>　　畢業(yè)設(shè)計(jì)(論文)進(jìn)度計(jì)劃表</p><p>　　本表作評(píng)定學(xué)生平時(shí)成績(jī)的依據(jù)之一。</p>

6、;<p>　　電子科技大學(xué)畢業(yè)設(shè)計(jì)(論文)中期檢查記錄表</p><p>　　注:此表同學(xué)生畢業(yè)設(shè)計(jì)(論文)一起存檔</p><p><b>　　摘 要</b></p><p>　　本論文主要闡述了微機(jī)數(shù)據(jù)采集系統(tǒng)的設(shè)計(jì),建立和實(shí)施.</p><p>　　配變線路的管理一向是我們用電管理部門(mén)的重要職能，隨著

7、電子技術(shù)和信息技術(shù)的飛速發(fā)展，運(yùn)用新的技術(shù)手段來(lái)進(jìn)行配變線路的管理不僅是經(jīng)濟(jì)、可行的，而且是必須的。</p><p>　　隨著社會(huì)進(jìn)步，生產(chǎn)和生活水平的提高，不僅用電量迅速上升，而且用戶對(duì)用電質(zhì)量的要求也不斷提高，用戶的滿意度和經(jīng)濟(jì)效益成為供電企業(yè)發(fā)展的決定性因素，直接向用戶供電的配變地位也就日益突出，對(duì)其進(jìn)行科學(xué)、有效地管理成為當(dāng)前供電部門(mén)重點(diǎn)關(guān)心的問(wèn)題。</p><p>　　就技術(shù)線損

8、而言，為了確定網(wǎng)絡(luò)的供電能力，一般根據(jù)線路去年的供用電情況進(jìn)行計(jì)算分析，算出一條或多條線路的損耗或配電設(shè)備的損耗。由于多數(shù)中壓和低壓網(wǎng)絡(luò)是輻射型的，網(wǎng)絡(luò)負(fù)荷點(diǎn)的數(shù)目比較多，每個(gè)點(diǎn)的信息量很有限，一般只知道用戶的年月用電情況，沒(méi)有實(shí)時(shí)運(yùn)行參數(shù)，加之實(shí)際負(fù)荷變化較大，因此很難及時(shí)計(jì)算分析并作出調(diào)整，使配電線路處于高效運(yùn)行狀態(tài)。另外線路和用戶的無(wú)功得不到及時(shí)準(zhǔn)確的補(bǔ)償，無(wú)功電流過(guò)大，也是加大損耗的重要原因。</p><p&

9、gt;　　對(duì)于管理線損，主要是加大管理力度，采取各種措施根治形形色色的偷漏電行為。然而僅靠人為的查處是消極的、被動(dòng)的，而且還受人員素質(zhì)的制約。所以，沒(méi)有完備的監(jiān)測(cè)與控制手段就難以做到‘應(yīng)收必收、收必合理’，這已成為供電企業(yè)急待解決的一大難題。</p><p>　　對(duì)于配電網(wǎng)來(lái)說(shuō)，掌握了所屬配電變壓器的運(yùn)行情況，就可以幫助管理者了解配電網(wǎng)的狀況，及時(shí)準(zhǔn)確地掌握10KV線路當(dāng)前運(yùn)行情況，如線損、變損、負(fù)荷率、電能質(zhì)量

10、等重要運(yùn)行參數(shù)，找出線路不合理運(yùn)行的原因。</p><p>　　該系統(tǒng)結(jié)合了用電管理部門(mén)的運(yùn)行管理經(jīng)驗(yàn)和我國(guó)電力系統(tǒng)的實(shí)際狀況，具有很強(qiáng)的適應(yīng)性；</p><p>　　該系統(tǒng)的管理對(duì)象是10KV公變及專變，不僅采集變壓器下用戶的：電壓、電流、有功、無(wú)功、功率因數(shù)、電壓質(zhì)量等實(shí)時(shí)數(shù)據(jù)，而且還提供了豐富的控制和管理功能，如：用電情況實(shí)時(shí)分析、線損計(jì)算、異常報(bào)警等,對(duì)于有條件的用戶還可以實(shí)現(xiàn)備用

11、變自動(dòng)投切功能。</p><p>　　該系統(tǒng)是基于完善特性，并考慮到可擴(kuò)展性而精心設(shè)計(jì)的。具有可靠性、開(kāi)放性、安全性、可集成性、易維護(hù)性、良好的二次開(kāi)發(fā)功能和管理方便等優(yōu)秀特點(diǎn)。</p><p><b>　　Abstract</b></p><p>　　A managerment system of one 10KV line and the

12、related 20 transformers(10KV Guang-Shang line) are established to collect the real-time data such as voltage,current,active power,reactive power,power factor and voltage quality.Moreover,abundant management functions are

13、 also provided,for example,real-time analysis of power consumption( line loss,transformer loss,load rate and power quality) and abnormal warning etc,For some richer customers,they cn adopt standby power supply and the ac

14、quisition and </p><p>　　KEY WORD ： medium –voltage carrier;distribution network;monitoring system</p><p><b>　　目錄</b></p><p>　　第一章 簡(jiǎn)介……………………………………………………………………1</p>

15、<p>　　1.1 簡(jiǎn)介…………………………………………………………………1</p><p>　　1.2 開(kāi)發(fā)工具的選擇…………………………………………………………1</p><p>　　1.2.1 Delphi簡(jiǎn)介………………………………………………………1</p><p>　　1.2.2 Sybase SQL Server12簡(jiǎn)介………………

16、………………………2</p><p>　　1.2.3 C/S 簡(jiǎn)介……………………………………………………………2</p><p>　　第二章 需求分析……………………………………………………………3</p><p>　　2.1 系統(tǒng)目標(biāo)……………………………………………………………3</p><p>　　2.2 系統(tǒng)的功能要求………

17、………………………………………………3</p><p>　　2.3 系統(tǒng)的性能需求………………………………………………………3</p><p>　　2.4 系統(tǒng)的數(shù)據(jù)需求………………………………………………………3</p><p>　　2.4.1 系統(tǒng)的數(shù)據(jù)需求包括如下幾點(diǎn)：……………………………………3</p><p>　　2.4.2

18、系統(tǒng)的數(shù)據(jù)字典…………………………………………………4</p><p>　　2.5 建立系統(tǒng)的約束………………………………………………………4</p><p>　　第三章 概要設(shè)計(jì)……………………………………………………………5</p><p>　　3.1 系統(tǒng)體系結(jié)構(gòu)………………………………………………………5</p><p>　　

19、3.2 主要功能設(shè)計(jì)………………………………………………………5</p><p>　　3.2.1 主要功能模塊…………………………………………………………5</p><p>　　3.2.2 系統(tǒng)流程圖………………………………………………………5</p><p>　　3.2.3 系統(tǒng)模塊介紹………………………………………………………6</p>&l

20、t;p>　　3.3 數(shù)據(jù)庫(kù)設(shè)計(jì)……………………………………………………………6</p><p>　　3.4.1 網(wǎng)絡(luò)安全……………………………………………………………16</p><p>　　第四章 詳細(xì)設(shè)計(jì)……………………………………………………………17</p><p>　　4.1 首頁(yè)面及主要頁(yè)面設(shè)計(jì)…………………………………..……………17&l

21、t;/p><p>　　4.2 功能模塊設(shè)計(jì)………………………………………………………17</p><p>　　4.3 系統(tǒng)實(shí)現(xiàn)……………………………………………………………19</p><p>　　4.3.1 圖形編輯詳細(xì)功能及部分代碼…………………………………19</p><p>　　4.3.2 數(shù)據(jù)采集信息展示詳細(xì)功能及部分代碼………

22、………………52</p><p>　　4.3.3統(tǒng)計(jì)報(bào)表詳細(xì)功能及部分圖例………………………………………55</p><p>　　結(jié)束語(yǔ)………………………………………………………………………57</p><p>　　謝辭……………………………………………………………………………58</p><p>　　參考文獻(xiàn)……………………………………

23、……………………………59</p><p><b>　　第一章 簡(jiǎn)介</b></p><p>　　1.2.1 開(kāi)發(fā)工具Delphi　簡(jiǎn)介</p><p><b>　　Delphi 簡(jiǎn)介</b></p><p>　　“Delphi”是一種可視化編程工具，指的是開(kāi)發(fā)圖形用戶界面（GUI）的方法。讀者不

24、需要編寫(xiě)大量代碼去描述界面的外觀和位置，而只要把預(yù)先建立的對(duì)象放到屏幕上即可?！翱梢暤摹边@個(gè)名字初聽(tīng)起來(lái)可能抽象了點(diǎn)，但實(shí)際上它卻是最形象的叫法，用戶只要看到Delphi的界面就會(huì)明白，實(shí)際上無(wú)需編程，就可以完成許多編程步驟。</p><p>　　另外，在Delphi中控件的概念，在Windows中控件的身影無(wú)處不在，各種各樣的按鈕、文本框等都是控件。Delphi 把這些控件模式化，并且每個(gè)控件都有若干屬性用來(lái)控

25、制控件的外觀以及工作方法（Method）</p><p>　　Delphi的特點(diǎn)：</p><p><b>　　1．可視化編程</b></p><p>　　Delphi 自動(dòng)產(chǎn)生界面設(shè)計(jì)代碼，程序設(shè)計(jì)人員只需要編寫(xiě)實(shí)現(xiàn)程序功能的那部分代碼，從而可以大大提高程序設(shè)計(jì)的效率。</p><p>　　2．面向?qū)ο蟮某绦蛟O(shè)計(jì)&

26、lt;/p><p>　　在設(shè)計(jì)對(duì)象時(shí)，不必編寫(xiě)建立和描述每個(gè)對(duì)象的程序代碼，而是用工具畫(huà)在界面上，Delphi自動(dòng)生成對(duì)象的程序代碼并封裝起來(lái)。每個(gè)對(duì)象以圖形方式顯示在界面上，都是可視的。</p><p>　　3．結(jié)構(gòu)化程序設(shè)計(jì)語(yǔ)言</p><p>　　Delphi 是在 pascal 語(yǔ)言的基礎(chǔ)上發(fā)展起來(lái)的，具有高級(jí)程序設(shè)計(jì)語(yǔ)言的語(yǔ)句結(jié)構(gòu)，接近于自然語(yǔ)言和人類(lèi)的思維

27、發(fā)方式，其語(yǔ)句簡(jiǎn)單易懂；其編譯器支持彩色代碼，可自動(dòng)進(jìn)行語(yǔ)法錯(cuò)誤檢查，同時(shí)具有功能強(qiáng)且使用靈活的調(diào)試器和編譯器。</p><p>　　4．事件驅(qū)動(dòng)編程機(jī)制</p><p>　　Delphi 通過(guò)事件來(lái)執(zhí)行對(duì)象的操作。一個(gè)對(duì)象可能回產(chǎn)生多個(gè)事件，每個(gè)事件都可以通過(guò)一段程序來(lái)響應(yīng)。 </p><p><b>　　5．訪問(wèn)數(shù)據(jù)庫(kù)</b></

28、p><p>　　Delphi 提供開(kāi)放式數(shù)據(jù)連接（Open DataBase Connectivity），即ODBC功能，它可通過(guò)直接訪問(wèn)或建立連接的方式使用并操作后臺(tái)大型網(wǎng)絡(luò)數(shù)據(jù)庫(kù)，如Sybase SQL Server、Oracle等。</p><p>　　1.2.2 數(shù)據(jù)庫(kù)Sybase SQL Server簡(jiǎn)介</p><p>　　Sybase SQL Server

29、 12中文版，是基于客戶端/服務(wù)器模式（Client/Server模式，簡(jiǎn)稱C/S模式）的新一代大型關(guān)系型數(shù)據(jù)庫(kù)管理系統(tǒng)（DBMS）。它在電子商務(wù)、數(shù)據(jù)倉(cāng)庫(kù)和數(shù)據(jù)庫(kù)解決方案等應(yīng)用中起著重要的核心作用，為企業(yè)的數(shù)據(jù)管理提供強(qiáng)大的支持，對(duì)數(shù)據(jù)庫(kù)中的數(shù)據(jù)提供有效的管理，并采用有效的措施實(shí)現(xiàn)數(shù)據(jù)的完整性及數(shù)據(jù)安全性。</p><p>　　SQL Server2000主要的服務(wù)器組件:</p><p&g

30、t;　　(1)Sybase SQL Server數(shù)據(jù)庫(kù)引擎(Sybase SQL Server服務(wù))。</p><p>　　(2)Sybase backup Server代理程序(SQL backup Server 服務(wù))。</p><p>　　1.2.3 C/S 簡(jiǎn)介</p><p>　　C/S模式即客戶機(jī)/服務(wù)器（Client/Server）體系結(jié)構(gòu)是當(dāng)前非常

31、流行的計(jì)算機(jī)體系結(jié)構(gòu)。在這種體系結(jié)構(gòu)中，客戶機(jī)提出請(qǐng)求，服務(wù)器對(duì)客戶機(jī)的請(qǐng)求作出回應(yīng)。</p><p>　　在客戶機(jī)/服務(wù)器體系結(jié)構(gòu)中，客戶機(jī)負(fù)責(zé)管理用戶界面、接收用戶數(shù)據(jù)、處理應(yīng)用邏輯、生成數(shù)據(jù)庫(kù)服務(wù)請(qǐng)求，然后將這些請(qǐng)求發(fā)送給服務(wù)器，并且接收服務(wù)器返回的結(jié)果，最后再將這些結(jié)果按照一定的格式返回給用戶。服務(wù)器接收客戶機(jī)的請(qǐng)求，處理這些請(qǐng)求，并把處理結(jié)果返回給客戶機(jī)，這些處理結(jié)果包括訪問(wèn)數(shù)據(jù)庫(kù)的結(jié)果數(shù)據(jù)和執(zhí)行狀態(tài)例

32、如成功或失敗。</p><p>　　在典型的C/S數(shù)據(jù)庫(kù)應(yīng)用中，數(shù)據(jù)的儲(chǔ)存管理功能，是由服務(wù)器程序獨(dú)立進(jìn)行的，并且通常把那些不同的（不管是已知還是未知的）前臺(tái)應(yīng)用所不能違反的規(guī)則，在服務(wù)器程序中集中實(shí)現(xiàn)，例如訪問(wèn)者的權(quán)限，編號(hào)不準(zhǔn)重復(fù)、必須有客戶才能建立定單這樣的規(guī)則。所有這些，對(duì)于工作在前臺(tái)程序上的最終用戶，是“透明”的，他們無(wú)須過(guò)問(wèn)（通常也無(wú)法干涉）這背后的過(guò)程，就可以完成自己的一切工作。在客戶服務(wù)器架構(gòu)的應(yīng)

33、用中，前臺(tái)程序可以變的非?！笆菪　?，麻煩的事情，都交給了服務(wù)器和網(wǎng)絡(luò)。在C/S體系的下，數(shù)據(jù)庫(kù)真正變成了公共、專業(yè)化的倉(cāng)庫(kù)，受到獨(dú)立的專門(mén)管理。</p><p><b>　　第二章 需求分析</b></p><p><b>　　2.1 系統(tǒng)目標(biāo)</b></p><p>　　實(shí)現(xiàn)采集一條10kv線路的變壓器下用戶的電壓、電

34、流、有功、無(wú)功、功率因數(shù)、電壓質(zhì)量</p><p>　　等實(shí)時(shí)數(shù)據(jù)，而且還提供了豐富的控制和管理功能，如：用電情況實(shí)時(shí)分析、線損計(jì)算、異常報(bào)警等,對(duì)于有條件的用戶還可以實(shí)現(xiàn)備用變自動(dòng)投切等功能．</p><p>　　2.2 系統(tǒng)的功能要求</p><p><b>　　1、系統(tǒng)設(shè)置</b></p><p>　　對(duì)系統(tǒng)正常

35、運(yùn)作的各種參數(shù)數(shù)據(jù)進(jìn)行收集管理，使系統(tǒng)能適應(yīng)各供電局（公司）的特殊情況，實(shí)現(xiàn)的靈活管理。</p><p><b>　　2、圖型編輯</b></p><p>　　生成矢量線路結(jié)構(gòu)圖，并關(guān)聯(lián)數(shù)據(jù)。為監(jiān)控和圖檔管理提供圖形數(shù)據(jù)。</p><p><b>　　3、數(shù)據(jù)采集</b></p><p>　　通過(guò)人

36、工抄表或遠(yuǎn)程自動(dòng)抄表為系統(tǒng)提供監(jiān)測(cè)和計(jì)算數(shù)據(jù)。</p><p><b>　　4、統(tǒng)計(jì)分析</b></p><p>　　對(duì)采集數(shù)據(jù)進(jìn)行分析加工，生成報(bào)表。</p><p><b>　　5、配網(wǎng)運(yùn)行</b></p><p>　　對(duì)變壓器、線路、電能表等配電設(shè)備資產(chǎn)、運(yùn)行情況進(jìn)行管理。</p>

37、<p><b>　　6、系統(tǒng)管理</b></p><p>　　對(duì)使用本系統(tǒng)人員及功能模塊進(jìn)行管理。</p><p>　　2.3 系統(tǒng)的性能需求</p><p>　　實(shí)現(xiàn)實(shí)時(shí)采集一條10kv線路的變壓器下用戶的電壓、電流、有功、無(wú)功、功率因數(shù)、電壓質(zhì)量等數(shù)據(jù)并直觀的呈現(xiàn)在圖上.</p><p>　　2.4 系

38、統(tǒng)的數(shù)據(jù)需求</p><p>　　系統(tǒng)數(shù)據(jù)來(lái)源為DLC-2100電力數(shù)字多址載波機(jī)和電力營(yíng)銷(xiāo)數(shù)據(jù)庫(kù).</p><p>　　2.4.2 系統(tǒng)的數(shù)據(jù)字典</p><p>　　模塊定義表mkdyb, 崗位名稱bm_gwm, 崗位對(duì)應(yīng)模塊bm_gwdymk, 人員基本信息ryjbxx, 圖型臨時(shí)表txb, 永久圖形表yjtxb, 自定義圖形表 zdytx, 自定義圖形類(lèi)別

39、表 zdytxlbb, 自動(dòng)生成圖形參數(shù)表 zdsccsb, 自動(dòng)生成圖形表 zdsctxb, 線路資產(chǎn)表：DF_XLDA, Xlfdxx 線路分段信息, Pd_gdzc_byq 變壓器資產(chǎn)表, Pd_sbtz_xl 線路運(yùn)行表, 變壓器參數(shù)表pd_byq_cs, 線路參數(shù)表 pd_xl_cs, 變壓器運(yùn)行表 pd_sbtx_byq, 變電站編碼 bm_bdz, 電能表電量月記錄數(shù)據(jù)表 dnbjlsj, 線損匯總表 xshzb, 變電站

40、35kv母線平衡表 bdzmxphb, 負(fù)荷測(cè)量實(shí)時(shí)記錄數(shù)據(jù)表 fhclssjl, 供電可靠率統(tǒng)計(jì)表 gdkkl, 電壓合格率統(tǒng)計(jì)表 dyhgltj, 參考變損表 ckbsb, 功率因素分析表 glysfxb, Xtcsb系統(tǒng)參數(shù)表, Gjxxlsb告警信息歷史表, gjszb告警設(shè)置表, 用戶變損表yh_byqsh, 負(fù)荷統(tǒng)計(jì)表fhtjb.</p><p>　　2.5 建立系統(tǒng)的約束</p>&

41、lt;p>　　1、說(shuō)明：監(jiān)控畫(huà)面數(shù)據(jù)由此表提供，接受由載波機(jī)提供更新數(shù)據(jù)。</p><p>　　2、一個(gè)設(shè)備一條記錄，不論有幾只電能表。</p><p>　　3、抄不到數(shù)據(jù)應(yīng)對(duì)數(shù)字字段記錄值賦0。</p><p>　　負(fù)荷測(cè)量歷史記錄數(shù)據(jù)表 ls_fhclssjl</p><p>　　說(shuō)明：15分鐘寫(xiě)歷史記錄表一次（把數(shù)據(jù)從fhclss

42、jl中轉(zhuǎn)到ls_fhclssjl）</p><p>　　數(shù)據(jù)從fhclssjl中來(lái)（記錄數(shù)=時(shí)間/15*fhclssjl中所有行數(shù)）</p><p>　　電能表電量天記錄數(shù)據(jù)表 t_dnbjlsj</p><p>　　結(jié)構(gòu)和電能表電量月記錄數(shù)據(jù)表 dnbjlsj一樣，只是每天接受由載波機(jī)提供數(shù)據(jù)，更新一次數(shù)據(jù)。1、記錄數(shù)=電表個(gè)數(shù)2、抄不到數(shù)據(jù)應(yīng)對(duì)數(shù)字字段記錄值賦0

43、。</p><p>　　歷史電能表電量天記錄數(shù)據(jù)表 ls_t_dnbjlsj</p><p>　　說(shuō)明：結(jié)構(gòu)和電能表電量月記錄數(shù)據(jù)表 dnbjlsj一樣只是每天從t_dnbjlsj</p><p>　　轉(zhuǎn)入當(dāng)天數(shù)據(jù)。（記錄數(shù)=電表個(gè)數(shù)*天數(shù)）</p><p><b>　　第三章 概要設(shè)計(jì)</b></p>&

44、lt;p>　　3.1 系統(tǒng)體系結(jié)構(gòu)</p><p>　　3.2 主要功能設(shè)計(jì)</p><p>　　1、對(duì)系統(tǒng)正常運(yùn)作的各種參數(shù)數(shù)據(jù)進(jìn)行收集管理，使系統(tǒng)能適應(yīng)各供電局（公司）的特殊情況，實(shí)現(xiàn)的靈活管理。2、生成矢量線路結(jié)構(gòu)圖，并關(guān)聯(lián)數(shù)據(jù)。為監(jiān)控和圖檔管理提供圖形數(shù)據(jù)。3、通過(guò)人工抄表或遠(yuǎn)程自動(dòng)抄表為系統(tǒng)提供監(jiān)測(cè)和計(jì)算數(shù)據(jù)。4、對(duì)采集數(shù)據(jù)進(jìn)行分析加工，生成報(bào)表。</p>

45、<p>　　5、對(duì)變壓器、線路、電能表等配電設(shè)備資產(chǎn)、運(yùn)行情況進(jìn)行管理。6、對(duì)使用本系統(tǒng)人員及功能模塊進(jìn)行管理。</p><p>　　3.2.1 主要功能模塊</p><p>　　一、系統(tǒng)設(shè)置 二、圖型編輯 三、數(shù)據(jù)采集 四、統(tǒng)計(jì)分析 五、配網(wǎng)運(yùn)行 六、系統(tǒng)管理</p><p>　　3.2.2 系統(tǒng)流程圖</p><p>　　

46、3.2.3 系統(tǒng)模塊介紹</p><p><b>　　一、系統(tǒng)功能</b></p><p>　　用戶登錄、數(shù)據(jù)歸檔、電能表數(shù)據(jù)同步、.打印設(shè)置、系統(tǒng)參數(shù)表、告警設(shè)置</p><p><b>　　二、圖形編輯</b></p><p>　　生成接線圖、線路結(jié)構(gòu)圖、單線圖、</p><

47、;p><b>　　三、數(shù)據(jù)采集</b></p><p>　　數(shù)據(jù)采集、人工抄表、遠(yuǎn)程自動(dòng)抄表、監(jiān)控畫(huà)面庫(kù)</p><p><b>　　四、統(tǒng)計(jì)分析</b></p><p>　　統(tǒng)計(jì)分析-臺(tái)區(qū)、供電可靠率、電壓合格率、負(fù)載分析、負(fù)載統(tǒng)計(jì)、用戶變損分析、監(jiān)測(cè)變損分析、用戶線損分析、監(jiān)測(cè)線損分析、用戶參考線損比較、功率因素

48、分析、電量統(tǒng)計(jì)、運(yùn)行日?qǐng)?bào)表、運(yùn)行月報(bào)表、運(yùn)行年報(bào)表、運(yùn)行日歷史曲線、運(yùn)行月歷史曲線、運(yùn)行年歷史曲線、歷史報(bào)警故障統(tǒng)計(jì)、統(tǒng)計(jì)分析-綜合、電量明細(xì)表、線損統(tǒng)計(jì)表、線路輸入輸出匯總表、變電站母線平衡表、線損波動(dòng)曲線圖</p><p><b>　　五、配網(wǎng)運(yùn)行</b></p><p>　　設(shè)備參數(shù)管理、線路參數(shù)</p><p>　　2-變壓器

49、參數(shù)2、資產(chǎn)管理、變電站、線路、變壓器、無(wú)功補(bǔ)償設(shè)備、負(fù)荷開(kāi)關(guān)、變壓器調(diào)節(jié)裝置、有功表、無(wú)功表、TTU、運(yùn)行設(shè)備管理、運(yùn)行專用變壓器、運(yùn)行公用變壓器、運(yùn)行線路、運(yùn)行線路電能表、運(yùn)行臺(tái)區(qū)電能表、運(yùn)行變電站電能表</p><p><b>　　六、系統(tǒng)管理</b></p><p>　　人員使用信息維護(hù)、人員使用模塊維護(hù)</p><p><b

50、>　　3.3 數(shù)據(jù)庫(kù)設(shè)計(jì)</b></p><p>　　模塊定義表mkdyb</p><p>　　崗位名稱bm_gwmc</p><p>　　崗位對(duì)應(yīng)模塊bm_gwdymk</p><p>　　人員基本信息ryjbxx</p><p><b>　　圖型臨時(shí)表txb</b></

51、p><p>　　說(shuō)明：1、用于繪圖時(shí)記錄所繪圖形，存盤(pán)后把此表記錄考入永久圖形表并清空此表記錄</p><p>　　2、圖型類(lèi)型：1：直線，2：變壓器，3：電桿，4：標(biāo)記，5：開(kāi)關(guān)…</p><p>　　3、顏色：0：black,1：red,2：blue,3：green,4：white</p><p>　　4、模式：0：實(shí)線，1：虛線</p

52、><p>　　5、人員工號(hào)：主要考慮有兩臺(tái)以上機(jī)起同時(shí)畫(huà)圖時(shí)不沖突。</p><p>　　永久圖形表yjtxb</p><p>　　自定義圖形表 zdytxb</p><p>　　自定義圖形類(lèi)別表 zdytxlbb</p><p>　　自動(dòng)生成圖形參數(shù)表 zdsccsb</p><p>　　自動(dòng)生成

53、圖形表 zdsctxb</p><p>　　線路資產(chǎn)表：DF_XLDA</p><p><b>　　信息說(shuō)明：</b></p><p>　　線路性質(zhì)（XLXZ）：0-專線；1-T接。</p><p>　　線路使用類(lèi)別（XLSYLB）：1-自用；2-合用；3-公用. </p><p>　　Bm_jx

54、fs 接線方式編碼表</p><p>　　Bm_cq 產(chǎn)權(quán)編碼表</p><p>　　Bm_xlsylb 線路使用類(lèi)別編碼表</p><p>　　Xlfdxx 線路分段信息</p><p>　　Pd_gdzc_byq 變壓器資產(chǎn)表</p><p>　　Pd_sbtz_xl 線路運(yùn)行表</p><p

55、>　　變壓器參數(shù)表pd_byq_cs</p><p>　　線路參數(shù)表 pd_xl_cs</p><p>　　變壓器運(yùn)行表 pd_sbtx_byq</p><p>　　變電站編碼 bm_bdz</p><p>　　電能表電量月記錄數(shù)據(jù)表 dnbjlsj</p><p>　　說(shuō)明：只保留當(dāng)月數(shù)據(jù)。</p>

56、<p>　　電能表編號(hào):有無(wú)功分別編號(hào)</p><p>　　歷史電能表電量月記錄數(shù)據(jù)表 ls_dnbjlsj</p><p>　　說(shuō)明：每月從電能表電量月記錄數(shù)據(jù)表dnbjlsj轉(zhuǎn)入數(shù)據(jù)。</p><p>　　線損匯總表 xshzb</p><p>　　線路輸入輸出匯總表 xlsrschz</p><p>

57、;　　變電站35kv母線平衡表 bdzmxphb</p><p>　　負(fù)荷測(cè)量實(shí)時(shí)記錄數(shù)據(jù)表 fhclssjl</p><p>　　1、說(shuō)明：監(jiān)控畫(huà)面數(shù)據(jù)由此表提供，接受由載波機(jī)提供更新數(shù)據(jù)。</p><p>　　2、一個(gè)設(shè)備一條記錄，不論有幾只電能表。</p><p>　　3、抄不到數(shù)據(jù)應(yīng)對(duì)數(shù)字字段記錄值賦0。</p><

58、;p>　　負(fù)荷測(cè)量歷史記錄數(shù)據(jù)表 ls_fhclssjl</p><p>　　說(shuō)明：15分鐘寫(xiě)歷史記錄表一次（把數(shù)據(jù)從fhclssjl中轉(zhuǎn)到ls_fhclssjl）</p><p>　　數(shù)據(jù)從fhclssjl中來(lái)（記錄數(shù)=時(shí)間/15*fhclssjl中所有行數(shù)）</p><p>　　電能表電量天記錄數(shù)據(jù)表 t_dnbjlsj</p><p&

59、gt;　　結(jié)構(gòu)和電能表電量月記錄數(shù)據(jù)表 dnbjlsj一樣，只是每天接受由載波機(jī)提供數(shù)據(jù)，更新一次數(shù)據(jù)。1、記錄數(shù)=電表個(gè)數(shù)2、抄不到數(shù)據(jù)應(yīng)對(duì)數(shù)字字段記錄值賦0。</p><p>　　歷史電能表電量天記錄數(shù)據(jù)表 ls_t_dnbjlsj</p><p>　　說(shuō)明：結(jié)構(gòu)和電能表電量月記錄數(shù)據(jù)表 dnbjlsj一樣只是每天從t_dnbjlsj</p><p>　　轉(zhuǎn)入當(dāng)

60、天數(shù)據(jù)。（記錄數(shù)=電表個(gè)數(shù)*天數(shù)）</p><p>　　供電可靠率統(tǒng)計(jì)表 gdkkl</p><p>　　說(shuō)明：1、用戶供電時(shí)間=日期止-日期起</p><p>　　2、用戶供電可靠率=用戶停電時(shí)間/用戶供電時(shí)間</p><p>　　電壓合格率統(tǒng)計(jì)表 dyhgltj</p><p>　　功率因素分析表 glysfxb&

61、lt;/p><p>　　Xtcsb系統(tǒng)參數(shù)表</p><p>　　Gjxxlsb告警信息歷史表</p><p>　　gjszb告警設(shè)置表</p><p>　　負(fù)荷統(tǒng)計(jì)表fhtjb</p><p>　　創(chuàng)建Sybase SQL Server 表代碼示例:</p><p>　　CREATE TABLE

62、dbo.bm_bm</p><p>　　(code char(6) NOT NULL,</p><p>　　name char(40) NULL) ;</p><p>　　3.4.1 網(wǎng)絡(luò)安全</p><p>　　因Sybase SQL Server 服務(wù)端口號(hào)為5001，故在局域網(wǎng)上交換機(jī)設(shè)置TCP/IP只開(kāi)放此端口，</p>

63、<p>　　并在服務(wù)器及桌面系統(tǒng)windows上安裝防火墻軟件及殺毒軟件。</p><p><b>　　第四章 詳細(xì)設(shè)計(jì)</b></p><p>　　4.1 首頁(yè)面及主要頁(yè)面設(shè)計(jì)</p><p>　　4.2 功能模塊設(shè)計(jì)</p><p>　　中的樹(shù)狀列表，用鼠標(biāo)單計(jì)[+]號(hào)可展開(kāi)子數(shù)，選擇你要進(jìn)入的功能模

64、塊。</p><p>　　系統(tǒng)中大部分窗口有數(shù)據(jù)導(dǎo)航條，如下窗口：</p><p>　　第一個(gè)按鈕為轉(zhuǎn)到第一條記錄。第二個(gè)按鈕為轉(zhuǎn)到上一條記錄。第三個(gè)按鈕為轉(zhuǎn)到下一條記錄。第四個(gè)按鈕為轉(zhuǎn)到最后條記錄。第五個(gè)按鈕為添加一條記錄。第六個(gè)按鈕為刪除第一條記錄。七個(gè)按鈕為進(jìn)入編輯狀態(tài)。八個(gè)按鈕為查詢，九個(gè)按鈕為更新按鈕為更新已修改的記錄。</p><p><b>

65、　　4.3 系統(tǒng)實(shí)現(xiàn)</b></p><p>　　4.3.1 圖形編輯詳細(xì)功能及部分代碼</p><p><b>　　生成接線圖</b></p><p>　　畫(huà)圖工具欄如下定義：</p><p>　　0-線路，1-變壓器，2-變壓器（橫向），3-電桿，4-標(biāo)記，5-開(kāi)關(guān)，6-刀閘，7-避雷器，8-電抗器，

66、9-電壓互感器，10-電流互感器，11-電容，12-接地，13-熔斷器，14-電表，15-曲線</p><p>　　16-漢字，17-字體。</p><p>　　注意：圖形名稱一定要輸入。可自行定義圖寬，圖高。</p><p>　　畫(huà)線路應(yīng)先選中畫(huà)圖工具欄線路按鈕，在畫(huà)圖板中選中起始位置（按鼠標(biāo)左鍵不放）拖動(dòng)到目標(biāo)位置即可。其它圖形選中畫(huà)圖工具欄中相應(yīng)按鈕直接在畫(huà)圖

67、板中選中起始位置釋放鼠標(biāo)左鍵即可。</p><p>　　圖形均可用鼠標(biāo)拖動(dòng)。</p><p>　　刪除圖形按鼠標(biāo)右鍵。</p><p><b>　　關(guān)聯(lián)設(shè)備：</b></p><p>　　按鼠標(biāo)右鍵出現(xiàn)如下窗口。</p><p>　　點(diǎn)擊關(guān)聯(lián)設(shè)備后系統(tǒng)自動(dòng)根據(jù)圖形類(lèi)型調(diào)出變壓器，線路等設(shè)備信息窗口

68、。</p><p>　　選中你要關(guān)聯(lián)的設(shè)備然后點(diǎn)擊“關(guān)聯(lián)”按鈕即可。</p><p><b>　　代碼示例:</b></p><p>　　unit scxljgt_form10;</p><p><b>　　interface</b></p><p><b>　　u

69、ses</b></p><p>　　Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,</p><p>　　Dialogs, ImgList, ComCtrls, ToolWin, ExtCtrls, StdCtrls, Menus, Grids,</p><p

70、>　　DBGrids,printers, DBTables;</p><p><b>　　type</b></p><p>　　TForm10 = class(TForm)</p><p>　　ToolBar1: TToolBar;</p><p>　　ToolButton1: TToolButton;</p

71、><p>　　ToolButton2: TToolButton;</p><p>　　ToolButton3: TToolButton;</p><p>　　ToolButton4: TToolButton;</p><p>　　ToolButton5: TToolButton;</p><p>　　ToolButton6

72、: TToolButton;</p><p>　　ToolButton7: TToolButton;</p><p>　　ToolButton8: TToolButton;</p><p>　　ToolButton9: TToolButton;</p><p>　　ToolButton10: TToolButton;</p>&

73、lt;p>　　ToolButton11: TToolButton;</p><p>　　ToolButton12: TToolButton;</p><p>　　ToolButton13: TToolButton;</p><p>　　ToolButton14: TToolButton;</p><p>　　ToolButton15:

74、TToolButton;</p><p>　　ToolButton16: TToolButton;</p><p>　　ToolButton17: TToolButton;</p><p>　　ImageList1: TImageList;</p><p>　　ScrollBox1: TScrollBox;</p><p&

75、gt;　　Image1: TImage;</p><p>　　ComboBox1: TComboBox;</p><p>　　ToolButton19: TToolButton;</p><p>　　ComboBox2: TComboBox;</p><p>　　Label1: TLabel;</p><p>　　La

76、bel2: TLabel;</p><p>　　Edit1: TEdit;</p><p>　　Label3: TLabel;</p><p>　　UpDown1: TUpDown;</p><p>　　MainMenu1: TMainMenu;</p><p>　　F1: TMenuItem;</p>

77、<p>　　O1: TMenuItem;</p><p>　　S1: TMenuItem;</p><p>　　L1: TMenuItem;</p><p>　　E1: TMenuItem;</p><p>　　ImageList2: TImageList;</p><p>　　N1: TMenuItem;&

78、lt;/p><p>　　Label4: TLabel;</p><p>　　Label5: TLabel;</p><p>　　P1: TMenuItem;</p><p>　　N2: TMenuItem;</p><p>　　N3: TMenuItem;</p><p>　　Button1: TB

79、utton;</p><p>　　ToolButton20: TToolButton;</p><p>　　FontDialog1: TFontDialog;</p><p>　　ToolBar2: TToolBar;</p><p>　　ToolButton21: TToolButton;</p><p>　　Too

80、lButton22: TToolButton;</p><p>　　ToolButton23: TToolButton;</p><p>　　ToolButton24: TToolButton;</p><p>　　ToolButton25: TToolButton;</p><p>　　ToolButton27: TToolButton;&

81、lt;/p><p>　　ToolButton28: TToolButton;</p><p>　　ToolButton29: TToolButton;</p><p>　　ToolButton30: TToolButton;</p><p>　　ToolButton31: TToolButton;</p><p>　　P2

82、: TMenuItem;</p><p>　　BatchMove1: TBatchMove;</p><p>　　ToolButton18: TToolButton;</p><p>　　procedure FormClose(Sender: TObject; var Action: TCloseAction);</p><p>　　proc

83、edure ToolButton2Click(Sender: TObject);</p><p>　　procedure Image1MouseMove(Sender: TObject; Shift: TShiftState; X,</p><p>　　Y: Integer);</p><p>　　procedure Image1MouseDown(Sender:

84、TObject; Button: TMouseButton;</p><p>　　Shift: TShiftState; X, Y: Integer);</p><p>　　procedure Image1MouseUp(Sender: TObject; Button: TMouseButton;</p><p>　　Shift: TShiftState; X, Y

85、: Integer);</p><p>　　procedure ToolButton1Click(Sender: TObject);</p><p>　　procedure ToolButton3Click(Sender: TObject);</p><p>　　procedure ComboBox1Change(Sender: TObject);</p>

86、;<p>　　procedure ComboBox2Change(Sender: TObject);</p><p>　　procedure Edit1Change(Sender: TObject);</p><p>　　procedure ToolButton4Click(Sender: TObject);</p><p>　　procedure T

87、oolButton6Click(Sender: TObject);</p><p>　　procedure ToolButton7Click(Sender: TObject);</p><p>　　procedure ToolButton8Click(Sender: TObject);</p><p>　　procedure ToolButton16Click(Se

88、nder: TObject);</p><p>　　procedure N1Click(Sender: TObject);</p><p>　　procedure ToolButton5Click(Sender: TObject);</p><p>　　procedure ToolButton9Click(Sender: TObject);</p>&

89、lt;p>　　procedure ToolButton10Click(Sender: TObject);</p><p>　　procedure ToolButton11Click(Sender: TObject);</p><p>　　procedure ToolButton12Click(Sender: TObject);</p><p>　　proced

90、ure ToolButton13Click(Sender: TObject);</p><p>　　procedure ToolButton14Click(Sender: TObject);</p><p>　　procedure ToolButton15Click(Sender: TObject);</p><p>　　procedure ToolButton17

91、Click(Sender: TObject);</p><p>　　procedure ToolButton20Click(Sender: TObject);</p><p>　　procedure ToolButton21Click(Sender: TObject);</p><p>　　procedure ToolButton30Click(Sender: TO

92、bject);</p><p>　　procedure ToolButton28Click(Sender: TObject);</p><p>　　procedure P2Click(Sender: TObject);</p><p>　　procedure ToolButton23Click(Sender: TObject);</p><p&g

93、t;　　procedure S1Click(Sender: TObject);</p><p>　　procedure ToolButton22Click(Sender: TObject);</p><p>　　procedure O1Click(Sender: TObject);</p><p>　　procedure N3Click(Sender: TObjec

94、t);</p><p>　　procedure ToolButton27Click(Sender: TObject);</p><p>　　procedure Button1Click(Sender: TObject);</p><p>　　procedure ToolButton18Click(Sender: TObject);</p><p&

95、gt;<b>　　private</b></p><p>　　{ Private declarations }</p><p><b>　　public</b></p><p>　　{ Public declarations }</p><p><b>　　end;</b>&l

96、t;/p><p><b>　　var</b></p><p>　　Form10: TForm10;</p><p>　　ix:integer;</p><p>　　iy:integer;</p><p>　　sqx:integer; //存入數(shù)據(jù)庫(kù)中坐標(biāo)數(shù)據(jù)</p><p>

97、　　sqy:integer;</p><p>　　szx:integer;</p><p>　　szy:integer;</p><p>　　hzxx:string; //漢字信息</p><p>　　txmc:string; //圖型名稱</p><p>　　hzxxys:integer; //文本信息顏色</

98、p><p>　　hzxxsz:integer; //文本信息字體大小</p><p>　　xzqx:integer; //選中圖型坐標(biāo)</p><p>　　xzqy:integer;</p><p>　　xzzx:integer;</p><p>　　xzzy:integer;</p><p>　　

99、xzhzxx:string; //選中文本信息</p><p>　　xzhzxxys:integer; //選中文本信息顏色</p><p>　　xzhzxxsz:integer; //選中文本信息字體大小</p><p>　　xztxlx:integer; //選中圖型類(lèi)型</p><p>　　xzys:integer; //選中顏色<

100、;/p><p>　　xzms:integer; //選中模式</p><p>　　xzkd:integer; //選中寬度</p><p>　　Font1:TFont; //字體</p><p>　　sfdjzt:integer; //是否已經(jīng)選中字體</p><p>　　Drawing:bool; //是否開(kāi)始畫(huà)圖&l

101、t;/p><p>　　Origin:TPoint;</p><p>　　MovePt:TPoint; //光標(biāo)起點(diǎn)位置，當(dāng)前位置</p><p>　　xzdwy:TPoint; //選中點(diǎn)位移量</p><p>　　wyqs1:TPoint;</p><p>　　wyzz1:TPoint;</p><p

102、>　　wyqs2:TPoint;</p><p>　　wyzz2:TPoint;</p><p>　　DrawingTool:integer ; //畫(huà)？圖型</p><p>　　CurrentFile:AnsiString;</p><p>　　function DrawShape(TopLeft:TPoint;BottomRight

103、:TPoint;AMode:TPenMode):integer; //定義畫(huà)圖函數(shù)</p><p>　　function TDDrawShape(TopLeft:TPoint;BottomRight:TPoint;AMode:TPenMode):integer; //定義拖動(dòng)畫(huà)圖函數(shù)</p><p>　　function Tdxsj(TopLeft:TPoint;BottomR

104、ight:TPoint;AMode:TPenMode):integer; //寫(xiě)實(shí)時(shí)數(shù)</p><p>　　implementation</p><p>　　uses sztpdx_form9, ryjbxx_datamodule1, wbsr_form8, dktx_form11,</p><p>　　zdsc_form12 , txgl_form18, main

105、_form1, sssj_datamodule3;</p><p>　　function DrawShape(TopLeft:TPoint;BottomRight:TPoint;AMode:TPenMode):integer;</p><p><b>　　begin</b></p><p>　　Form10.Image1.Canvas.Pen.

106、Mode:=AMode;</p><p>　　case DrawingTool of</p><p><b>　　1: //直線</b></p><p><b>　　begin</b></p><p>　　Form10.Image1.Canvas.MoveTo(TopLeft.X,TopLeft

107、.y);</p><p>　　Form10.Image1.Canvas.LineTo(BottomRight.x,BottomRight.y);</p><p><b>　　end;</b></p><p><b>　　2: //變壓器</b></p><p><b>　　begin&l

108、t;/b></p><p>　　Form10.Image1.Canvas.Ellipse(TopLeft.X-12,TopLeft.y,TopLeft.X+12,TopLeft.y+24);</p><p>　　Form10.Image1.Canvas.Ellipse(TopLeft.X-12,TopLeft.y+12,TopLeft.X+12,TopLeft.y+36);</

109、p><p><b>　　end;</b></p><p><b>　　3: //電桿</b></p><p><b>　　begin</b></p><p>　　Form10.Image1.Canvas.Ellipse(TopLeft.X-3,TopLeft.y,TopLeft.X

110、+3,TopLeft.y+6);</p><p><b>　　end;</b></p><p><b>　　4: //標(biāo)記</b></p><p><b>　　begin</b></p><p>　　Form10.Image1.Canvas.Ellipse(TopLeft.X-

111、6,TopLeft.y,TopLeft.X+6,TopLeft.y+12);</p><p><b>　　end;</b></p><p><b>　　5: //開(kāi)關(guān)</b></p><p><b>　　begin</b></p><p>　　Form10.Image1.Can

112、vas.rectangle(TopLeft.X-6,TopLeft.y,TopLeft.X+6,TopLeft.y+24);</p><p><b>　　end;</b></p><p><b>　　6: //刀閘</b></p><p><b>　　begin</b></p><

113、p>　　Form10.Image1.Canvas.MoveTo(TopLeft.X,TopLeft.y);</p><p>　　Form10.Image1.Canvas.LineTo(TopLeft.X,TopLeft.y+6);</p><p>　　Form10.Image1.Canvas.MoveTo(TopLeft.X-10,TopLeft.y+6);</p>&

114、lt;p>　　Form10.Image1.Canvas.LineTo(TopLeft.X+10,TopLeft.y+6);</p><p>　　Form10.Image1.Canvas.MoveTo(TopLeft.X-10,TopLeft.y+10);</p><p>　　Form10.Image1.Canvas.LineTo(TopLeft.X,TopLeft.y+16);<

115、;/p><p>　　Form10.Image1.Canvas.MoveTo(TopLeft.X,TopLeft.y+16);</p><p>　　Form10.Image1.Canvas.LineTo(TopLeft.X,TopLeft.y+20);</p><p><b>　　end;</b></p><p><b&

116、gt;　　7: //避雷器</b></p><p><b>　　begin</b></p><p>　　Form10.Image1.Canvas.rectangle(TopLeft.X-6,TopLeft.y+4,TopLeft.X+6,TopLeft.y+28);</p><p>　　Form10.Image1.Canvas.Mo

117、veTo(TopLeft.X,TopLeft.y);</p><p>　　Form10.Image1.Canvas.LineTo(TopLeft.X,TopLeft.y+12);</p><p>　　Form10.Image1.Canvas.MoveTo(TopLeft.X,TopLeft.y+28);</p><p>　　Form10.Image1.Canvas.

118、LineTo(TopLeft.X,TopLeft.y+34);</p><p><b>　　end;</b></p><p><b>　　8: //電抗器</b></p><p><b>　　begin</b></p><p>　　Form10.Image1.Canvas.Mo

119、veTo(TopLeft.X,TopLeft.y);</p><p>　　Form10.Image1.Canvas.Arc(TopLeft.X-10,TopLeft.Y,TopLeft.X+10,TopLeft.Y+20,TopLeft.X,TopLeft.y+20,TopLeft.X-10,TopLeft.y+10);</p><p>　　Form10.Image1.Canvas.Mov

120、eTo(TopLeft.X,TopLeft.y-5);</p><p>　　Form10.Image1.Canvas.LineTo(TopLeft.X,TopLeft.y+10);</p><p>　　Form10.Image1.Canvas.MoveTo(TopLeft.X-10,TopLeft.y+10);</p><p>　　Form10.Image1.Can

121、vas.LineTo(TopLeft.X,TopLeft.y+10);</p><p>　　Form10.Image1.Canvas.MoveTo(TopLeft.X,TopLeft.y+20);</p><p>　　Form10.Image1.Canvas.LineTo(TopLeft.X,TopLeft.y+25);</p><p><b>　　end