كيفية كتابة رقم السنة تلقائيا في خانة edit.text

[onexite]

PHP كود :

DecodeDate(date, Year, Month, Day);
edit1.text:=inttostr(year)

------------------
var year,month,day:word;