开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 图形图像 > CAD > 查看源码
xgcsdat.dcl
资源名称：lcx.rar　[点击查看]
上传用户：cqhairun
上传日期：2017-05-24
资源大小：173k
文件大小：1k
源码类别：

CAD

开发平台：

Lisp/Scheme

xgcsdat.dcl：源码内容
  1. xgmodda_box7:dialog{
  2.  label="井位图绘制程序， 编程：杨权 [2000.9.6]";
  3.      alignment=centered;   
  4. :row{
  5. spacer_1;
  6.  :button{
  7.  label="修改井号";
  8.  key=xgjhdata;
  9.  fixed_width=true;
  10.  fixed_height=true;
  11.   width=18;
  12.  height=2;
  13.       }       
  14. :button{
  15.  label="修改座标数据";
  16.                    key=xgzbdata;
  17.  fixed_width=true;
  18.  fixed_height=true;
  19.  height=2;
  20. }
  21.      
  22. :button {
  23.  label="修改井别";
  24.   key=xgjbdat;
  25.   fixed_width=true;
  26.   fixed_height=true;
  27.  width=18;
  28.  height=2;
  29. alignment=centered;  
  30.  }
  31.  spacer_1;
  32.  } 
  33.  :row{
  34.   :button{
  35.             label="添加图例标签";
  36.  key=tjtlbq;
  37.  fixed_width=true;
  38.  fixed_height=true;
  39.  height=2;
  40.        }
  41. :button{
  42.                    label="备份图形数据";
  43.  key=bcktxda;
  44.  fixed_width=true;
  45.  fixed_height=true;
  46.  height=2;
  47.  }
  48. :button{
  49.                    label="备份座标数据";
  50.  key=bckzbda;
  51.  fixed_width=true;
  52.  fixed_height=true;
  53.  height=2;
  54.  }
  55. }
  56.   
  57.   :row{
  58. alignment=centered;  
  59. spacer_1;
  60. :button {
  61.  label="附  件";
  62.   key=tfxs;
  63.   fixed_width=true;
  64.   fixed_height=true;
  65. //  width=22;
  66.  height=2;
  67. alignment=centered;  
  68.  }
  69. //:button {
  70. //  label="帮  助";
  71. //   key=lokhlpxx;
  72. //   fixed_width=true;
  73. //   fixed_height=true;
  74. //  height=2;
  75. // alignment=centered;  
  76. //  }
  77. :button {
  78.  label="退  出";
  79.    key=yexit;
  80.    is_cancel=true;
  81.    fixed_width=true;
  82.    fixed_height=true;
  83.      height=2;
  84. alignment=centered;  
  85. }
  86. spacer_1;
  87.        }
  88. }