请教一个简单的问题（DateTimePicker）

Question

怎样把 TDateTimePicker中的年月日分别
放到Label1、Label2、Label3的caption中去

Answer 1

用
DateTimePicker1.Date().Decode()
将年月日解出来,解到三个变量里,再给Label的caption赋值!

Answer 2

var
 wyear,wmonth,wday:word;
begin
 DecodeDate(DateTimePicker1.Date,wyear,wmonth,wday);
 Label1.Caption:=IntToStr(wyear)+'年';
 Label2.Caption:=IntToStr(wmonth)+'月';
 Label3.Caption:=IntToStr(wday)+'日';
end;

Answer 3

我的办法s:=formatFloat('yyyy-m-d',DateTimePicker1.Datetime)然后再分别读出来，哈哈

Answer 4

oracle_lover先生：在XP下怎样安装 8i ????????我无法成功呀！

Answer 5

s1:=formatFloat('yyyy',DateTimePicker1.Datetime)
s2:=formatFloat('m',DateTimePicker1.Datetime)
s3:=formatFloat('d',DateTimePicker1.Datetime)