main.pas

Delphi 控件源码

 patient_hbz:=IWDBEdit9.Text;
 patient_hbz_jg:=IWDBEdit9.Text;
 patient_gxz:=IWDBEdit9.Text;
 patient_gxz_bs:=IWDBEdit9.Text;
 patient_gxz_jg:=IWDBEdit9.Text;
 patient_gxb:=IWDBEdit9.Text;
 patient_xjt:=IWDBEdit9.Text;
 patient_xjt_bs:=IWDBEdit9.Text;
 patient_xjgs:=IWDBEdit9.Text;
 patient_xjgs_bs:=IWDBEdit9.Text;
 patient_jxxjgs_bs:=IWDBEdit9.Text;
 patient_jxxjgs_ami_lx:=IWDBEdit9.Text;
 patient_jxxjgs_ami_bw:=IWDBEdit9.Text;
 patient_xjgs_zl:=IWDBEdit9.Text;
 patient_xjgs_rszl:=IWDBEdit9.Text;
 patient_xjgs_rszl_kt:=IWDBEdit9.Text;
 patient_xjgs_zl_jrzl:=IWDBEdit9.Text;
 patient_xjgs_zl_gyxg:=IWDBEdit9.Text;
 patient_xjgs_zl_dqzl_CABG:=IWDBEdit9.Text;
 patient_xjgs_zl_dqxg:=IWDBEdit9.Text;
 patient_xlsjs:=IWDBEdit9.Text;
 patient_xlsjs_bs:=IWDBEdit9.Text;
 patient_xlsc:=IWDBEdit9.Text;
 patient_xlsc_dx:=IWDBEdit9.Text;
 patient_xlsc_xdgs:=IWDBEdit9.Text;
 patient_xlsc_fscdzz:=IWDBEdit9.Text;
 patient_xlsc_szzs:=IWDBEdit9.Text;
 patient_xlsc_qt:=IWDBEdit9.Text;
 patient_qtxxgbs:=IWDBEdit9.Text;
 patient_qtxxgbs_fl:=IWDBEdit9.Text;
 patient_wzxgbs:=IWDBEdit9.Text;
 patient_lxgbs:=IWDBEdit9.Text;
 patient_qtxtbs:=IWDBEdit9.Text;
 patient_qtxtbs_bsmc:=IWDBEdit9.Text;
 patient_qtxtbs_bs:=IWDBEdit9.Text;
 patient_jzgxb:=IWDBEdit9.Text;
 patient_zl_rszlyw:=IWDBEdit9.Text;
 patient_xlscb_zb:=IWDBEdit9.Text;
 patient_xjgs_zl_gyfs:=IWDBEdit9.Text;
 patient_xjgs_zl_zjlx:=IWDBEdit9.Text;
 medica_mtlrjl:=IWDBEdit9.Text;
 medica_pdpljl:=IWDBEdit9.Text;
 medica_xfttjl:=IWDBEdit9.Text;
 medica_aspljl:=IWDBEdit9.Text;
 medica_qt_mc1:=IWDBEdit9.Text;
 medica_qt_jl1:=IWDBEdit9.Text;
 medica_qt_mc2:=IWDBEdit9.Text;
 medica_qt_jl2:=IWDBEdit9.Text;
 medica_cjywsx:=IWDBEdit9.Text;
 medica_mtlrjl_qpjxl:=IWDBEdit9.Text;
 medica_mtlrjl_hpjxl:=IWDBEdit9.Text;
 medica_pdpljl_qACEsp:=IWDBEdit9.Text;
 medica_pdpljl_hACEsp:=IWDBEdit9.Text;
 medica_xfttjl_qLDLCsp:=IWDBEdit9.Text;
 medica_xfttjl_hLDLCsp:=IWDBEdit9.Text;
 medica_aspljl_qIPA:=IWDBEdit9.Text;
 medica_aspljl_hIPA:=IWDBEdit9.Text;
 labora_jcrq:=IWDBEdit9.Text;
 labora_jclx:=IWDBEdit9.Text;
 labora_xcg:=IWDBEdit9.Text;
 labora_lsjsjmCPK:=IWDBEdit9.Text;
 labora_lsjsjmMB:=IWDBEdit9.Text;
 labora_rstqmLDH:=IWDBEdit9.Text;
 labora_qdstqmCKMB:=IWDBEdit9.Text;
 labora_jgCRE:=IWDBEdit9.Text;
 labora_lsdBUN:=IWDBEdit9.Text;
 labora_xqptt:=IWDBEdit9.Text;
 labora_lsUA:=IWDBEdit9.Text;
 labora_gyszTG:=IWDBEdit9.Text;
 labora_gmdzdbHDL_C:=IWDBEdit9.Text;
 labora_zdgcTCH:=IWDBEdit9.Text;
 labora_dmdzdbLDL_C:=IWDBEdit9.Text;
 labora_zzdbA1:=IWDBEdit9.Text;
 labora_zzdbB:=IWDBEdit9.Text;
 labora_jK:=IWDBEdit9.Text;
 labora_nNA:=IWDBEdit9.Text;
 labora_lCL:=IWDBEdit9.Text;
 labora_gCA:=IWDBEdit9.Text;
 labora_jx_ycQb:=IWDBEdit9.Text;
 labora_jx_STdzdyd:=IWDBEdit9.Text;
 labora_jx_STdzdyd_fx:=IWDBEdit9.Text;
 labora_jx_STdzdtg:=IWDBEdit9.Text;
 labora_jx_STdzdtg_fx:=IWDBEdit9.Text;
 labora_jx_Tbyc:=IWDBEdit9.Text;
 labora_jx_xlsc:=IWDBEdit9.Text;
 labora_gzdmfz_1jd:=IWDBEdit9.Text;
 labora_gzdmfz_1gqxz:=IWDBEdit9.Text;
 labora_gzdmfz_1ghjf:=IWDBEdit9.Text;
 labora_gzdmfz_2jd:=IWDBEdit9.Text;
 labora_gzdmfz_2gqxz:=IWDBEdit9.Text;
 labora_gzdmfz_2ghjf:=IWDBEdit9.Text;
 labora_gzdmfz_3jd:=IWDBEdit9.Text;
 labora_gzdmfz_3gqxz:=IWDBEdit9.Text;
 labora_gzdmfz_3ghjf:=IWDBEdit9.Text;
 labora_gzdmfz_4jd:=IWDBEdit9.Text;
 labora_gzdmfz_4gqxz:=IWDBEdit9.Text;
 labora_gzdmfz_4ghjf:=IWDBEdit9.Text;
 labora_gzdmfz_5jd:=IWDBEdit9.Text;
 labora_gzdmfz_5gqxz:=IWDBEdit9.Text;
 labora_gzdmfz_5ghjf:=IWDBEdit9.Text;
 labora_gzdmfz_6jd:=IWDBEdit9.Text;
 labora_gzdmfz_6gqxz:=IWDBEdit9.Text;
 labora_gzdmfz_6ghjf:=IWDBEdit9.Text;
 labora_gzdmzyjg_1jd:=IWDBEdit9.Text;
 labora_gzdmzyjg_1gqxz:=IWDBEdit9.Text;
 labora_gzdmzyjg_2jd:=IWDBEdit9.Text;
 labora_gzdmzyjg_2gqxz:=IWDBEdit9.Text;
 labora_gzdmzyjg_3jd:=IWDBEdit9.Text;
 labora_gzdmzyjg_3gqxz:=IWDBEdit9.Text;
 labora_gzdmzyjg_4jd:=IWDBEdit9.Text;
 labora_gzdmzyjg_4gqxz:=IWDBEdit9.Text;
 labora_gzdmzyjg_5jd:=IWDBEdit9.Text;
 labora_gzdmzyjg_5gqxz:=IWDBEdit9.Text;
 labora_gzdmzyjg_6jd:=IWDBEdit9.Text;
 labora_gzdmzyjg_6gqxz:=IWDBEdit9.Text;
 labora_gmjrzl:=IWDBEdit9.Text;
 labora_gmjrzl_1bw:=IWDBEdit9.Text;
 labora_gmjrzl_1fs:=IWDBEdit9.Text;
 labora_gmjrzl_2bw:=IWDBEdit9.Text;
 labora_gmjrzl_2fs:=IWDBEdit9.Text;
 labora_gmjrzl_3bw:=IWDBEdit9.Text;
 labora_gmjrzl_3fs:=IWDBEdit9.Text;
 labora_gmjrzl_4bw:=IWDBEdit9.Text;
 labora_gmjrzl_4fs:=IWDBEdit9.Text;
 labora_jdmcsjc:=IWDBEdit9.Text;
 labora_yjdm_lm_zchd:=IWDBEdit9.Text;
 labora_yjdm_lm_zdhd:=IWDBEdit9.Text;
 labora_yjdm_fx:=IWDBEdit9.Text;
 labora_yjdm_dmjyd:=IWDBEdit9.Text;
 labora_zjdm_lm_zchd:=IWDBEdit9.Text;
 labora_zjdm_lm_zdhd:=IWDBEdit9.Text;
 labora_zjdm_fx:=IWDBEdit9.Text;
 labora_zjdm_dmjyd:=IWDBEdit9.Text;
 labora_jdmbkjf:=IWDBEdit9.Text;
 labora_xcg_bxbjs:=IWDBEdit9.Text;
 labora_xcg_hxbjs:=IWDBEdit9.Text;
 labora_xcg_xhdbnd:=IWDBEdit9.Text;
 labora_xcg_xxbjs:=IWDBEdit9.Text;
 labora_jgdbI:=IWDBEdit9.Text;
 labora_zdjql:=IWDBEdit9.Text;
 labora_fz_ycQb:=IWDBEdit9.Text;
 labora_fz_STdzdyd:=IWDBEdit9.Text;
 labora_fz_STdzdyd_fx:=IWDBEdit9.Text;
 labora_fz_STdzdtg:=IWDBEdit9.Text;
 labora_fz_STdzdtg_fx:=IWDBEdit9.Text;
 labora_fz_Tbyc:=IWDBEdit9.Text;
 labora_fz_xlsc:=IWDBEdit9.Text;

  FFDatamodule.updateMain.Close;
  FFDatamodule.updateMain.SQL.Clear;
  mysql:= 'UPDATE patient_info ';
  mysql:=mysql+'SET patient_xys_z=''+ patient_xys_z+'',patient_xys_n=''+patient_xys_n+''';
  mysql:=mysql+'patient_xys_jy_n=''+ patient_xys_jy_n+'',patient_gxy=''+patient_gxy+''';
  mysql:=mysql+'patient_gxy_bs=''+patient_gxy_bs+'',patient_tlb_bs=''+patient_tlb_bs+''';
  mysql:=mysql+'patient_lxgbs_bs=''+patient_lxgbs_bs+'',patient_jzgxb_fbnl=''+patient_jzgxb_fbnl+''';
  mysql:=mysql+'patient_yjs_jjnl=''+patient_yjs_jjnl+'',patient_yjs_bjr=''+patient_yjs_bjr+''';
  mysql:=mysql+'patient_yjs_bjz=''+patient_yjs_bjz+'',patient_yjs_hjr=''+patient_yjs_hjr+''';
  mysql:=mysql+'patient_yjs_hjz=''+patient_yjs_hjz+'',patient_yjs_pjr=''+patient_yjs_pjr+''';
  mysql:=mysql+'patient_yjs_pjz=''+patient_yjs_pjz+'',patient_bl_id=''+patient_bl_id+''';
  mysql:=mysql+'patient_brxl=''+patient_brxl+'',patient_rxsj=''+patient_rxsj+''';
  mysql:=mysql+'patient_xm='''+patient_xm+''',patient_xb='''+patient_xb+''',patient_csrq='''+patient_csrq+''',';
  mysql:=mysql+'patient_zy='''+patient_zy+''',patient_gzdw='''+patient_gzdw+''',patient_lxdh=='''+patient_lxdh+''',';
  mysql:=mysql+'patient_jtzz='''+patient_jtzz+''',patient_whcd='''+patient_whcd+''',patient_zyh='''+patient_zyh+''',';
  mysql:=mysql+'patient_sg='''+patient_sg+''',patient_tz='''+patient_tz+''',patient_tzzs='''+patient_tzzs+''',';
  mysql:=mysql+'patient_yw='''+patient_yw+''',patient_tw='''+patient_tw+''',patient_ytb='''+patient_ytb+''',';
  mysql:=mysql+'patient_xy='''+patient_xy+''',patient_xl='''+patient_xl+''',patient_xlzt='''+patient_xlzt+''',';
  mysql:=mysql+'patient_xys='''+patient_xys+''',patient_yjs='''+patient_yjs+''',patient_yjs_jjn='''+patient_yjs_jjn+''',';
  mysql:=mysql+'patient_gxy_zlq_zh='''+patient_gxy_zlq_zh+''',patient_gxy_zlq='''+patient_gxy_zlq+''',';
  mysql:=mysql+'patient_gxy_wcz='''+patient_gxy_wcz+''',patient_gxy_wcz_beg='''+patient_gxy_wcz_beg+''',';
  mysql:=mysql+'patient_gxy_wcz_end='''+patient_gxy_wcz_end+''',patient_tlb='''+patient_tlb+''',';
  mysql:=mysql+'patient_tlb_fx='''+patient_tlb_fx+''',patient_hbz='''+patient_hbz+''',patient_hbz_jg='''+patient_hbz_jg+''',';
  mysql:=mysql+'patient_gxz='''+patient_gxz+''',patient_gxz_bs='''+patient_gxz_bs+''',patient_gxz_jg='''+patient_gxz_jg+''',';
  mysql:=mysql+'patient_gxb='''+patient_gxb+''',patient_xjt='''+patient_xjt+''',patient_xjt_bs='''+patient_xjt_bs+''',';
  mysql:=mysql+'patient_xjgs='''+patient_xjgs+''',patient_xjgs_bs='''+patient_xjgs_bs+''',patient_jxxjgs_bs='''+patient_jxxjgs_bs+''',';
  mysql:=mysql+'patient_jxxjgs_ami_lx='''+patient_jxxjgs_ami_lx+''',patient_jxxjgs_ami_bw='''+patient_jxxjgs_ami_bw+''',';
  mysql:=mysql+'patient_xjgs_zl='''+patient_xjgs_zl+''',patient_xjgs_rszl='''+patient_xjgs_rszl+''',';
  mysql:=mysql+'patient_xjgs_rszl_kt='''+patient_xjgs_rszl_kt+''',patient_xjgs_zl_jrzl='''+patient_xjgs_zl_jrzl+''',';
  mysql:=mysql+'patient_xjgs_zl_gyxg='''+patient_xjgs_zl_gyxg+''',patient_xjgs_zl_dqzl_CABG='''+patient_xjgs_zl_dqzl_CABG+''',';
  mysql:=mysql+'patient_xjgs_zl_dqxg='''+patient_xjgs_zl_dqxg+''',patient_xlsjs='''+patient_xlsjs+''',';
  mysql:=mysql+'patient_xlsjs_bs='''+patient_xlsjs_bs+''',patient_xlsc='''+patient_xlsc+''',patient_xlsc_dx='''+patient_xlsc_dx+''',';
  mysql:=mysql+'patient_xlsc_xdgs='''+patient_xlsc_xdgs+''',patient_xlsc_fscdzz='''+patient_xlsc_fscdzz+''',';
  mysql:=mysql+'patient_xlsc_szzs='''+patient_xlsc_szzs+''',patient_xlsc_qt='''+patient_xlsc_qt+''',';
  mysql:=mysql+'patient_qtxxgbs='''+patient_qtxxgbs+''',patient_qtxxgbs_fl='''+patient_qtxxgbs_fl+''',';
  mysql:=mysql+'patient_wzxgbs='''+patient_wzxgbs+''',patient_lxgbs='''+patient_lxgbs+''',patient_qtxtbs='''+patient_qtxtbs+''',';
  mysql:=mysql+'patient_qtxtbs_bsmc='''+patient_qtxtbs_bsmc+''',patient_qtxtbs_bs='''+patient_qtxtbs_bs+''',';
  mysql:=mysql+'patient_jzgxb='''+patient_jzgxb+''',patient_zl_rszlyw='''+patient_zl_rszlyw+''',';
  mysql:=mysql+'patient_xlscb_zb='''+patient_xlscb_zb+''',patient_xjgs_zl_gyfs='''+patient_xjgs_zl_gyfs+''',';
  mysql:=mysql+'patient_xjgs_zl_zjlx='''+patient_xjgs_zl_zjlx+''',medica_mtlrjl='''+medica_mtlrjl+''',';
  mysql:=mysql+'medica_pdpljl='''+medica_pdpljl+''',medica_xfttjl='''+medica_xfttjl+''',medica_aspljl='''+medica_aspljl+''',';
  mysql:=mysql+'medica_qt_mc1='''+medica_qt_mc1+''',medica_qt_jl1='''+medica_qt_jl1+''',medica_qt_mc2='''+medica_qt_mc2+''',';
  mysql:=mysql+'medica_qt_jl2='''+medica_qt_jl2+''',medica_cjywsx='''+medica_cjywsx+''',medica_mtlrjl_qpjxl='''+medica_mtlrjl_qpjxl+''',';
  mysql:=mysql+'medica_mtlrjl_hpjxl='''+medica_mtlrjl_hpjxl+''',medica_pdpljl_qACEsp='''+medica_pdpljl_qACEsp+''',';
  mysql:=mysql+'medica_pdpljl_hACEsp='''+medica_pdpljl_hACEsp+''',medica_xfttjl_qLDLCsp='''+medica_xfttjl_qLDLCsp+''',';
  mysql:=mysql+'medica_xfttjl_hLDLCsp='''+medica_xfttjl_hLDLCsp+''',medica_aspljl_qIPA='''+medica_aspljl_qIPA+''',';
  mysql:=mysql+'medica_aspljl_hIPA='''+medica_aspljl_hIPA+''',labora_jcrq='''+labora_jcrq+labora_jcrq+''',';
  mysql:=mysql+'labora_jclx='''+labora_jclx+''',labora_xcg='''+labora_xcg+''',labora_lsjsjmCPK='''+labora_lsjsjmCPK+''',';
  mysql:=mysql+'labora_lsjsjmMB='''+labora_lsjsjmMB+''',labora_rstqmLDH='''+labora_rstqmLDH+''',labora_qdstqmCKMB='''+labora_qdstqmCKMB+''',';
  mysql:=mysql+'labora_jgCRE='''+labora_jgCRE+''',labora_lsdBUN='''+labora_lsdBUN+''',labora_xqptt='''+labora_xqptt+''',';
  mysql:=mysql+'labora_lsUA='''+labora_lsUA+''',labora_gyszTG='''+labora_gyszTG+''',labora_gmdzdbHDL_C='''+labora_gmdzdbHDL_C+''',';
  mysql:=mysql+'labora_zdgcTCH='''+labora_zdgcTCH+''',labora_dmdzdbLDL_C='''+labora_dmdzdbLDL_C+''',';
  mysql:=mysql+'labora_zzdbA1='''+labora_zzdbA1+''',labora_zzdbB='''+labora_zzdbB+''',labora_jK='''+labora_jK+''',';
  mysql:=mysql+'labora_nNA='''+labora_nNA+''',labora_lCL='''+labora_lCL+''',labora_gCA='''+labora_gCA+''',';
  mysql:=mysql+'labora_jx_ycQb='''+labora_jx_ycQb+''',labora_jx_STdzdyd='''+labora_jx_STdzdyd+''',';
  mysql:=mysql+'labora_jx_STdzdyd_fx='''+labora_jx_STdzdyd_fx+''',labora_jx_STdzdtg='''+labora_jx_STdzdtg+''',';
  mysql:=mysql+'labora_jx_STdzdtg_fx='''+labora_jx_STdzdtg_fx+''',labora_jx_Tbyc='''+labora_jx_Tbyc+''',';
  mysql:=mysql+'labora_jx_xlsc='''+labora_jx_xlsc+''',labora_gzdmfz_1jd='''+labora_gzdmfz_1jd+''',';
  mysql:=mysql+'labora_gzdmfz_1gqxz='''+labora_gzdmfz_1gqxz+''',labora_gzdmfz_1ghjf='''+labora_gzdmfz_1ghjf+''',';
  mysql:=mysql+'labora_gzdmfz_2jd='''+labora_gzdmfz_2jd+''',labora_gzdmfz_2gqxz='''+labora_gzdmfz_2gqxz+''',';
  mysql:=mysql+'labora_gzdmfz_2ghjf='''+labora_gzdmfz_2ghjf+''',labora_gzdmfz_3jd='''+labora_gzdmfz_3jd+''',';
  mysql:=mysql+'labora_gzdmfz_3gqxz='''+labora_gzdmfz_3gqxz+''',labora_gzdmfz_3ghjf='''+labora_gzdmfz_3ghjf+''',';
  mysql:=mysql+'labora_gzdmfz_4jd='''+labora_gzdmfz_4jd+''',labora_gzdmfz_4gqxz='''+labora_gzdmfz_4gqxz+''',';
  mysql:=mysql+'labora_gzdmfz_4ghjf='''+labora_gzdmfz_4ghjf+''',labora_gzdmfz_5jd='''+labora_gzdmfz_5jd+''',';
  mysql:=mysql+'labora_gzdmfz_5gqxz='''+labora_gzdmfz_5gqxz+''',labora_gzdmfz_5ghjf='''+labora_gzdmfz_5ghjf+''',';
  mysql:=mysql+'labora_gzdmfz_6jd='''+labora_gzdmfz_6jd+''',labora_gzdmfz_6gqxz='''+labora_gzdmfz_6gqxz+''',';
  mysql:=mysql+'labora_gzdmfz_6ghjf='''+labora_gzdmfz_6ghjf+''',labora_gzdmzyjg_1jd='''+labora_gzdmzyjg_1jd+''',';
  mysql:=mysql+'labora_gzdmzyjg_1gqxz='''+labora_gzdmzyjg_1gqxz+''',labora_gzdmzyjg_2jd='''+labora_gzdmzyjg_2jd+''',';
  mysql:=mysql+'labora_gzdmzyjg_2gqxz='''+labora_gzdmzyjg_2gqxz+''',labora_gzdmzyjg_3jd='''+labora_gzdmzyjg_3jd+''',';
  mysql:=mysql+'labora_gzdmzyjg_3gqxz='''+labora_gzdmzyjg_3gqxz+''',labora_gzdmzyjg_4jd='''+labora_gzdmzyjg_4jd+''',';
  mysql:=mysql+'labora_gzdmzyjg_4gqxz='''+labora_gzdmzyjg_4gqxz+''',labora_gzdmzyjg_5jd='''+labora_gzdmzyjg_5jd+''',';
  mysql:=mysql+'labora_gzdmzyjg_5gqxz='''+labora_gzdmzyjg_5gqxz+''',labora_gzdmzyjg_6jd='''+labora_gzdmzyjg_6jd+''',';
  mysql:=mysql+'labora_gzdmzyjg_6gqxz='''+labora_gzdmzyjg_6gqxz+''',labora_gmjrzl='''+labora_gmjrzl+''',';
  mysql:=mysql+'labora_gmjrzl_1bw='''+labora_gmjrzl_1bw+''',labora_gmjrzl_1fs='''+labora_gmjrzl_1fs+''',';
  mysql:=mysql+'labora_gmjrzl_2bw='''+labora_gmjrzl_2bw+''',labora_gmjrzl_2fs='''+labora_gmjrzl_2fs+''',';
  mysql:=mysql+'labora_gmjrzl_3bw='''+labora_gmjrzl_3bw+''',labora_gmjrzl_3fs='''+labora_gmjrzl_3fs+''',';
  mysql:=mysql+'labora_gmjrzl_4bw='''+labora_gmjrzl_4bw+''',labora_gmjrzl_4fs='''+labora_gmjrzl_4fs+''',';
  mysql:=mysql+'labora_jdmcsjc='''+labora_jdmcsjc+''',labora_yjdm_lm_zchd='''+labora_yjdm_lm_zchd+''',';
  mysql:=mysql+'labora_yjdm_lm_zdhd='''+labora_yjdm_lm_zdhd+''',labora_yjdm_fx='''+labora_yjdm_fx+''',';
  mysql:=mysql+'labora_yjdm_dmjyd='''+labora_yjdm_dmjyd+''',labora_zjdm_lm_zchd='''+labora_zjdm_lm_zchd+''',';
  mysql:=mysql+'labora_zjdm_lm_zdhd='''+labora_zjdm_lm_zdhd+''',labora_zjdm_fx='''+labora_zjdm_fx+''',';
  mysql:=mysql+'labora_zjdm_dmjyd='''+labora_zjdm_dmjyd+''',labora_jdmbkjf='''+labora_jdmbkjf+''',';
  mysql:=mysql+'labora_xcg_bxbjs='''+labora_xcg_bxbjs+''',labora_xcg_hxbjs='''+labora_xcg_hxbjs+''',';
  mysql:=mysql+'labora_xcg_xhdbnd='''+labora_xcg_xhdbnd+''',labora_xcg_xxbjs='''+labora_xcg_xxbjs+''',';
  mysql:=mysql+'labora_jgdbI='''+labora_jgdbI+''',labora_zdjql='''+labora_zdjql+''',labora_fz_ycQb='''+labora_fz_ycQb+''',';
  mysql:=mysql+'labora_fz_STdzdyd='''+labora_fz_STdzdyd+''',labora_fz_STdzdyd_fx='''+labora_fz_STdzdyd_fx+''',';
  mysql:=mysql+'labora_fz_STdzdtg='''+labora_fz_STdzdtg+''',labora_fz_STdzdtg_fx='''+labora_fz_STdzdtg_fx+''',';
  mysql:=mysql+'labora_fz_Tbyc='''+labora_fz_Tbyc+''',labora_fz_xlsc='''+labora_fz_xlsc+'''  where patient_info.patient_bl_id='''+patient_bl_id+'''';

  try
  with FFDatamodule.updateMain do
  begin
    sql.clear;
    sql.add(mysql);
    WebApplication.ShowMessage('病人信息表更新更新完成');
    //showmessage(mysql);
    //Application.MessageBox('数据更新成功','提示',64);
    //ExecSQL;
  end;
  except
    WebApplication.showMessage('病人信息表更新更新失败');
  end;

end;

procedure TformMain.IWButton1Click(Sender: TObject);
var mysql:String;
var id,patient_xys_z,patient_xys_n,patient_xys_jy_n:Integer; 
var patient_bl_id,patient_rxsj,patient_xm,patient_xb,
   patient_csrq,patient_zy,patient_gzdw,patient_lxdh,
   patient_jtzz,patient_whcd,patient_zyh,patient_sg,
   patient_tz,patient_tzzs,patient_yw,patient_tw,
   patient_ytb,patient_xy,patient_xl,patient_xlzt,
   patient_xys,patient_yjs,patient_yjs_jjn:String;
var patient_yjs_bjrz,patient_yjs_hjrz,patient_yjs_pjrz:double;
begin
  FFDatamodule.MovePage(dgrdFish.RowLimit);

  FFDatamodule.updateMain.Close;
  FFDatamodule.updateMain.SQL.Clear;
        mysql:= 'UPDATE patient_info ';

        mysql:=mysql+'SET patient_xys='''+patient_xys+''',patient_yjs_jjn='''+patient_yjs_jjn+''',patient_rxsj='''+patient_rxsj+''',patient_xb='''+patient_xb+''',patient_lxdh='''+patient_lxdh+''',patient_yjs='''+patient_yjs+''' where patient_info.patient_bl_id='''+patient_bl_id+'''';
        //showmessage(yh_xm);
        //Application.MessageBox('更新病人信息表','信息提示',64);
        try
        with FFDatamodule.updateMain do
        begin
          sql.clear;
          sql.add(mysql);
          WebApplication.ShowMessage('更新病人信息表');
          //showmessage(mysql);
          //Application.MessageBox('数据更新成功','提示',64);
          ExecSQL;
        end;
        except
          WebApplication.showMessage('数据库更新失败');
        end;
end;

procedure TformMain.IWButton3Click(Sender: TObject);
begin
  //Session1_1(WebApplication.Data).OffPeakMins := StrToIntDef(editMinutes.Text, 0);
  //patientMain.Create(WebApplication).Show;
  //Release;
end;

end.