求助 类型转换

var nYear, nMonth, nDay, nHour, nMinute,nSecond: Smallint

怎么转成一串字符串 或者是时间格式的

var A,B,C,D,E,F :SmallInt;
var g,h,i,j,k,l,M :string;
var z :TDateTime;

begin
A :=2011;
B :=10;
C :=31;
D :=12;
E :=59;
F :=58;

g := IntToStr(A);
h := IntToStr(B);
i := IntToStr(C);
j := IntToStr(D);
k := IntToStr(E);
l := IntToStr(F);

M := h+'/'+i+'/'+g +' '+j+':'+k+':'+l ;

z := StrToDateTime(M);