怎么截取DateTimePicker1的年份+edit1.text形成另一个文本？

Question

在界面里有三个控件，入学年份：DateTimePicker1，系部代码：edit1.text,学号：edit2.text,而学号是由入学年份+系部代码+序号（四位）构成，怎么截取DateTimePicker1的年份，再按照构成为学号呢？急，请各位大师指教

Answer 1

FormatDateTime('yyyy',DateTimePicker1.DAteTime)+Edit1.Text+Edit2.Text;

Answer 2

DecodeDate(Date: TDateTime; var Year, Month, Day: Word);
要麻烦一点,不过更灵活

Answer 3

'yy'是年份后两位,用四位是'yyyy'