是否有API函数可以让字体旋转180度打印出来？？(100分)

各位大侠，希望大家能帮忙，急着用呢！

用TLOGFONT(在windows api的帮助里面可以找到），135度都可以。

关键是旋转字体。

procedure TForm1.Button1Click(Sender: TObject);
var
TheFnt :TFont;
LogFnt :TLogFont;
begin

with Canvasdo

begin

TheFnt :=TFont.Create;
TheFnt.Assign(Font);
TheFnt.Size :=20;
GetObject(TheFnt.Handle,SizeOf(LogFnt),@LogFnt);
LogFnt.lfEscapement :=1800;
LogFnt.lfOrientation :=1800;
TheFnt.Handle:=CreateFontIndirect(LogFnt);
Font.Assign(TheFnt);
TheFnt.Free;
TextOut(100,100,'雪');
end;

end;


打印自己做了，^_^

多人接受答案了。

我用了 卷起千堆雪tyn 的代码，也看了Api的帮助，可是不能象 Chenlili 说的 135度
（斜起来输出），请问如何解决？