取得文字的字型之寬與高的像素數 - Delphi - bestlong 怕失憶論壇

bestlong 怕失憶論壇 › 論壇 › Delphi › 取得文字的字型之寬與高的像素數

查看: 4635\|回復: 0	go 取得文字的字型之寬與高的像素數 [複製鏈接]

Rank: 9 Rank: 9 Rank: 9

1^#

發表於 2007-10-20 09:34 |只看該作者 |倒序瀏覽 |打印

procedure TForm1.FormCreate(Sender: TObject);
begin
Label1.Caption := 'Width is ' + IntToStr(Form1.Canvas.TextWidth(Edit1.Text)) + ' pixels';
Label2.Caption := 'Height is ' +IntToStr(Form1.Canvas.TextHeight(Edit1.Text)) + ' pixels';;
end;

複製代碼

我是雪龍
http://blog.bestlong.idv.tw
http://www.bestlong.idv.tw

回復引用

GMT+8, 2025-5-2 19:31 , Processed in 0.017554 second(s), 10 queries .

Powered by Discuz! X1.5

取得文字的字型之寬與高的像素數 [複製鏈接]