TStringGrid使用(1)[4]

aqrlabel := tqrlabel.create(nil);
with aqrlabel do
begin
　 parent := sender;
　 left := aleft;
　 top := atop;
　 width := awidth;
　 alignment := aalignment;
　 caption := acaption;
end;