如何将一条已经发生旋转的直线经过旋转后恢复到原来的水平状态？

如何将一条已经发生旋转的直线经过旋转后恢复到原来的水平状态？ Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiMultimedia/html/delphi_20061005165649268.html
如何将一条本来水平但已经发生旋转（旋转的角度不知）的直线经过旋转后，恢复到原来的水平状态？  
 

通过直线就可以计算其与水平的夹角,   然后不就行了

如果要旋转，必定有一个中心，围绕他旋转。  
  旋转也非常简单，只要过中心做条水平线就行了。  
   
  不过，计算机上表示直线，也是用没有端点的线段来表示的。  
  一般情况下，旋转后，两个端点的位置还要和旋转前相对应。这个相对应，旋转前后相继的两个端点都在同一个园上。

给出详细代码好吗？

只要知道中心点的位置，直接重画一条直线不就行了？