如果让'ADOtable1.Fields[2].AsString'变成ADOtable1.Fields[2].AsString
如题:
我用INI配置的时候发现ADOtable1.Fields[2].AsString会多出一个引号。让我
SetNamedSubStringValue('BarCode1', ADOtable1.Fields[2].AsString);
变成了SetNamedSubStringValue('BarCode1', 'ADOtable1.Fields[2].AsString');
有什么方法把这个引号去掉,让他不认为这是个字符串?
[解决办法]
用脚本还差不多,delphi不可能,code就是code你不可能把string转换成code最多也就是解析string,然后分析按分析结果执行
[解决办法]
配置文件指定的 ADOtable1.Fields[2].AsString可以改 ObjectName : ADOTable1 ; FieldIndex : 2 ; FieldType : ftString
或者不用改,自己提取要的信息....
1、根ObjectName,FindCompoent返回象(前提是object是在form上或create指定form(也可以不是form,看你的需要));
2、依FieldIndex, FieldType:
case FieldType of
ftString:
TADOTable(Object).Fields[FieldIndex].AsString
...
end;
如果第三方解器,然更方便
[解决办法]
上面写的很全了,不过得用
TADOTable(FindComponent(ObjectName)).Fields[FieldIndex].AsString;