标签初始化

wangjia

if(ObjectFind(LableName) == -1)
         {
          ObjectCreate(LableName, OBJ_LABEL, 0, 0, 0);
          ObjectSetText(LableName, LableDoc, DocSize, DocStyle, DocColor);
          ObjectSet(LableName, OBJPROP_CORNER, Corner);
          ObjectSet(LableName, OBJPROP_XDISTANCE, LableX);
          ObjectSet(LableName, OBJPROP_YDISTANCE, LableY);
         }复制代码