shadowpwner
2007-08-08 00:21:16
Is there an include or script would do OCR for a certain font?
Or would I have to make bitmaps of each character?
Thanks in advance.
Or would I have to make bitmaps of each character?
Thanks in advance.
2007-08-08 00:21:16
2007-08-08 04:16:12
2007-08-08 05:15:43
2007-08-08 15:26:03
2007-08-08 22:33:29
2007-08-08 23:08:31
program FontTest;
const
fontname = 'Tahoma';
size = 16;
bold = false;
italic = false;
underline = false;
strikethrough = false;
var
font, bitmap, sizex, sizey: integer;
begin
//Load the font into memory
font := LoadCharsFromFont2(fontname, size, bold, italic, underline, strikethrough);
//Generate a bitmap mask from the previously loaded font
bitmap := CreateBitmapMaskFromText('Hello', font);
//Display the font in the debug window
GetBitmapSize(bitmap, sizex, sizey);
DisplayDebugImgWindow(sizex, sizey);
CopyCanvas(GetBitmapCanvas(bitmap), GetDebugCanvas, 0, 0, sizex, sizey, 0, 0, sizex, sizey);
end.
2007-08-09 15:24:34