有1个combobox,1个edit和1个查询按钮
COMBOBOX中有>,<,>=,<=,<>等选项
EDIT中让用户输入日期,格式如2002-12-12
当我按了查询按钮后,自动出现符合条件的记录
如我在COMBOBOX1中选了<
在EDIT1中输了2002-12-12
则当我按了查询后,出现字段CON_END小于2002-12-12日的记录
字段CON_END是DATE型的
COMBOBOX中有>,<,>=,<=,<>等选项
EDIT中让用户输入日期,格式如2002-12-12
当我按了查询按钮后,自动出现符合条件的记录
如我在COMBOBOX1中选了<
在EDIT1中输了2002-12-12
则当我按了查询后,出现字段CON_END小于2002-12-12日的记录
字段CON_END是DATE型的
解决方案 »
- FastReport报表组件如何使用?
- EAccessViolation错误
- Self 什么意思 用途很大\吗?
- cxgrid 的问题?
- 能将IMAGE中的图片或图像留下右下脚的1/4?保存到另外的JPG格式的文件中能?
- 一个Timer控件的问题!
- 200分求救,关于Win2000 server系统中的图标问题?
- DataSetProvider是否不能和ADO数据集连接
- 从SQLServer2000里读出的字符串后面会加满空格,若一个一个读取可用Trim(),可我是用DBGrid的,要在Grid上进行修改时总是定位到最后的空格
- delphi编译的程序在XP上显示正常,在WIN7下.乱码...
- 如何去掉查找出来重复的信息呢?在线等待!
- 如果要求一个星期之内掌握并且学好DELPHI,那我该怎么办才好???
begin
Close;
SQL.Clear;
SQL.Add('Select * From TableName Where CON_END'+ComboBox1.Text+#39+Edit1.Text+#39);
Open;
end;
'where CON_END - TO_DATE('''+edit1.text+''',''YYYY-MM-DD'''+ COMBOBOX.text +'0'
这里的TO_DATE是数据库里字符串类型转换到时间类型的函数
adoquery1.parameters.fieldbyname('a').value = StrToDate(Edit1.Text);
adoquery1.open;