Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+106
for j := Low(Matrix) to High(Matrix) do begin
Caption := 'Processing ' + IntToStr(j) + ' of ' + IntToStr(High(Matrix));
for i := Low(Matrix[j]) to High(Matrix[j]) do begin
SendMessage(PictureWindow, WM_MOUSEMOVE, 0, MakeLPARAM(i,j));
S := GetCaption(TemperatureWindow);
Matrix[j,i].V := StrToFloat(S);
end;
end;
Я не смог раскрыть формат нужной программы, поэтому я извлекаю данные, бегая по окну с картинкой и считывая число из окна с температурой, лол.
Скорость считывания удручает, но пока альтернатив нет.
Запостил: 
TarasB,
06 Февраля 2013
Follow us!
MVC тихо курит в сторонке.
В той программе прямо видно было, как перекрестие бегает по строчкам, правда скорость была ещё на 1 порядок меньше до тех пор, пока я не послал WM_SETREDRAW 0.