在dbgrid中某一列中在单击它时一个日期控件弹出,怎么控制其弹出位置?高分求教!!! 如题。在dbgrid中某一列中,输入日期,我不想用edit,怎么判断日期为有效?也不想在数据提交是判断,如果解决这个问题,照样给分!!!救救我! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在dbgrid中放一个datetimepicker1. 放置一个datetimepicker1控件,填写您要选用的值列表,设为Visible:=False2.DBGrid1.OnEnter事件里,XXXX为字段名(也可以用selectindex来判断是第几列) if (gdFocused in State) and (Column.Field = XXXX) then begin datetimepicker1.DBGrid1DrawColumnCell( Rect.Left + DBGrid1.Left + 1, Rect.Top + DBGrid1.Top + 1, Rect.Right - Rect.Left, Rect.Bottom - Rect.Top); end;3.DBGrid的ColEnter 事件 if DBGrid1.Columns [DBGrid1.SelectedIndex]. Field = XXXX then datetimepicker1.Visible := True else datetimepicker1.Visible := False; 同意 rikky(读书、心知、生活) 其实,我从来没有用过上面的代码,我已经好久没有用delphi了,不过我也是从上面的代码得到启示自己写了一段,在c++builder里面用,这个就一直保存着, 赫赫,知道怎么做就行了 新手求教。谢谢大家。 Access两个更新的问题 设置excel单元格的背景色,谁有 colorIndex的清单提供呀? 有什么办法可以使媒体文件播放时画面时旋转90度的? 如何使得属性的改变,马上反映到控件的外观??? 请推荐一种表格控件,(不用数据库也能用的) 急急急,哪里有delphi课件 ★★★---[ 进程id的问题 ]---★★★ csdn有多少注册用户?大家一般什么时候在线?............等等 关于listview 的问题! 急需支持Delphi 7.0的数据导出控件(Excel 、Html 、PDF、TXT) 找小鱼儿
1. 放置一个datetimepicker1控件,填写您要选用的值列表,设为Visible:=False
2.DBGrid1.OnEnter事件里,XXXX为字段名(也可以用selectindex来判断是第几列)
if (gdFocused in State) and
(Column.Field = XXXX) then
begin
datetimepicker1.DBGrid1DrawColumnCell(
Rect.Left + DBGrid1.Left + 1,
Rect.Top + DBGrid1.Top + 1,
Rect.Right - Rect.Left,
Rect.Bottom - Rect.Top);
end;3.DBGrid的ColEnter 事件
if DBGrid1.Columns [DBGrid1.SelectedIndex].
Field = XXXX then
datetimepicker1.Visible := True
else
datetimepicker1.Visible := False;