gfdyael 发表于 2023-8-31 17:42:14

axlFormColorize函数到底怎么用呢？

本帖最后由 gfdyael 于 2023-8-31 17:58 编辑

procedure(a()
      drain()
      form_port = outfile("select_signal.form" "w")
      fprintf(form_port "FILE_TYPE=FORM_DEFN VERSION=2\n")
      fprintf(form_port "FORM\n")
      fprintf(form_port "FIXED\n")
      fprintf(form_port "PORT 30 100\n")
      fprintf(form_port "HEADER \"1111111111\"\n")
      fprintf(form_port "\n")

      fprintf(form_port "TILE\n")

      fprintf(form_port "TEXT \"aaaaa\"\n")
      fprintf(form_port "TLOC 12 1\n")
      fprintf(form_port "ENDTEXT\n")
      fprintf(form_port "\n")

      fprintf(form_port "\n")
      fprintf(form_port "ENDTILE\n")
                  
      fprintf(form_port "\n")
      fprintf(form_port "ENDFORM\n")
      close(form_port)
      
      form_Create=axlFormCreate((gensym) "select_signal.form" nil 'form_action t t)
      
      axlFormDisplay(form_Create)
      deleteFile("select_signal.form")
      axlFormColorize(form_Create "aaaaa" 'text 'red)
)
各位，如题。我想把文本"aaaaa"弄成红色的，axlFormColorize(form_Create "aaaaa" 'text 'red)为什么不起作用？



vivienluo 发表于 2023-9-2 09:42:57

fprintf(form_port "TEXT \"aaaaa\" tttt \n");这儿改下。
      fprintf(form_port "TLOC 12 1\n")
      fprintf(form_port "ENDTEXT\n")
      fprintf(form_port "\n")

这儿改下
axlFormColorize(form_Create "tttt" 'text 'red)

gfdyael 发表于 2023-9-2 14:08:30

果然是这里，原来是需要重新定义一个tttt代表这个TEXT文本，谢谢vivienluo:D

gfdyael 发表于 2023-9-2 14:11:54

vivienluo 发表于 2023-9-2 09:42
fprintf(form_port "TEXT \"aaaaa\" tttt \n");这儿改下。
      fprintf(form_port "TLOC 12 1\n")
...

哎，看官方的PDF文档真是心累
页: [1]
查看完整版本: axlFormColorize函数到底怎么用呢？