[msqrc]

Если после создания bitmap-а загрузить изображение (loadfromfile()) то изменение пикселей через scanline[] работает правильно, но если bitmap пустой то каждый последующий вызов scanline[] уничтожает все изменения!!!! Почему так происходит??

[Alegun]

Так здесь ещё нужно указать какой будет PixelFormat, поскольку напр. pf24bit соответствует разрядность 3 байта на пиксель, а для pf8bit только один байт, отсюда и глюки

[msqrc]

Тоже не работает!(
Вот код:

Код:

type Tmycolor = record
  B,G,R,C : byte;       ///не пойму зачем "C", но без него все смещается!
  end;
type Tmya = array[0..W-1] of Tmycolor;
var .......
     P : pointer;
     B : TBitmap;
     byf : byte;
begin
B :=TBitmap.Create;
B.Height :=H;
B.Width :=W;
for j:=0 to H-1 do
 begin
 P :=B.scanline[j];
 for i:=0 to W-1 do
   begin
   byf :=...........
   Tmya(P^)[i].B :=byf;
   ..............
   end;
 end;
end;

[NumLock]

См. второе сообщение!