Source position: XGR32_Procedures.pas line 78
procedure B32_MakeMaskByAlphaChannel(
const Dest: TBitmap32;
const Source: TBitmap32;
const SourceRect: TRect
);