<< Click to Display Table of Contents >> Navigation:  Font engine > Measuring text width

Sample code:

 

Font := TOTFFont.Create;
try
  Font.LoadfromFile(FontFile); //or LoadfromStream
  W := Font.MeasureString(s, FontHeight);
finally
  Font.Free
end;