请大家帮忙!如何自己实现打印时文字居中等功能呀？

我现在要用delphi做一个activex控件，实现打印的功能。要求是在一个矩形区域内打印文字，可以设置文字的大小字体等属性，可以设置文字的显示方式（居左，居中，居右），我有疑惑的地方就是如何实现文字按照显示方式的设置来显示？是不是要通过矩形的宽度和字体的大小来计算呀？能否给我讲解一下思路，最好有个实例供我参考一下呀？我现在是定义类MyRect，通过里面的方法实现一些设置
TMyRect=class
    private
      px0,py0,px1,py1,px,py:Integer;
      ps:String;
    public
      procedure setRect(x0,y0,x1,y1:Integer);//设置矩形区域
      procedure setString(myString:String);//设置打印文字内容
      procedure setAlign(?????);//设置文字显示方式????????
      ... ...
    end;就是setAlign不知道如何去做呢？希望大家给点意见，谢谢