实现字体镜像的几种方式

[size=medium][color=blue] 字体的镜像一直是软件没有解决的一个问题，被困扰了几年都没人去研究解决。记得刚来公司的时候，也调查过这个任务，也找到一个很有价值的实例。当时找到万一老师的delphi博客，上面有一篇文章《区域变换》[url]http://www.cnblogs.com/del/archive/2008/06/03/1212534.html[/url]其中有:

[/color][/size]
{建立路径}
  BeginPath(cvs.Handle);
  cvs.TextOut(100, 0, 'F');
  EndPath(cvs.Handle);

  {将路径转换为区域}
  Rgn := PathToRegion(cvs.Handle);
......
7: begin {水平镜像}
      TXF.eM11 := -1;
      TXF.eM12 := 0;
      TXF.eM21 := 0;
      TXF.eM22 := 1;
      TXF.eDx := 200; {需要右移一些才能看到}
      TXF.eDy := 0;
...
{执行变换并重绘}
  Rgn := ExtCreateRegion(@TXF, RgnDataSize, RgnData^);

[size=medium][color=blue] 这几部分的明显实现了对字体镜像的功能，由于当时只是看到功能，对这些东西的意义不是很透彻，所以这样的建议被淘汰了，原因（最大的原因没人明白其中的意义 :twisted: ）“好像是对一片区域的拷贝，这样会有问题”。总觉得看着例子很正常啊！怎么会是有问题呢？后来在自己的调查中逐渐也了解了关于path，region的意义。path，region在gdi中也是两种图形，通过他们可以用简单的方式画出更加多样的图像。因为生成光绘的时候如果遇到中文字体的话，就没办法自己造字了，因为中文字有很多很多，所以这也是一个一直没有解决的问题。
后来在研究path图形的时候，用到以下代码可以取到字体的边缘点数据。[/color][/size]

    BeginPath(PDC);
    TextOut(PDC, x, y, PChar(TextStr), Length(TextStr));
    EndPath(PDC);

[size=medium][color=blue]这样的话镜像也可以很容易实现了：[/color][/size]

    BeginPath(PDC);
    TextOut(PDC, x, y, PChar(TextStr), Length(TextStr));
    EndPath(PDC);

    count := GetPath(PDC, pts^, types^, 0);
    GetMem(pts, count * SizeOf(TPoint));
    GetMem(types, count);
    count := GetPath(PDC, pts^, types^, count);

定义：

    pts: ^TPArr;
    types: ^TTArr;
    count: Integer;

type
    TPArr = array[0..0] of TPoint;
    TTArr = array[0..0] of Byte;

[size=medium][color=blue]但是这样画出来的自己怎么看上去都没有textout出来的那么清晰，但是也只能这样了，好像有个GetGlyphOutline听说得到的点数据会更精确一些，不过没有确认，这个有些复杂。

另外的方面就是directx 和 opengl 的实现方法，由于对这两种技术一直没有机会接触，所以也就没有发言权了。[/color][/size]