pcl 学习 问题

hustzqhe

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

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

qyq187

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

原帖由 fmao1982 于 2008-4-3 09:01 发表
有个NASTRAN快速入门 不知道怎么样
据说是讲这个东西的

还是直接看Patran的PCL用户手册好点