怎样用Delphi打印出空心汉字？(50分)

很早以前我就想自己编程实现空心字的打印，
现在刚刚学习Delphi，发现她博大精深，我相信用
她能够实现汉字的空心字打印，但我现在无从下手，
请高手帮我解决为感！[?]

我不是高手，我试不出来。不知有否这个功能。

不知道别的语言能否实现,如果能,delphi就能.
如果不能的话,就要想一些其他的办法

我从经设计过这样的控件，不过现在不知还能不能找得到，如果你用，我可以给你找找。
等等！

下面一段代码我用了一点小技巧，也许你可以根据它实现你想要的：

新建程序在Form1上放入TImage、TButton，加入下面这段代码：

procedure TForm1.Button1Click(Sender: TObject);
var
bmp:tbitmap;
begin

bmp:=tbitmap.Create;
with bmpdo

begin

Width:=image1.Width;
Height:=image1.Height;
Canvas.Font.Name:='黑体';
Canvas.Font.Size:=30;
setbkmode(bmp.canvas.handle,0);
TransparentColor:=clWhite;
Canvas.Font.Color:=clred;
canvas.TextOut(9,10,'中华人民共和国');
canvas.TextOut(10,9,'中华人民共和国');
canvas.TextOut(10,11,'中华人民共和国');
canvas.TextOut(11,10,'中华人民共和国');
canvas.Font.Color:=clwhite;
canvas.TextOut(10,10,'中华人民共和国');
image1.Canvas.Draw(0,0,bmp);
image1.Transparent:=true;
free;
end;

end;


点击Button1时你会发现Image1中的“中华人民共和国”变成了空心字。

请Snappy朋友告诉我你的email地址，我的email地址是:robin_lo@netease.com
另外你所说的控件能否为我找到，谢谢！

你要的是“打印”出空心字吗？把上面的例子改一改就可了用在打印上了啊？！

我的E是：snzdl@sina.com

以前的已经找不到了，不过我可以另外为你简单的设计一个。