vocabulary 发表于 2006-4-9 22:33:00

[求助]DCL对话框中image组件里无法显示幻灯片问题?

<P>各位前辈:<BR>&nbsp;&nbsp;&nbsp; 我写了一个对话框的程序,对话框里只含有一个image图像框组件,<BR>想在调用该对话框时在image图像框里显示一个"test1.sld"幻灯片文件.<BR>该幻灯片文件我是在AutoCAD里画好图后用mslide命令来做的,应该没问<BR>题,用vslide命令可以打开来查看.但在调用对话框时image图像框组件<BR>里就是看不见"test1.sld"文件的内容,请各位大侠帮忙看看问题出在哪<BR>里?小弟先谢谢了!!!</P>
<P>//punchhole1.dcl<BR>dcl_punchhole1 : dialog {<BR>&nbsp; label = "punchhole1";<BR>&nbsp; : image {<BR>&nbsp;&nbsp;&nbsp; key = "my_punchhole1";<BR>&nbsp;&nbsp;&nbsp; height = 20;<BR>&nbsp;&nbsp;&nbsp; aspect_ratio = 1.5;<BR>&nbsp;&nbsp;&nbsp; fixed_height = true;<BR>&nbsp;&nbsp;&nbsp; fixed_width = true;<BR>&nbsp;&nbsp;&nbsp; color = -2;<BR>&nbsp; }<BR>&nbsp; ok_cancel;<BR>}</P>
<P><BR>;;调用punchhole1.dcl程序<BR>(defun c:ph ()<BR>&nbsp; (setq dcl_id (load_dialog "punchhole1.DCL"))<BR>&nbsp; (if (not (new_dialog "dcl_punchhole1" dcl_id))<BR>&nbsp;&nbsp;&nbsp; (exit)<BR>&nbsp; )&nbsp;;if<BR>&nbsp; (setq&nbsp;x1 (dimx_tile "my_punchhole1")<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;y1 (dimy_tile "my_punchhole1")<BR>&nbsp; )<BR>&nbsp; (start_dialog)<BR>&nbsp; (start_image "my_punchhole1")<BR>&nbsp; (slide_image 0 0 x1 y1 "test1")<BR>&nbsp; (end_image)<BR>&nbsp; (unload_dialog dcl_id)<BR>)</P>

citykunan 发表于 2006-4-10 10:29:00

<P>;;调用punchhole1.dcl程序<BR>(defun c:ph ()<BR>&nbsp; <BR>&nbsp; (setq dcl_id (load_dialog "punchhole1.DCL"))<BR>&nbsp; (if (not (new_dialog "dcl_punchhole1" dcl_id))<BR>&nbsp;&nbsp;&nbsp; (exit)<BR>&nbsp; ) ;if<BR>&nbsp; (setq x1 (dimx_tile "my_punchhole1")<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; y1 (dimy_tile "my_punchhole1")<BR>&nbsp; )<BR>&nbsp; <BR>&nbsp; (start_image "my_punchhole1")<BR>&nbsp; (slide_image 0 0 x1 y1 "test1")<BR>&nbsp; (end_image)<BR>&nbsp; (start_dialog)</P>
<P>&nbsp; (unload_dialog dcl_id)<BR>)<BR></P>

vocabulary 发表于 2006-4-10 20:30:00

谢谢版主的帮忙!昨天才开始学习DCL,您千万别见笑.
页: [1]
查看完整版本: [求助]DCL对话框中image组件里无法显示幻灯片问题?