想问一下DateTimePicker的属性里只有date和datetime的,
如果我想把日期中月提取出来应该怎么做的.
就比如说要在edit1.text里面显示DateTimePicker日期中月的信息,该怎么做呢?
大家看看,谢谢先

我试了下，写了下面的程序：
var s,vs,s1:string;
begin
s:=datetimetostr(DateTimePicker1.DateTime);
VS:=inttostr(strtoint(s[6])+strtoint(editCKQX_CQ.Text));
s1:=datetimetostr(DateTimePicker2.DateTime);
s1[6]:=VS[6];
DateTimePicker2.DateTime:=strtodatetime(s1);

adoqueryCQ.SQL.Clear;
adoqueryCQ.SQL.Text:='Insert into 长期客户管理(……，cqrktime) values(……，'''+datetimetostr(DateTimePicker1.DateTime)+''','''+datetimetostr(DateTimePicker2.DateTime)+''')';
try
adoqueryCQ.ExecSQL;
except
showmessage('保存失败，请检查数据库!');
exit;
end;
showmessage('保存成功');
end;
可是在改动edit持卡期限的时候，保存的出库时间为什么不是strtoint(s[6])+strtoint(editCKQX_CQ.Text))相加的值呢？
会出现截图的错误
大家看看呀,help

我把下面程序计算出来的s值放到EDIT中显示，
s:=datetostr(DateTimePicker1.Date);
VS:=inttostr(strtoint(s[6])+strtoint(edit1.Text));
s[6]:=VS[6];
Edit1.Text:=s;
显示到的数据只有“2007－”就是后面的数字都没有了，为什么呢？
是因为没有通过S[6]:=VS[6]赋值的都默认为空吗？

当我的edit1.text='4'的时候，我调试看到的是这些内容，你自己看看问题出在哪?

[此贴子已经被作者于2007-4-10 23:30:50编辑过]