Копирование картинок в REPORT

[Игорь Столяров]

Привет всем !

Простая задача. Есть 2 (два) одинаковых IMAGE.
В одном указана картинка и нужно скопировать её во второй IMAGE.
Первое, что приходит в голову - не работает:

Код: Выделить всё

  ?Image2{Prop:ImageBits} = ?Image1{Prop:ImageBits}

Тогда непонятно. Не сталкивался ли кто-нибудь с такой задачей ?
Заранее спасибо за идеи ...

[Admin]

Ну так к примеру:

Код: Выделить всё

Img                 &CSTRING
	CODE    
	Img &= NEW CSTRING(LEN(Report $ ?Image1{Prop:ImageBits}))
	Img = Report $ ?Image1{Prop:ImageBits}
	Report $ ?Image2{Prop:ImageBits} = Img
	DISPOSE(Img)

[Игорь Столяров]

Спасибо ... Я вот почему-то всегда очкую применять функции обработки текста к бинарным строкам.
В том же FreeImage - если копируем в памяти бинарную строку (картинка), то всегда известен её размер.
А здесь размер определяется по содержимому бинарной строки ...

[kreator]

Первое, что приходит в голову - не работает:
КОД: ВЫДЕЛИТЬ ВСЁ

?Image2{Prop:ImageBits} = ?Image1{Prop:ImageBits}

Может SetTarget не применён? Или надо "Report$?Image1{Prop:ImageBits}"?

[Игорь Столяров]

Или надо "Report$?Image1{Prop:ImageBits}"?

Нет. Судя по всему - этот проперти вообще указатель.

Код: Выделить всё

	?Image1{Prop:ImageBits} = '' ! Сброс картинки не работает
	
Loc:STMP  String(20)
       Code
        ...
        Loc:STMP = ''
        ?Image1{Prop:ImageBits} = Loc:STMP  ! А вот так сброс картинки работает

Действительно копировать картинку надо через строку, которую объявлять по размеру Size(?Image1{Prop:ImageBits})
или использовать буфер &IDynStr. Я сейчас нашёл частное решение через FreeImage, но потом вернусь к этой теме ...