черные пиксели на изображении при Paste из Clipboard

[NieL]

В броузере копирую файл изображения в буфер (правая кнопка мыши/копировать рисунок в буфер обмена). При вставке из Clipboard в свою программу бывает что в некоторых углах изображения появляются черные пиксели. Кто с таким сталкивался или знает как такого избежать дайте совет. Вот код вставки изображения из буфера:

Есть догадки что проблема в методе Assign.

procedure TForm1.Button1Click(Sender: TObject);
var
  B: TBitmap;
begin
  B := TBitmap.Create;
  try
    Clipboard.Open;
    try
      B.Assign(Clipboard);
      Image1.Picture.Bitmap.Assign(B);
    finally
      Clipboard.Close;
    end;
  finally
    B.Free;
  end;
end;

[Kotofff]

Копируемый файл случайно не png формата ?

[NieL]

gif и png в большинстве своем, а что?

[Kotofff]

Для работы с png в Delphi нужен TPNGObject.
почитай о нем.