出错内容：Metrics: TTextMetric(20分)

各位：
　　请教！出错内容：Metrics: TTextMetric
　　代码如下：
unit Unit2;
interface
uses Printers;

　function CharHeight: Word;
implementation
function CharHeight: Word;
var
Metrics: TTextMetric;
begin
GetTextMetrics(Printer.Canvas.Handle, Metrics);
Result := Metrics.tmHeight;
end;

end.

错误提示：[Error] Unit2.pas(13): Undeclared identifier: 'TTextMetric'