我想把过程做成一个可修改的文件,来调用可以吗(200)

M

mos

Unregistered / Unconfirmed
GUEST, unregistred user!
请问下,我想把过程做成一个可修改的文件,来调用可以吗?因为要经常修改内容。我的过程如下:procedure TF_PrintCode.PrintCodeLabel;var firstx,Tmp_Qty,n,Copys:integer; Tmp_Hh,Tmp_Cm,Tmp_Zj,Tmp_Ys,Tmp_Txm:String;BEGINwindowsfont((n-1)*330+66, 10, 32, 0, 2, 0, 'Arial', Pchar(Tmp_Hh));windowsfont( (n-1)*318+82, 40, 24, 0, 2, 0, 'Arial', Pchar(Tmp_Cm));windowsfont( (n-1)*318+148, 40, 24, 0, 2, 0, 'Arial', Pchar(Tmp_Zj));windowsfont( (n-1)*318+248, 40, 24, 0, 2, 0, 'Arial', Pchar(Tmp_Ys)); barcode(Pchar(InttoStr((n-1)*338+20)), '75', '128', '50', '1', '0', '2', '1', Pchar(Tmp_Txm));END;
 
难,建议你用.ini文件来保存一些经常变动的参数,这样就可以通过修改ini文件来改变计算结果。
 
1、用配置文件保存可变的参数2、自己解释脚本3、写成动态库,动态加载
 
楼上说的太复杂了,就是说,要把数据和代码分离开来,数据保存为一个配置文件,代码负责读取就OK了。配置文件可以是文本文件或二进制文件,当然,简单一点的文本文件就是ini文件了,delphi有专门的操作ini文件的类,如果不会就网上搜代码
 

Similar threads

I
回复
0
查看
738
import
I
I
回复
0
查看
660
import
I
I
回复
0
查看
645
import
I
顶部 底部