hustzqhe 发表于 2008-4-1 17:04

pcl 学习 问题

pcl 学习有什么好的参考资料
pcl 程序一般如何调试

pcl 对话框设计一般有哪些步骤
pcl 对话框一般如何设计，编译，调试，连接

我设计的对话框总是出不来，


#include "appforms.p"

CLASS modelpara

CLASSWIDE WIDGET main_form
CLASSWIDE WIDGET my_dbox
CLASSWIDE WIDGET apply_btn, cancel_btn
CLASSWIDE LOGICAL displayed

FUNCTION init()

REAL   y_loc
displayed = FALSE

main_form = ui_form_create(                  @
         /* callback    */"",            @
         /* x position*/FORM_X_LOC,    @
         /* y position*/FORM_Y_LOC,    @
         /* relative to */"UL",          @
         /* width       */FORM_WID_SML,@
         /* height      */0,             @
         /* label       */"Form Label",@
         /* unused      */"")

y_loc = FORM_T_MARGIN

my_dbox = ui_databox_create(                        @
         /* parent         */main_form,       @
         /* callback         */"",            @
         /* x position       */FORM_L_MARGIN,   @
         /* y position       */y_loc,         @
         /* label length   */0,               @
         /* box length       */DBOX_WID_SINGLE, @
         /* label            */"Enter a Value", @
         /* value            */"",            @
         /* label above      */TRUE,            @
         /* datatype         */"REAL",          @
         /* number of values */1)

y_loc += DBOX_HGT_LABOVE + INTER_WIDGET_SPACE

apply_btn = ui_button_create(                     @
         /* parent   */main_form,         @
         /* callback   */"apply_btn_cb",      @
         /* x position */BUTTON_THIRD_X_LOC1, @
         /* y position */y_loc,               @
         /* width      */BUTTON_WID_THIRD,    @
         /* height   */0,                   @
         /* label      */"Apply",             @
         /* unused   */TRUE,                @
         /* highlight*/TRUE)
cancel_btn = ui_button_create(                  @
         /* parent   */main_form,         @
         /* callback   */"cancel_btn_cb",   @
         /* x position */BUTTON_THIRD_X_LOC3, @
         /* y position */y_loc,               @
         /* width      */BUTTON_WID_THIRD,    @
         /* height   */0,                   @
         /* label      */"Cancel",            @
         /* unused   */TRUE,                @
         /* highlight*/FALSE)

y_loc += BUTTON_DEFAULT_HGT + FORM_B_MARGIN

ui_wid_set(main_form,"HEIGHT",y_loc)

END FUNCTION /* init */



FUNCTION display()

        ui_form_display( "modelpara" )

END FUNCTION /* display */


FUNCTION refresh()

END FUNCTION /* refresh */



FUNCTION apply_btn_cb()

END FUNCTION /* apply_btn_cb */



FUNCTION cancel_btn_cb()

ui_form_hide("modelpara")

END FUNCTION /* cancel_btn_cb */

END CLASS /* modelpara */

fmao1982 发表于 2008-4-3 09:01

有个NASTRAN快速入门 不知道怎么样
据说是讲这个东西的

qyq187 发表于 2008-4-6 02:23

delete face4.cpp
cpp -iD:/MSC.Software/MSC.Patran/2005/customization face4.pcl face4.cpp
这个是把face4.pcl 编译成face4.cpp
注意D:/MSC.Software/MSC.Patran/2005/customization这个是#include "appforms.p"的路径,face4.pcl前面是空格,face4.pcl和face4.cpp都是当前的路径下。后面那个face4.cpp就可以直接!!input face4.cpp最后别忘了ui_exec_function( "modelpara", "display" )
"modelpara"就是你的class名~:handshake

tammy 发表于 2008-4-8 14:38

本帖最后由 wdhd 于 2016-3-23 15:06 编辑

原帖由 fmao1982 于 2008-4-3 09:01 发表
有个NASTRAN快速入门 不知道怎么样
据说是讲这个东西的
还是直接看Patran的PCL用户手册好点
页: [1]
查看完整版本: pcl 学习 问题