что-то я не понял. есть класс и процедура в нем type TAAAThread = class(TThread) procedure asdf; в этой процедуре создаю tbitmap var ABC: TBitmap; jpg: TJPEGImage; ms: TMemoryStream; ABC := Graphics.TBitmap.Create; рисую на нем, потом перегоняю в стрим и так далее: ms := TMemoryStream.Create; abc.SaveToStream(ms); sz := ms.Seek(0,2); ms.Seek(0,0); все нормально работает. но если я сделаю так: jpg := TJPEGImage.Create; try jpg.Assign(ABC); ms := TMemoryStream.Cr ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83082