评论1

• 

  wangwei01

  楼主 2010/3/25 11:28:52

  1.ON_OFF_2是自定义对象，添加左键动作需要如下步骤：
  选择控件->右键->动态对话框，选择"事件"页->鼠标->对象ON_OFF_2->双击事件"按左键"
  上述步骤完成后即为该对象添加了左键动作。
  2.ON_OFF控件不是这样用的，你的脚本虽然可以控制变量切换，但ON_OFF控件并不随你的变量动态变化。具体步骤如下：
  2.1 设置ON_OFF_2的UserDefine->Toggle直接连接变量cool_or_heat
  2.2 将原鼠标动作内的代码改为如下即可（如想放到鼠标左键动作，将代码放置按左键事件内，并将鼠标动作代码删除）：
  BOOL value;
  LINKINFO plink; 
  

  
  

  PDLRTGetPropEx(0,lpszPictureName,lpszObjectName,"Toggle",VT_BOOL,&value,NULL,NULL,0,NULL,NULL);
  if(value) 
  {
    if (MessageBox(NULL, "您确定要冷热源供水为冷水模式吗?", "供水源选择", MB_YESNO | MB_ICONEXCLAMATION | MB_SETFOREGROUND|MB_SYSTEMMODAL) == IDYES) 
   value =FALSE;
  }
  else 
  {
   if (MessageBox(NULL, "您确定要冷热源供水为热水模式吗?", "供水源选择", MB_YESNO | MB_ICONEXCLAMATION | MB_SETFOREGROUND|MB_SYSTEMMODAL) == IDYES)
   value = TRUE;
  }

  
  

  PDLRTGetLink(0,lpszPictureName,lpszObjectName,"Toggle",&plink,NULL,NULL,NULL); //Rueckgabe-Typ :BOOL 

  
  

  if (plink.LinkType >2) return;
  else SetTagBit (plink.szLinkName,(short int) value);