If I want to write a transparent bit map and, for this, I use TImageList in this mode:

         TempList := TImageList.CreateSize(Picture.Width, Picture.Height);
         Try
           TempList.AddMasked(Picture1, TransColor);
           TempList.Draw(BCanvas.Canvas, X, Y, 0, Enabled);
         finally
           TempList.Free;
         end;

Where Picture is the source BitMap, BCanvas is the destination bit map and Picture1 is a support bitmap, during the execution of the line TempList.Draw(BCanvas.Canvas, X, Y, 0, Enabled); i have an error like this "External: SIGSEVG"

Bye,
David
begin:vcard
fn:David Guadagnini
n:Guadagnini;David
email;internet:[EMAIL PROTECTED]
x-mozilla-html:FALSE
version:2.1
end:vcard

Reply via email to