Hi
In the OnPaint event of the PaintBox, you just need to render the TIEBitmap to the canvas:
https://www.imageen.com/help/TIEBitmap.DrawToCanvas.html
Something like:
// trigger OnPaint event
PaintBox1.Paint();
procedure TForm1.PaintBox1Paint(Sender: TObject);
begin
MyChromaBitmap.DrawToCanvas( TPaintBox(Sender).Canvas, 0, 0 );
end;
Of course, that isn't scrollable, so you need to include a TScrollBox to allow scrolling (or just use a TImageEnView, of course )
Nigel
Xequte Software
www.imageen.com