易截截图软件、单文件、免安装、纯绿色、仅160KB

求助DELPHI问题 - Delphi / 数据库相关

//adoquery1.SQL.add('insert into 学生书费历史库(班级名,书费,领书书费,结余书费,经办人,操作员,最后修改时间,说明,班级人数) values (:classname,:s0,0,:s1,:s2,:s3,date(),:s4,:s5)');
  adoquery1.SQL.add('update 学生书费历史库 set 班级名=:classname,书费=:s0,结余书费=:s1,经办人=:s2,操作员=:s3,最后修改时间=:date(),说明=:s4,班级人数=:s5');
  adoquery1.Parameters.Clear;
  adoquery1.Parameters.AddParameter;
  adoquery1.Parameters[0].Name:='classname';
  adoquery1.Parameters[0].DataType:=ftstring;
  adoquery1.Parameters[0].Direction:=pdinput;
  adoquery1.Parameters[0].Value:=combobox1.text;
  adoquery1.Parameters.AddParameter;
  adoquery1.Parameters[1].Name:='s0';
  adoquery1.Parameters[1].DataType:=ftcurrency;
  adoquery1.Parameters[1].Direction:=pdinput;
  adoquery1.Parameters[1].Value:=StrToFloat(edit2.text);
  adoquery1.Parameters.AddParameter;
  adoquery1.Parameters[2].Name:='s1';
  adoquery1.Parameters[2].DataType:=ftcurrency;
  adoquery1.Parameters[2].Direction:=pdinput;
  adoquery1.Parameters[2].Value:=-strtofloat(edit2.Text);
  adoquery1.Parameters.AddParameter;
  adoquery1.Parameters[3].Name:='s2';
  adoquery1.Parameters[3].DataType:=ftstring;
  adoquery1.Parameters[3].Direction:=pdinput;
  adoque


相关问答:

delphi怎么控制USB - Delphi / VCL组件开发及应用

以前中间站是电脑通过串口控制的,现在改成了USB接口,请问要怎么做啊?求高手指点一下
是usb转串口吗?那应该还是可以按串口操作的,只是速度不能太高

如果不是usb转串口,请查阅usb驱动的sdk说明。

这个是 ......

delphi - Delphi / 语言基础/算法/系统设计

本人今年17岁,非常喜欢delphi,但由于基础有限,从网上下载资料学习,看得晕死了,都不知道在说什么!所以今天在此发帖,广邀各位delphi爱好者帮助我!如果本人他日有幸学得delphi编程,定当把源代码发布出来,在此一表感谢! ......

磕求C/S源码 - Delphi / 数据库相关

现有paradox数据库使用BDE驱动,拟改为C/S版,增加网络读取数据功能。请哪位大侠,提供源码。
说句不客气的话,用paradox做C/S是自寻死路。
换一个网络数据库

因为不想动大手术,仅能共享几个文件即可。

Da ......

delphi 转 bcb - C++ Builder / 基础类

function ReadTime(intDevno: Integer; var strGet: Pchar): Integer; stdcall; external 'ast.dll'; //读取日期时
bcb调用delphi 的dll这句在bcb中如何转化。
应该是C/C++ code:
int __stdcall ReadTime(int in ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号