Школоло / Говнокод #12544 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
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 TarasB, (Updated )

Комментарии (3) RSS

  • > Скорость считывания удручает, но пока альтернатив нет.

    MVC тихо курит в сторонке.
    Ответить
  • Можно ещё попросить пользователя прочитать и ввести.
    Ответить
    • Ну я примерно так и сделал, только автоматом, всё-таки надо считать всю матрицу 320х240.
      В той программе прямо видно было, как перекрестие бегает по строчкам, правда скорость была ещё на 1 порядок меньше до тех пор, пока я не послал WM_SETREDRAW 0.
      Ответить

Добавить комментарий

Переведи на "PHP", guest!

    А не использовать ли нам bbcode?


    8