如何在Form里加入图片？

GSO_library

求助大神，如何在form里加入图片？

XYX365

如下面的代碼

fprintf(pPort "FIELD align-top\n")
fprintf(pPort "THUMBNAIL align-top\n") ;圖片 *.bmp的檔名
fprintf(pPort "OPTIONS stretch\n")
fprintf(pPort "FLOC 2 10\n") ;放圖片的位置
fprintf(pPort "FSIZE 3 2\n")
fprintf(pPort "ENDFIELD\n")



圖片存放的目錄,必須查看env檔案,下面一行的設定,
也可以自行加入目錄.
set BMPPATH = . $ALLEGRO_SITE/icons $GLOBAL/icons

XYX365

XYX365 发表于 2016-1-27 07:47
如下面的代碼

fprintf(pPort "FIELD align-top\n")

補充 ALLEGRO_SITE 和 GLOBAL 的路徑

Skill > axlGetVariable("ALLEGRO_SITE")
"d:/Cadence/SPB_16.3/share/local/pcb"
Skill > axlGetVariable("GLOBAL")
"d:/Cadence/SPB_16.3/share/pcb/text"
Skill >

deargds

可以在FORM中指定BMP绝对路径或相对路径，另外也可以动态指定，见以下DEMO

1. defun( test ()
   
2. let((sDemoForm pOut fmDemo)
   
3. 
   
4.         sBmp1 = strcat(axlOSSlash(axlGetVariable("cdsroot")) "/share/pcb/text/icons/soic.bmp")
   
5.         sBmp2 = strcat(axlOSSlash(axlGetVariable("cdsroot")) "/share/pcb/text/icons/smd_discrete.bmp")
   
6.        
   
7.         sDemoForm = axlTempFile()
   
8.         pOut = outfile(sDemoForm "w")
   
9.         fprintf(pOut "FILE_TYPE=FORM_DEFN VERSION=2\n")
   
10.         fprintf(pOut "FORM AUTOGREYTEXT\n")
    
11.         fprintf(pOut "FIXED\n")
    
12.         fprintf(pOut "PORT 64 20\n")
    
13.         fprintf(pOut "HEADER \"EDA365 SKILL\"\n")
    
14.         fprintf(pOut "TILE\n")
    
15. 
    
16.         fprintf(pOut "FIELD logo1\n")
    
17.         fprintf(pOut "THUMBNAIL %s\n" sBmp1)
    
18.         fprintf(pOut "FLOC 1 1\n")
    
19.         fprintf(pOut "FSIZE 30 28\n")
    
20.         fprintf(pOut "ENDFIELD\n")
    
21.        
    
22.         fprintf(pOut "FIELD logo2\n")
    
23.         fprintf(pOut "THUMBNAIL\n")
    
24.         fprintf(pOut "FLOC 32 1\n")
    
25.         fprintf(pOut "FSIZE 30 28\n")
    
26.         fprintf(pOut "ENDFIELD\n")
    
27.        
    
28.         fprintf(pOut "ENDTILE\n")
    
29.         fprintf(pOut "ENDFORM\n")
    
30.         close(pOut)
    
31.        
    
32.         fmDemo = axlFormCreate(gensym("FPfmDemo") sDemoForm nil nil t)
    
33.         axlFormSetField(fmDemo "logo2" sBmp2)
    
34.         axlFormDisplay(fmDemo)
    
35. ))

复制代码

GSO_library

XYX365 发表于 2016-1-27 07:55
補充 ALLEGRO_SITE 和 GLOBAL 的路徑

Skill > axlGetVariable("ALLEGRO_SITE")

多谢了！

GSO_library

deargds 发表于 2016-1-27 09:13
可以在FORM中指定BMP绝对路径或相对路径，另外也可以动态指定，见以下DEMO

谢谢！！

liuanty

学习了，都是高手呀！