逗号后读一行
是否可以在逗号后读取文本文件的行？例如：
第 1 行将有： TEST1,TOS %%script(Q = (%ObjectTopLevel): If Q>0 then appendstring ("+" & (FormatNumber(Q,3))) else appendstring (FormatNumber(Q,3 )))
但是列表框只会显示： TOS %%script(Q = (%ObjectTopLevel): If Q>0 then appendstring ("+" & (FormatNumber(Q,3))) else appendstring (FormatNumber(Q, 3)))
我当前读取文件的代码段：
(setq LC nil)(setq OpenFile (open (findfile "LabelContent.cfg")"R"))(while (setq line (read-line OpenFile)) (setq LC (cons line LC)) );while(setq LC (reverse LC))(close OpenFile)(dcl-ListBox-AddList LabelContent/Form1/ListBox1 LC)
页:
[1]