miver, конечно в циклах for x := 0 to Bmp.width-subbmp.width-1 do надо посчитать заранее выведя расчёт из цикла, чуть прибавится скорость, да и обе картинки на первом, "грубом" этапе можно уменьшить раза в три-четыре, а на втором этапе по натуральным размерам уже искать точное положение.
(Надо попробовать линию разложить в Фурье и сравнивать спектр сразу всей линии, получится-ли быстрее )