建筑結(jié)構(gòu)設(shè)計(jì)軟件 P KPM 形成的配筋圖二次處理

1、建筑結(jié)構(gòu)設(shè)計(jì)軟件PKPM 形成的配筋圖二次處理收稿日期:2009209204作者簡(jiǎn)介:羅伯光(19752,男,工程師,桂林理工大學(xué)博文管理學(xué)院,廣西桂林541004李豫華(19772,男,工程師,桂林理工大學(xué)博文管理學(xué)院,廣西桂林541004羅伯光李豫華摘要:利用Visual Basic 語(yǔ)言編寫(xiě)的應(yīng)用程序,通過(guò)ActiveX Automation 技術(shù),在Windows 系統(tǒng)下對(duì)建筑結(jié)構(gòu)軟件P KPM 所形成的配筋圖在AutoCAD 中進(jìn)行二次處理,以使建筑工程設(shè)計(jì)人員結(jié)合工程的實(shí)際情況更加快速、準(zhǔn)確地繪制和修改配筋施工圖。關(guān)鍵詞:應(yīng)用程序,Visual Basic 語(yǔ)言,P KPM ,二次

2、處理,配筋圖中圖分類號(hào):TP391文獻(xiàn)標(biāo)識(shí)碼:AP KPM 系列是中國(guó)建筑科學(xué)研究院開(kāi)發(fā)的功能強(qiáng)大的以建筑結(jié)構(gòu)計(jì)算為主的建筑設(shè)計(jì)軟件,它廣泛應(yīng)用于各類工程的結(jié)構(gòu)設(shè)計(jì)計(jì)算,具有模型輸入和自動(dòng)導(dǎo)荷以及內(nèi)力計(jì)算和配筋、圖形輸出和轉(zhuǎn)化等強(qiáng)大功能,是建筑工程設(shè)計(jì)領(lǐng)域中應(yīng)用最廣泛、影響最大的著名結(jié)構(gòu)設(shè)計(jì)軟件之一。筆者長(zhǎng)期使用P KPM 結(jié)構(gòu)設(shè)計(jì)軟件進(jìn)行建筑工程結(jié)構(gòu)設(shè)計(jì),深感到P KPM 強(qiáng)大的前后處理功能,但是,由于工程的個(gè)別性、復(fù)雜性、實(shí)際性,設(shè)計(jì)人員須將P KPM 所形成的施工圖在AutoCAD 中加以修改、編輯才能作為實(shí)際的工程施工圖,這些工作中很多是繁瑣的、重復(fù)的。筆者長(zhǎng)期實(shí)踐中,利用Visual

3、 Basic 語(yǔ)言編寫(xiě)了應(yīng)用程序,通過(guò)ActiveX Automation 技術(shù),在Windows 系統(tǒng)下對(duì)P KPM 所形成的配筋圖在AutoCAD 中進(jìn)行二次處理,可以方便工程設(shè)計(jì)人員結(jié)合工程的實(shí)際情況更加快速、準(zhǔn)確地編輯配筋施工圖,從而提高工作效率。1程序介紹此程序的界面如圖1和圖2所示,提供了多種功能和工具,分別介紹如下:大部分板配筋施工圖中,板鋼筋是進(jìn)行編號(hào)處理的,這樣可為工程的預(yù)、決算以及工程施工帶來(lái)巨大的方便,在P KPM 生成的板配筋圖中,板鋼筋也可進(jìn)行編號(hào),設(shè)計(jì)人員經(jīng)常會(huì)根據(jù)實(shí)際情況對(duì)板配筋進(jìn)行鋼筋修改,增加以及刪除,這樣鋼筋編號(hào)勢(shì)必會(huì)存在空號(hào)、重號(hào)、編號(hào)不連續(xù)的情況。利用此

4、程序可查看AutoCAD 圖形中數(shù)字及空號(hào),可對(duì)板鋼筋的編號(hào)進(jìn)行重排序、重編號(hào)的操作:在程序“查看”下拉式菜單中,可查看圖形中鋼筋編號(hào)個(gè)數(shù)、重排序算法1結(jié)果、重排序算法2結(jié)果、空號(hào)個(gè)數(shù)以及顯示負(fù)筋表;按鈕“重排序1”,可使圖形中的數(shù)字編號(hào)代替前面的數(shù)字以去掉空號(hào);按鈕“重排序2”,可使圖形中的數(shù)字編號(hào)平移空號(hào)后的數(shù)字去掉空號(hào),按鈕“重編號(hào)”為按選擇目標(biāo)的順序重新修改全部數(shù)字;按鈕“插入”可在輸入編號(hào)不變,在其后面的編號(hào)全部加一指定的數(shù),從而使輸入的編號(hào)后加一串空號(hào),這在拼圖的情況下經(jīng)常用到;按鈕“負(fù)筋歸并”可將板配筋圖中負(fù)筋長(zhǎng)度按所輸入的數(shù)值的倍數(shù)取整,同時(shí)將長(zhǎng)度一樣、配筋一樣的負(fù)筋歸為一個(gè)編

5、號(hào);程序還提供了很多工具:在“工具”下拉式菜單中,有 “修改支座鋼筋標(biāo)注”“修改鋼筋號(hào)”“按號(hào)刪除鋼筋”。2程序的編制原理此應(yīng)用程序是利用Visual Basic 語(yǔ)言編寫(xiě)的,通過(guò)ActiveX Automation 技術(shù),在Windows 系統(tǒng)下對(duì)P KPM 所形成的板配筋圖的眼光來(lái)看,石油石化管線三維可視化技術(shù)可以把石油石化管道上每一點(diǎn)的所有信息,按地理坐標(biāo)加以整理,然后構(gòu)成整條管道的信息模型,通過(guò)它可以方便、快速、直觀地了解管道上任何一點(diǎn)、任何方面的信息。因此,管線三維可視化將成為管道信息化建設(shè)領(lǐng)域研究的重點(diǎn)與熱點(diǎn)。參考文獻(xiàn):1袁先勇,青鵬,周傳軍.長(zhǎng)輸管道建設(shè)探討J .石油工程建設(shè),2

6、008,34(4:56257.2李晶.數(shù)字管道技術(shù)在川渝地區(qū)的應(yīng)用J .天然氣與石油,2008,26(4:18219.3馬立平,李允.基于GIS 和SCADA 技術(shù)的油氣儲(chǔ)運(yùn)生產(chǎn)調(diào)度系統(tǒng)J .管道技術(shù)與設(shè)備,2007(3:33234.Application of the 3S technology in construction and management of petroleum chemical pipelineWANG Cheng 2w u TANG Zhang 2yingAbstract :It introduces the 3S technology ,digital oilfie

7、ld and digital pipeline ,analyzes technology supporting of the information construction of the petroleum chemical pipeline ,discusses on effect and application of the 3S technology in the information construction and management of the petroleum chemical pipeline ,so as to promote construction of Chi

8、nese petroleum pipeline information.K ey w ords :3S technology ,digital pipeline ,information ,application763第36卷第1期2010年1月山西建筑SHANXI ARCHITECTURE在AutoCAD 中進(jìn)行二次處理。1利用OL E 連接或建立AutoCAD 對(duì)象的完整代碼(未聲明的變量均在模塊中聲明為全局變量:Public Sub Init 2Cad (Dim Answer As Integer On Error Resume Next Err 2Run 2CAD =False利用OL

9、 E 連接AutoCAD Set Acad 2App =G etObject (,Autocad.Application If Err Then連接到AutoCAD 錯(cuò)誤說(shuō)明CAD 未運(yùn)行Answer =MsgBox(不能連接到AutoCAD ,(&Err.Description 2&運(yùn)行AU TOCAD 嗎?,vb Y es No If Answer =vbNo Then Err 2Run 2CAD =True :Exit Sub End If Err.ClearSet Acad 2App =CreateObject(Autocad.Application 利用OL E 建立

10、AutoCAD 對(duì)象If Err Then 建立AutoCAD 對(duì)象錯(cuò)誤說(shuō)明CAD 未正確安裝MsgBox 不能運(yùn)行AU TOCAD !&Err.Description Err 2Run 2CAD =True :End End If Err.ClearActive 2Document.New (Acad.dwt Acad 2App.Visible =True End If連接到AutoCAD 后,可設(shè)置相應(yīng)對(duì)象Set Active 2Document =Acad 2App.ActiveDocumentSet Mspace =Active 2Document.ModelS pace Se

11、t Layers 2=Active 2Document.Layers Set Ssets =Active 2Document.SelectionSets Set mUtility =Active 2Document.Utility End SubP KPM 所形成的配筋圖鋼筋編號(hào)都在同一圖層,但是負(fù)筋長(zhǎng)度的標(biāo)注值也在同一圖層,不過(guò)其字符高度與編號(hào)數(shù)字的高度不同,這樣就可以在程序中利用該方法將二者區(qū)分開(kāi)來(lái),或者利用本程序中的“修改支座鋼筋標(biāo)注”的辦法更可靠地將二者區(qū)分開(kāi)。2以下為程序中統(tǒng)計(jì)“鋼筋編號(hào)個(gè)數(shù)”代碼。Steel total (可依據(jù)情況聲明為可變數(shù)組Set Myss =Ssets.Ad

12、d (Stl 2Num 2set -+Dim G pcode (1As Integer code G pcode (0=8G pcode (1=0Dim DataValue (1As Variant value DataValue (0=支座鋼筋標(biāo)注,板底鋼筋標(biāo)注DataValue (1=TEXT Dim GropeCode As Variant ,DataCode As Variant GropeCode =G pcode DataCode =DataValue -+Myss.Select acSelectionSetAll ,GropeCode ,DataCode If Myss.Coun

13、t =0Then Myss.Delete :Exit Sub End IfFor Each AnObj In MyssIf IsNumeric (AnObj.TextString Then Index =AnObj.TextStringIf Index >Max 2Num Then Max 2Num =Index Steel 2total (Index =Steel 2total (Index +1End If NextSteel 2total (數(shù)組即為統(tǒng)計(jì)后的鋼筋編號(hào)個(gè)數(shù),此后,利用數(shù)據(jù)結(jié)構(gòu)中的排序、查找等算法進(jìn)行鋼筋編號(hào)的一系列操作和處理。3結(jié)語(yǔ)AutoCAD 的開(kāi)發(fā)技術(shù),大家較熟

14、悉的有Lisp ,基于C/C +的ADS ,ARX 等工具,Visual Basic 同樣可以進(jìn)行AutoCAD 的二次開(kāi)發(fā),不但功能相當(dāng)強(qiáng)大,而且易學(xué)易用易懂。筆者利用Visual Basic 編制的此程序處理P KPM 所形成的配筋圖,經(jīng)多個(gè)工程的實(shí)踐證明,此程序方便、適用、準(zhǔn)確無(wú)誤,可代替設(shè)計(jì)人員很多重復(fù)的繁瑣的圖形編輯工作,從而提高工作效率。同理,利用Visual Basic 語(yǔ)言可編寫(xiě)其他應(yīng)用程序用于AutoCAD 中,使得施工圖的繪制變得越來(lái)越快速、簡(jiǎn)單。參考文獻(xiàn):1王紅林,劉巖,邊保林,等.基于ActiveX 技術(shù)結(jié)構(gòu)設(shè)計(jì)軟件文檔處理方法J .工程設(shè)計(jì)CAD 與智能建筑,2001

15、(10:60263.2張國(guó)寶.AutoCAD Visual Basic 開(kāi)發(fā)技術(shù)M .北京:科學(xué)出版社,2001.3閆桂森.淺談軟件在工程設(shè)計(jì)中的應(yīng)用J .山西建筑,2008,34(4:3662367.Secondary treatment of bar arrangement dra winggenerated by architectural structure design soft w are PKPML U O Bo 2gu ang L I Yu 2hu aAbstract :The article introduces a application software written by Visual Basic.Using the software ,bar arrangement drawing generated by structure design software P KPM can be mod