问2个问题

1、我定义了一个类  TMyObject = Class(TObject);
    FA:integer;
    FB:boolean;
    .........
    FZ:integer;
   private
     procedure setA(value:integer);
     procedure setB(Value:integer);
    ........
     procedure setC(value:integer);
   public
    property a:integer read fa write seta;
    ...............
   end;
在我的程序里有几万个myObject,我想知道我应不应该把SetA,SetB这些过程提出来，因为我怕这样会增加系统开销。这些过程都是一样的，我有几万个myObjece,那会不会重复了几万个这样的过程啊？
2、我的代码太长了，将近一万行了，有什么办法把代码整理干净，我写的时候没注意，几个类的实现部分互相交叉，看起来很不舒服。