我在做酒店管理系统有一段程序是录入数据的大概是这样的:
var
a:=integer;
b,c:=float;
begin
a:=StrToInt(Numm.Text);
b:=StrToFloat(Summ.Text );
c:=StrtoFloat(Income.Text );ADODinner.Append ;
ADODinner.FieldValues['酒菜点单号']:=a;
ADODinner.FieldValues['总金额']:=b;
ADODinner.FieldValues['实收金额']:=c;
ADODinner.Post;
但是编译的时候就就出现以下的错误提示:
[Error] UnitDinnerInput.pas(54): Incompatible types: 'Integer' and 'Extended'
[Error] UnitDinnerInput.pas(55): Incompatible types: 'Integer' and 'Extended'
我用的是ADO是不是ADO的数制转换和其他的不同?为什么没次用StrTo都是有问题不能录入?
var
a:=integer;
b,c:=float;
begin
a:=StrToInt(Numm.Text);
b:=StrToFloat(Summ.Text );
c:=StrtoFloat(Income.Text );ADODinner.Append ;
ADODinner.FieldValues['酒菜点单号']:=a;
ADODinner.FieldValues['总金额']:=b;
ADODinner.FieldValues['实收金额']:=c;
ADODinner.Post;
但是编译的时候就就出现以下的错误提示:
[Error] UnitDinnerInput.pas(54): Incompatible types: 'Integer' and 'Extended'
[Error] UnitDinnerInput.pas(55): Incompatible types: 'Integer' and 'Extended'
我用的是ADO是不是ADO的数制转换和其他的不同?为什么没次用StrTo都是有问题不能录入?
解决方案 »
- 请问下应用系统正在做处理时,如何控制不能做其他的操作
- 能否获取dbgrid的总行数,如果能,该如何获取?
- 窗口弹出问题,求救啊!
- 我在开发WebOffice组件时,如果另外启动一个Word,OLE组件中的Word就不能操作了,怎样解决.
- 串口通信的问题
- 注意!谁有关于delphi怎样调用JavaScript,xml的资料!急!
- 十万火急!!请帮忙!!我用TQuickREP做报表,针式打印机!如何设置宽度,如何设置每页显示记录的数量!
- 简单的类型转换,在线等待。
- 在delphi中怎么编写事物机制???有人知道吗?
- 谁能解决这个ADO问题(68分)
- 如何把数据转为EXCEL格式的文件
- 请问这是什么错误啊?编译delphi程序就会出现[Error] RLINK32: Too many resources to handle.
a:integer;
b,c:double;