Quote Originally Posted by Useless Hacker
[pascal]var
DIB: TDIB;
Source: TDirectDrawSurface;
...
DIB.Assign(Source);
...[/pascal]
EXCELLENT ! Thanks

Works fine.

But I have a little question. On SOURCE is set up Transparent and discrete TransparentColor. How get information from TDirectDrawSurface?
Exist any tutorial how work with TDirectDrawSurface?

Regards