管理者软件
专业源于专注
www. myOIT. cn   
软件交流 管理软件 软件手册 »

    

 6  1/1   1  
作者
内容
hzq0201  [个人空间]


注册  2009-08-24
发贴数  39
精华数  0
原创贴  0
来自  
状态  正常

级别  会员
#1»发布于2010-10-05 13:52

自动改变行高 
int func_cal_row_height() 

  if(strlen(res_spec)>=16) 
    row_height_add=400; 
  return 1; 
}; 
自动缩小字体 
int before_draw_obj() 

  if(to_draw_obj!='res_spec') 
    return 1; 
  if(strlen(res_spec)>=16) 
    pp_font_size=8; 
  else 
    pp_font_size=12; 
  return 1; 
}; 
限制采购数量 
int init_test() 

  return 1; 
}; 
 
int create_voucher() 

  return 1; 
}; 
 
int func_show() 

  return 1; 
}; 
 
int cell_change() 
{if(inp_num!=get_res_info(res_id,'ext_1')) 
 inp_num=get_res_info(res_id,'ext_1'); 
  //change_col,change_col_id,change_row_id 
  return 1; 
}; 
 
int obj_change() 

  //change_obj 
  return 1; 
}; 
 
int init_row() 
{if(inp_num!=get_res_info(res_id,'ext_1')) 
 inp_num=get_res_info(res_id,'ext_1'); 
 
  return 1; 
}; 
 
int adjust_row() 

  return 1; 
}; 
 
int func_before_print() 

  //can_print=1; 
  return 1; 
}; 
 
int main() 

  return 1; 
}; 
参考采购数量 
int init_test() 

  return 1; 
}; 
 
int create_voucher() 

  return 1; 
}; 
 
int func_show() 

  return 1; 
}; 
 
int cell_change() 

 vr_item_ext_1=get_res_info(res_id,'ext_1'); 
  //change_col,change_col_id,change_row_id 
  return 1; 
}; 
 
int obj_change() 

  //change_obj 
  return 1; 
}; 
 
int init_row() 
{ vr_item_ext_1=get_res_info(res_id,'ext_1'); 
 
  return 1; 
}; 
 
int adjust_row() 

  return 1; 
}; 
 
int func_before_print() 

  //can_print=1; 
  return 1; 
}; 
 
int main() 

  return 1; 
};


        于 2010-10-05 13:52 被 hzq0201 修改




思缘  [个人空间]


注册  2010-07-23
发贴数  273
精华贴  3
原创贴  0
来自  
状态  正常

级别  会员
#2»发布于2010-09-21 14:01

顶一下,希望继续汇总,以供兄弟姐妹们共享,我也提供两个.... 
 
限制打印次数 
int func_before_print() 

  //show_v_para(); 
  can_print=1; 
  if(print_process_times>=2) 
    can_print=0; 
  return 1; 
};






snxogah  [个人空间]


注册  2010-07-19
发贴数  44
精华数  0
原创贴  0
来自  
状态  正常

级别  会员
#3»发布于2010-09-21 15:21

自动行高可以在报表打印中实现吗?






snxogah  [个人空间]


注册  2010-07-19
发贴数  44
精华数  0
原创贴  0
来自  
状态  正常

级别  会员
#4»发布于2010-09-21 17:01

报表自楼主的自动行高,能不能实现只需要调整行高的就变,不需要调整的就不变高度呢?

报表格式






miwf  [个人空间]


注册  2010-08-26
发贴数  14
精华数  0
原创贴  0
来自  
状态  正常

级别  会员
#5»发布于2010-09-21 17:26

 这个要顶,希望能有更多的人分享脚本






思缘  [个人空间]


注册  2010-07-23
发贴数  273
精华贴  3
原创贴  0
来自  
状态  正常

级别  会员
#6»发布于2010-09-25 11:22

输入数量和金额,自动算出单价..... 
 
int cell_change() 

  //change_col,change_col_id,change_row_id 
float f_inp_amount,f_inp_num; 
 
  if(change_col!="inp_amount") return 1; 
  f_inp_num = inp_num; 
  f_inp_amount = inp_amount; 
  if(f_inp_num<0.01) return 1; 
  inp_price = f_inp_amount/f_inp_num; 
  inp_price = str_std_num(inp_price,2) 
  skip_event_col("inp_price");







 6  1/1   1  


登录后方可发贴


[ 电话: 0571-85462761 王先生 QQ: 124520435 加入软件QQ群 - 中国杭州 - 备案号码 浙ICP备19051128号]