明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1794|回复: 8

[基础] 请帮我写写可输出计算过程的代码学习学习啊

[复制链接]
发表于 2011-7-14 15:41:59 | 显示全部楼层 |阅读模式
本帖最后由 gdslqs 于 2011-7-17 14:28 编辑

如题,我想编一个小小的计算工具,然后把计算过程以计算书的形式输出(最好是以word文档输入),计算过程的参数输入最好是dcl对话框,有计算书输出的按钮。
请高手们给我这样的一个类似的程序学习一下好吗?


我举了一个简单的例子在4楼,请达人们帮帮忙


"觉得好,就打赏"
还没有人打赏,支持一下
 楼主| 发表于 2011-7-14 15:44:04 | 显示全部楼层
如果不方便发在这里也可以发我邮箱7010415@qq.com,多谢先,并承诺不随意传播,不用于商业用途!
发表于 2011-7-14 21:58:02 | 显示全部楼层
游客,本帖隐藏的内容需要发帖数高于 5 才可浏览,你当前发帖数只有 0
 楼主| 发表于 2011-7-17 14:21:02 | 显示全部楼层
本帖最后由 gdslqs 于 2011-7-17 14:22 编辑

举个简单的例子请大家帮我写下代码,我主要学习一下计算输出的过程,
比如说:
输入矩形的两个边长x、y,计算面积A=xy
要输出的计算书格式为:
一、截面
一个矩形图形(固定,可不随参数变化)
二、矩形截面参数:
矩形的长边x=??,矩形的短边y=??
三、计算结果:
矩形面积A=??
注:??为根据参数变化的部分

请各位版主大人及其他达人帮帮写一下,主要是输入word时的lisp,其实输出text也可以,就是text好像不能输出图形。小弟先在此谢谢你了!!!!!

附上我写的dcl对话框:
AAA:dialog{label="计算矩形面积";
:boxed_radio_row{
label="截面参数";
:edit_box{label="矩形宽x(mm)";key="x";edit_width=6;}
:edit_box{label="矩形高y(mm)";key="y";edit_width=6;}
                }//end boxed_radio_row
:boxed_radio_row{
label="计算结果";
:edit_box{label="矩形面积";key="a";edit_width=6;}
                }//end boxed_radio_row
:retirement_button{                  
           label = "计算";      
           key = "js";
           is_default = true;         
                  }
:retirement_button{                  
           label = "计算书";      
           key = "jss";
           is_default = true;         
                  }
ok_cancel;
}
发表于 2011-7-17 18:01:32 | 显示全部楼层
感谢z版分享,学习了!
不错喔!
发表于 2011-7-17 18:14:07 | 显示全部楼层
gdslqs 发表于 2011-7-17 14:21
举个简单的例子请大家帮我写下代码,我主要学习一下计算输出的过程,
比如说:
输入矩形的两个边长x、y,计 ...

EXCEL操作实例: http://www.atablex.com/htmls/vlxls-functions.htm
 楼主| 发表于 2011-7-17 19:12:14 | 显示全部楼层
chpmould 发表于 2011-7-17 18:14
EXCEL操作实例: http://www.atablex.com/htmls/vlxls-functions.htm

还是谢谢你的热心,虽然不是我想要的!
 楼主| 发表于 2011-7-18 14:40:48 | 显示全部楼层
期待中!!!!
主要有两点:向word写入图形和写入文字
发表于 2013-10-5 11:07:27 | 显示全部楼层
可视化的dcl对话框?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2025-5-26 11:37 , Processed in 0.185497 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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