Народ помогите!!!!!
Я немноо не понимаю этот сканлайн...
Так что поставлю вопрос подругому...
Выложите сюда плиз процедуру рисования точки в одну строку....
тоесть :
Код:
ScanLine[87,67] := Rgb(56,96,250);
Ну или так...
Код:
procedure StavTochka(x,y : Integer; r, g, b : byte);
begin
scanline... // тут собственно скан лайн
end;
...
{use}
For i := 9 to 54 do
StavTochka...
Киньте кому не трудно...