//取得字符的高度
function CharHeight: Word;
var
Metrics: TTextMetric;
begin
GetTextMetrics(Printer.Canvas.Handle, Metrics);
Result:=Metrics.tmHeight;
end;
function CharHeight: Word;
var
Metrics: TTextMetric;
begin
GetTextMetrics(Printer.Canvas.Handle, Metrics);
Result:=Metrics.tmHeight;
end;
解决方案 »
- treeview节点Data属性使用
- 请教高手,关于Delphi里的顔色?
- 在DBGRIDEH网格中我想在(数量)这个字段中输入 39+20 然后数量自动变为59 但是现有的DBGRIDEH会出错的,请问高手如何解决
- 用SQL做时间比较,急急
- Delphi 和VB.net何去何从?
- function ExtractFilePath(const FileName: string): string;这个函数什么作用啊
- 南通的程序员请进!!!
- 请问*.db怎样转换成*.doc??? thanks.
- 我用ado连接access 数据库 , 可是程序报告“非法的精确度值“,这是为什么呀?
- WinGate代理上网,设置后OICQ不能发送信息。怎样通过编程或已有软件结除这种设置
- 求救,關於電腦銀幕顯示圖像的問題
- 一个记录能否存两个以上的图片,并用OLE控件分页读出?
Undeclared identifier: 'TTextMetric'