如：TMyClass＝class
const
a＝1；
procedure create（）；
end；
怎么不行呢？哪位大哥帮忙看看！