Есть ли альтернатива "for to do" для фрагмента кода??

[GunSmoker]

http://www.google.ru/search?q=delphi+scanline

[TinMan]

Сообщение от Vova777

Есть ли более быстрая (существенно быстрая) альтернатива данному (for...to...do) фрагменту кода?

Прежде чем думать о цикле, ты о его теле позаботься сначала.. До ScanLine тут надо кое о чем еще позаботиться..

Вместо этого кошмарно дикого количества if'ов, сделай один case - работать будет НАМНОГО быстрее.. Ты же 40 раз обращаешься к одному и тому же пикселу!!! Причем, ты это не прекращаешь делать, даже если заведомо известно, что значение не попадется, поскольку оно уже было - хоть бы уж else поставил что ли.. На худой конец - переприсвой его обычной переменной! Если тебя 40 человек подряд спросит, который час - ты будешь 40 раз на часы смотреть?

procedure TForm1.ScanTools;
var
  axq, ayq: word;
begin
  for ayq:= 0 to Image1.Height do
    begin
      for axq:= 0 to Image1.Width do
        case Image1.Canvas.Pixels[axq, ayq] of
          $000000: field[axq, ayq]:= 1;
          $000001: field[axq, ayq]:= 2;
          {и так далее...до 40} 
          $110000: field[axq, ayq]:= 40;
        end;
    end;
end;

То есть, я, конечно, согласен, что ScanLine намного быстрее, чем попиксельный доступ, но все равно такие ляпы, как ты выше написал, лучше не делать..

Совет тебе: когда будешь делать со ScanLine - не делай его 40 раз.. Уверяю тебя, 10-12 раз присвоить одно и то же значение одной и той же переменной обычно хватает, чтоб эта дура машина наконец запомнила..

[Стелс]

Сообщение от TinMan

Совет тебе: когда будешь делать со ScanLine - не делай его 40 раз.. Уверяю тебя, 10-12 раз присвоить одно и то же значение одной и той же переменной обычно хватает, чтоб эта дура машина наконец запомнила..

молодец !! держи +1

[Vova777]

Сообщение от TinMan

Совет тебе: когда будешь делать со ScanLine - не делай его 40 раз.. Уверяю тебя, 10-12 раз присвоить одно и то же значение одной и той же переменной обычно хватает, чтоб эта дура машина наконец запомнила..

Я думаю, она с первого раза запомнит . Она же не дура