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 : ¸Þ½ÃÁö Ç¥½ÃÇÔ |
|
|
|