声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1814|回复: 3

[Patran专区] pcl 学习 问题

[复制链接]
发表于 2008-4-1 17:04 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
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 */
回复
分享到:

使用道具 举报

发表于 2008-4-3 09:01 | 显示全部楼层
有个NASTRAN快速入门 不知道怎么样
据说是讲这个东西的
发表于 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
发表于 2008-4-8 14:38 | 显示全部楼层
本帖最后由 wdhd 于 2016-3-23 15:06 编辑
原帖由 fmao1982 于 2008-4-3 09:01 发表
有个NASTRAN快速入门 不知道怎么样
据说是讲这个东西的

还是直接看Patran的PCL用户手册好点
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-25 09:32 , Processed in 0.058883 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表