急！有关TDateTimePicker和系统消息的问题

Question

我是用datetimepicker的dateformat设为dflong.

Answer 1

不行呀！dateformat设为dflong后，kind属性好象就没用了，它总是显示日期型，而不是时间型的，我要的是time类型的

Answer 2

自己在程序启动的时候利用函数设定时间、日期的显示格式就可以了。
procedure Tfmain.FormCreate(Sender: TObject);
begin
  longtimeformat:= 'hh:mm:ss';
  longdateformat:= 'yyyy''年''mm''月''dd''日''';
  shortdateformat := 'yyyy-mm-dd';
  twodigityearcenturywindow := 50;
end

Answer 3

同意cobi(我是小新，我只有5岁)

Answer 4

TDateTimePicker将接受一个系统消息来决定它的格式，所以即使在程序启动的时候利用函数设定时间、日期的显示格式，它的格式还是跟系统消息保持一致，假设这样能改变它的格式好了，但是如果我再次把系统时间显示格式改掉，它将发一个消息给TDateTimePicker,TDateTimePicker的格式又跟系统时间一样了，所以这个问题的关键可能就是在如何拦截这个消息。希望哪个高手能教教我，我是一个计算机语言初学者，所以越详细越好。