怎么样判断delphi 中日期输入为空呢？

Question

我用的是
if bsskindateedit1.text='' then
这个不对，没发判断，好像对于bsskindateedit这一控件来说，如果我不输入任何日期，它的初始值也不是 ''
求助~

Answer 1

在窗口建立的时候，就初始化为一个固定值，然后再判断是否改变，如果改变就不为空，如果没有改变就为空。

Answer 2

var
date1:TdateTime;
begin
if trim(bsSkinDateEdit1.Text)='- -' then
begin
showmessage('输入为空');
exit;
end;
try
date1:=Strtodatetime(bsSkinDateEdit1.Text);
except
showmessage('输入有错');
end;本回答被提问者采纳

Answer 3

这个一般要在你的edit的onexit中判断
然后利用2楼的代码。