Вставка из Clipboard

← →
LDV (2009-04-30 13:30) [0]

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

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

procedure TFileCell.PasteBitmapFromBuffer(const TempPath: string); var Bitmap: TBitmap; begin Bitmap := TBitmap.Create; try Clipboard.Open; try Bitmap.Assign(Clipboard); finally Clipboard.Close; end; TFileCellImage(Self).SetLocalBitmap(Bitmap, TempPath + const_default_LocalBitmapName); finally Bitmap.Free; end; end;

← →
clickmaker © (2009-04-30 13:38) [1]

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

а может, в SetLocalBitmap?

← →
LDV (2009-04-30 13:46) [2]

точно нет SetLocalBitmap(тут обычное сохранение в FileStream). В Assign как я посмотрел учитывается размеры дисплея, качество цветопередачи и проч. Из-за этого как мне кажется и возникает проблема. Мне нужно чтобы Paste работало как в Paint.

← →
clickmaker © (2009-04-30 13:47) [3]

> SetLocalBitmap(тут обычное сохранение в FileStream

а где же отображение?

← →
LDV (2009-04-30 13:56) [4]

> а где же отображение?

для теста например
Image1.Picture.Bitmap.Assign(Bitmap);

Вставка из Clipboard Найти похожие ветки