簡單教程

1、ObjectDcl簡單入門教程簡單入門教程一.安裝、運行安裝、運行下載ObjectDcl并解壓后（或從光盤中）運行setup.exe按提示安裝程序。安裝完畢后在D:ProgramFiles3rdDaySoftwareObjectDCL（看你的programfiles在哪個盤自己確定）運行ObjectDcl.exe，我安裝時并沒有將程序鏈接加入開始菜單中，因此須找出程序，自己運行。如開始菜單中有，則可以直接運行。二.使用使用1添加模式對話

2、框添加模式對話框運行程序后，如圖1，添加模式對話框。保存文件。注意將文件存于CAD搜索路徑，或者注意用LISP調用時使用全路徑。圖12指定指定lisp文件文件指定lisp文件是指在設計過程中，將這個對話框和控制它的程序文件關聯起來，以方便設計。展開右端上方的VisualAutoLispFilename，雙擊圖標，選擇程序文件。3添加控件添加控件如圖2，點擊左端空間按鈕后，在對話框中框出控件大?。ù颂幰园粹o控件為例）。選擇控件可以拉動夾點

3、改變控件的大小，并可用鼠標拖動控件改變其位置。(if(not(member“objectdcl2004.arx“(arx)))(arxload“objectdcl2004.arx““Fileobjectdcl2004.arxwasnotfind.“))2000及2002則加載objectdcl.arx注意：須將含有objectarx2004.arx文件的路徑加到CAD的搜索路徑里面。然后加載對話框文件，就是之前保存的文件，假設為samp

4、le1.odc:(ODcl_LoadProject“sample1“)顯示對話框：(Odcl_Fm_Showsample1_DclFm1)關于加載對話框和顯示對話框的函數可以在對話框的屬性中獲得，點擊對話框，在空白處點擊，不要選中任何控件，在屬性中找到ObjectBrowser，點擊后面的按鈕，在彈出的對話框中分別找到Loadproject和show，選中后在右邊的Definition中有函數的定義和說明，找到彩色的函數定義部分，將它復

5、制到lisp程序中，根據提示修改參數。也可以點擊CopyToClipboard按鈕復制到剪切板。函數中，藍色部分表示函數名，綠色表示對象變量（控件或對話框），紅色是參數，[optional]表示可選，[as…]表示參數類型。此處的對象變量是系統(tǒng)自動命名的。它根據你存的文件名，對話框名和控件名來命名。對話框名和控件名在屬性中的name中修改。一般對話框名和文件名修改一次后就不要再變，因為對象變量是根據它們命名的。如，此例中，文件名為sam

6、ple1.odc，對話框名為DclFm1，按鈕控件名為TextButton3（注意，這里的控件名不同于它的標題，雖然它們默認時是相同的，控件名為name，標題為caption屬性），那么此對話框的變量名為sample1_DclFm1，按鈕控件變量為sample1_DclFm1_TextButton3。你也可以修改屬性中的VarName來指定變量名，不過一般不要這樣做，用系統(tǒng)自動生成的就可以了（我個人認為）。下面我們來給按鈕添加事件。在E

7、vents中選中OnClicked，點擊Addto.lspFile，然后回到VisualLisp編輯器，將會有一個提示，表示文件內容已改變，是否需要重新加載，選擇是（這里注意，添加前要先保存文件），如果不是使用Vlisp編輯器，或沒有自動探測功能，則須在添加前保存文件，添加事件后重新打開此文件，你會發(fā)現文件的末尾增加了一個函數，這個函數就是這個事件的函數。這個函數應該是這樣的：(defunc:DclFm1_TextButton3_OnC

8、licked()(Odcl_MessageBox“ToDo:codemustbeaddedtoTextButton3““Todo“))將函數中的內容刪掉，加上：(Odcl_Fm_SetTitleBarTextsample1_DclFm1“ThisisasampleofObjectDcl”)至此，你可以運行程序了，當你點擊按鈕時，對話框的標題就改為”ThisisasampleofObjectDcl”了。以下是程序文件完整清單：(defun

9、c:test()(if(not(member“objectdcl2004.arx“(arx)))(arxload“objectdcl2004.arx““Fileobjectdcl2004.arxwasnotfind.“))2000及2002則加載objectdcl.arx(ODcl_LoadProject“sample1“)個人使用經驗，次句得執(zhí)行兩次才行，就是需要再加一句一模一樣的語句在此。不知道是我的版本問題還是什么問題。(Odcl