Help.02

DCLÀÇ image(image_button) tile¿¡ bitmap image¸¦ Ç¥½ÃÇÏ´Â ÇÔ¼ö

 

 DCL¿¡ Bitmap Image Ãâ·Â

»ç¿ë¹ý : (BitmapToDCL KeyName ImageFile BitmapWidth BitmapHeight ColorFlag ViewFlag MessageFlag)

¸Å°³ º¯¼ö

¼³   ¸í

Ÿ  ÀÔ

 KeyName

 DCL¿¡¼­ Á¤ÀÇµÈ image ¶Ç´Â image_button tileÀÇ key name

 String

 ImageFile

 Ç¥½ÃÇÒ À̹ÌÁö ÆÄÀÏ À̸§

 String

 BitmapWidth

 À̹ÌÁö ÆÄÀÏÀÇ °¡·Î Çȼ¿ ¼ö

 Integer

 BitmapHeight

 À̹ÌÁö ÆÄÀÏÀÇ ¼¼·Î Çȼ¿ ¼ö

 Integer

 ColorFlag

 DCL¿¡ Ç¥½ÃÇÏÁö ¾ÊÀ» color ¹øÈ£(0~256)

 Integer

 ViewFlag

 DCL¿¡ Ç¥½Ã ¹æ¹ý(0~1)

 Integer

 MessageFlag

 Á¸ÀçÇÏÁö ¾Ê´Â Color ¸Þ¼¼Áö Ç¥½Ã ¿©ºÎ(0~1)

 Integer

 

1. ¿¹Á¦ ÇÁ·Î±×·¥ DCL°ú LISP

 

 

 

 // TestDCL01.dcl

 Test_DCL : dialog

 { label = " Bitmap DCL";

   : image {

             key = "test_image";

             width  = 49.2;

             height = 12.4;

             color  = 0;

           }

   ok_only;

 }

 

 

 ;; TestDCL01.lsp

 (defun C:TL()

      (setq dcl_id (load_dialog "C:/BitmapToDCL/TestDCL01.dcl"))

      (if (not (new_dialog "Test_DCL" dcl_id)) (exit))

      (if (= BitmapToDCL nil)

          (load "C:/BitmapToDCL/BitmapToDCL.lsp")

      )

      (BitmapToDCL "test_image" "C:/BitmapToDCL/Index.bmp" 344 148 0 0 1)

      (setq dialog-state (start_dialog))

      (done_dialog)

      (unload_dialog dcl_id)

      (princ)

 )

 

 

 

2. ¸Å°³ º¯¼ö

1) KeyName : DCL¿¡¼­ Á¤ÀÇµÈ image tile ¶Ç´Â image_button tileÀÇ key name

 

2) ImageFile : Ç¥½ÃÇÒ À̹ÌÁö ÆÄÀÏ À̸§

 

3) BitmapWidth : Ç¥½ÃÇÒ À̹ÌÁö ÆÄÀÏÀ» °¡·Î Pixel ¼ö

 

4) BitmapHeight : Ç¥½ÃÇÒ À̹ÌÁö ÆÄÀÏÀ» ¼¼·Î Pixel ¼ö

 

5) ColorFlag : À̹ÌÁö Ãâ·Â½Ã Ç¥½ÃÇÏÁö ¾ÊÀ» 0~256 »çÀÌÀÇ Color ¹øÈ£·Î ƯÁ¤ Color°¡ À̹ÌÁöÀÇ ´ëºÎºÐÀ» ÀÌ·ç°í

                 ÀÖÀ»¶§ À̸¦ ÁöÁ¤Çϸé Ç¥½Ã½Ã°£À» ´ÜÃàÇÒ ¼ö ÀÖ´Ù.

                 ¸ðµç Color¸¦ Ç¥½ÃÇÏ°í ½ÍÀ» ¶§´Â 256À» ÁöÁ¤ÇÏ¸é µÇ¸ç, ƯÁ¤ Color¸¦ ÁöÁ¤ÇÒ °æ¿ì ´ëÈ­ »óÀÚÀÇ

                 À̹ÌÁö ¹è°æ Color¸¦ ÁÖÀÇÇؼ­ ÁöÁ¤ÇؾßÇÑ´Ù.

 256 : Àüü Color Ç¥½Ã

 

 0 : °ËÁ¤ Color Ç¥½Ã »ý·«

 À̹ÌÁö¿¡¼­ °ËÁ¤»öÀ» »ý·«ÇÏ°í DCL¿¡¼­ Color=3; ÁöÁ¤

 0 : °ËÁ¤ Color Ç¥½Ã »ý·«

 À̹ÌÁö¿¡¼­ °ËÁ¤»öÀ» »ý·«ÇÏ°í DCL¿¡¼­ Color=-15; ÁöÁ¤

 0 : °ËÁ¤ Color Ç¥½Ã »ý·«

 À̹ÌÁö¿¡¼­ °ËÁ¤»öÀ» »ý·«ÇÏ°í DCL¿¡¼­ Color=0; ÁöÁ¤

 

 

6) ViewFlag : DCL¿¡ À̹ÌÁö Ç¥½Ã ¹æ¹ý °áÁ¤

 0 : Àüü À̹ÌÁö¸¦ Ç¥½Ã

 À̹ÌÁö°¡ Å« °æ¿ì BitmapÀÇ Á¤º¸¸¦ ÀоîµéÀ̴µ¥ ½Ã°£ÀÌ

 °É·Á AutoCAD°¡ ¸ØÃ纸ÀÏ ¼ö ÀÖÀ¸¹Ç·Î À̹ÌÁö°¡ ÀÛÀº

 °æ¿ì ÁöÁ¤ÇÏ´Â °ÍÀÌ ÁÁ´Ù.

 1 : ÇÑÁÙ¾¿ À̹ÌÁö¸¦ Ç¥½Ã

 Å« À̹ÌÁö Ç¥½ÃÇÒ ¶§ AutoCAD°¡ ¸ØÃ纸ÀÌ´Â Çö»óÀ» ¾ø¾Ù

 ¼ö ÀÖÀ¸³ª Ç¥½Ã ½Ã°£Àº 0À» ÁöÁ¤ÇßÀ»¶§ º¸´Ù Á¶±Ý ´õ °É

 ¸®´Â ´ÜÁ¡ÀÌ ÀÖ´Ù.

 

 

7) MessageFlag : Á¸ÀçÇÏÁö ¾Ê´Â Color ¸Þ¼¼Áö Ç¥½Ã ¿©ºÎ

 0 : ¸Þ½ÃÁö Ç¥½Ã ¾ÈÇÔ

 1 : ¸Þ½ÃÁö Ç¥½ÃÇÔ