
Originally Posted by
Sin
Well, For a start you need to use new SRL & Simba (if you aren't) It's alot better with that. Find that here.
Simba Code:
{$DEFINE TESSERACT_DEBUG} // Remove this if you dont want the debug
{$DEFINE SMART}
{$i srl-6/srl.simba}
var
BMP := BitmapFromString(33, 14, 'meJxNVEtrU1EQPo/7fuTmnZDQatKFRVAQQSpCYmi14LIBKwgiCqIiKCql6kJQkhRsig8QBItL10l3yQ9w44/yO/nqITAczp0z881887jNStT8L2erUTnVjaKzvpq0Gwk0/MSlWnB5x1kthDihXK2n59slWEKDJ5xQ4hOCzzRUaysFukDqOXNCCSgaEJ9o1EBwASxdKASEWA1g6YsTgLwQkGLT5lMlFxD8QjsGNeBDY9GYoQ0Be5CyaMSnAS/kCAQ9mrgHU0YBJitWazXS+/tqPEu3d2ncqpgzvPsa9vpoDheira63sgdvnaN5cqMPzUqjVM5O6TO0/+ij9+ZYDCaOlpYXzlLnJp7k4Ux2dpJA2azi/uPQk1pJufdT7r4ElLVUC0s2kc0yZbl02Xn/O9y6LQcTrURzaRIguVDJ4QQhSqnHxjFK5Ju2Rk8G6uEHhDN9z3wgIEQ+9cCC7hwGkM1d7enrfTU0IYiANMgRn+7BieoaRzbdFrO+dgY1DM5djAKHxs5oSr52Mlmi+OkQlOMthJhaFnaicKLsqttHCE44iSA9d/84vrenpAAjKvVoCstiLgAL2wX5/Y9hh/zHc4H7s8/AxITYQKDjGEfDgoWi3n/3C5PguQpVQjjoIRo43X4578MLyUAQCK9SCHQZNUS7cQdrk/l4btthQnR2AlcSH9sUvfoG7q6WSehwJnGiNQyRjxU/qeeSIqv8rTvg4jrmNbfREz/+ogLhlR68wFR8mrnPv7BuGB68mhkYYM5Par1tuGfXNmEpFpbei6/LW7+8eogOOrirw1m0sSmEgDJLNBokpUC/Au90j4qJFgvuULpa1ctmy0qZbyzFwtI11bO7yU1hhqgeZ0kpWSsG1gZKOyH8TVHDTbSrDVgiLyfPE9sNJeytsd2y5Z/MctmZEv8edkQpnK5/5JOlKA==');
W, H: Integer;
myFilter: TTesseractFilter;
begin
GetBitmapSize(BMP, W, H);
SetTargetBitmap(BMP);
// All you need this below...
myFilter := TTesseractFilter([4, 4, [False, 20, TM_Mean]]);
Tesseract_GetText(0, 0, W -1, H -1, myFilter); // Dont forget to change the area!
end;
Grabs it fine. Output:
Code:
-- Tesseract_GetText(): Filtering took: 0 ms, Tesseract Took: 47 ms, Total Time: 47 ms.
-- Tesseract_GetText(): Text found: 4,121