1、 放一个ilabel，其为不可视；
2、 与opc server的item连接起来；
3、 添加ilabel的onnewopcdata的事件，例如，当我们确信这个item只有1和0两种数据时，就可以写成：
procedure tform1.ilabel1newopcdata(index: integer);
begin
switch1.stat := strtoint(ilabel1.caption);
end;
4、ilabel还有一个事件procedure ilabel1beforenewopcdata(index: integer;var data: olevariant); 我们可以用来进行数据拦截或者添加系数等操作，如何灵活的应用，看你自己罗。
