delphi信封打印程序

delphi源程序大家在工作中有很多信封要写，所以我用delphi5.0写了这个程序，希望能减轻工作负担？