[SpectraL]

Почему пиксел = $FFFFFFFF?

Код:

procedure TThread1.Execute;
begin
  Bitmap1 := TBitmap.Create;
  Bitmap1.SetSize(6, 6); // определяем размер изображения
  Thread1.Suspended := True; // в TForm1.Button1Click, присвоив False, запускаем поток
  ShowMessage(ColorToString(Bitmap1.Canvas.Pixels[0, 0])); // пиксел = $FFFFFFFF
end;