各位高手好了,
我现在有一个问题请教!就是关于我在SQL中建的表是用中文写的字段(总扣除,劳动保险扣除,水电扣除)现在我想通实现在DELPHI中(总扣除=劳动保险扣除+水电扣除)
但是我以建好了在SQL表中,现在我不想把建好数据表的中文换成字母,如果换成就很麻烦!我在前台能不能实现,
procedure Tw_gzrl.ADOQuery1CalcFields(DataSet: TDataSet);
begin adoquery1总扣除.value:=adoquery1劳动保险扣除.value+adoquery1水电扣除.value
end;
end.
是报错的!
procedure Tw_gzrl.ADOQuery1CalcFields(DataSet: TDataSet);
begin
adoquery1.sql.add('select 总扣除 as zkc,劳动保险扣除 as ndkc,水电扣除 as sdkc')
adoquery1zkc.value:=adoquery1ndkc.value+adoquery1sdkc.value
end;
end.
也是报错的!
我现在有一个问题请教!就是关于我在SQL中建的表是用中文写的字段(总扣除,劳动保险扣除,水电扣除)现在我想通实现在DELPHI中(总扣除=劳动保险扣除+水电扣除)
但是我以建好了在SQL表中,现在我不想把建好数据表的中文换成字母,如果换成就很麻烦!我在前台能不能实现,
procedure Tw_gzrl.ADOQuery1CalcFields(DataSet: TDataSet);
begin adoquery1总扣除.value:=adoquery1劳动保险扣除.value+adoquery1水电扣除.value
end;
end.
是报错的!
procedure Tw_gzrl.ADOQuery1CalcFields(DataSet: TDataSet);
begin
adoquery1.sql.add('select 总扣除 as zkc,劳动保险扣除 as ndkc,水电扣除 as sdkc')
adoquery1zkc.value:=adoquery1ndkc.value+adoquery1sdkc.value
end;
end.
也是报错的!
解决方案 »
- Lazarus通过OLE方法写入Excel中文会乱码,英文正常,如何解决
- 如何在自定义消息处理中返回想要的值
- edit控件应用,救助。简单
- 各位高手帮帮忙,网上哪里有能实现这个功能的DELPHI编程代码或各位有什么设计方法啊???
- 如何对Edit循环赋值?
- 在线,关于HexBL
- 有没有人看过邮电出版社的《delphi6数据库系统开发实例导航》,评价一下
- 请教一个问题,有关NMsmtp控件中的函数:nmsmtp1.verify(s:string):boolean 新年快乐!
- Mastering Delphi 6》 (由sybex 出版社出版,由Marco Cont 所写)在什么地方有电子书呀?
- 到哪儿能下载到visual source safe?
- System Volume Information里面的文件都是什么文件?
- 怎么判断一个数在数组内!
AdoQuery1.FieldByName('总扣除').value:=adoquery1.FieldByName('劳动保险扣除').value+adoquery1.FieldByname('水电扣除').value;都用FieldByName来做
小弟是一位学生,在做一个毕业设计是工资管理系统(Delphi和sql),遇到了几个问题请大侠指点一下:谢谢!
登陆窗口W_login,一个COMBOBOX1。三个Label,两个EDIT1。数据表username;字段 bh,username,password,xb,字段:
1). 我现在COMBOBX1中选中用户名(username),在Edit1中显示相应的编号值(bh),在Edit2中输入相应的密码(Password),能登入:可是我在Combobox1中选中用户名,但是不能现在相应的编号值(bh),只是在Edit1中没有显示值,同时输入相应的密码(password)也能进入了,不知什么选中用户名不能在Edit1显示相应的编号(bh)我写的程序是这样的,
procedure Tw_login.ComboBox1Select(Sender: TObject);
begin
if ADOQuery1.Locate('UserName',combobox1.text,Opts)
then edit1.Text:=trim(adoquery1.fieldbyname(bh)).asstring;
end;
Opts是一种什么类型!
AdoQuery1.FieldByName('总扣除').value:=adoquery1.FieldByName('劳动保险扣除').value+adoquery1.FieldByname('水电扣除').value;
可是我提到的第二个问题还没有解决了,帮一个忙,谢谢!
还不如这样写
adoquery1.sql.add('select 劳动保险扣除+水电扣除 as zkc,劳动保险扣除 as ndkc,水电扣除 as sdkc')
--------------------------------------------------
UnitDBtype
TLocateOption = (loCaseInsensitive, loPartialKey);
TLocateOptions = setof TLocateOption;DescriptionTLocateOptions is the type of the Options parameter to a dataset抯 Locate method. The following table lists the possible values:Value DescriptionloCaseInsensitive Key fields and key values are matched without regard to case.
loPartialKey Key values can include only part of the matching key field value; for example, 'HAM' would match both 'HAMM' and 'HAMMER.'