No consigo
transparentar la parte que recupero del BitMap he colocado el código, en TFormCreate:
Código Delphi
[-]TransparentBmp.TransparentColor := clWhite;
TransparentBmp.Transparent := True;
al código de arriba:
Código Delphi
[-]procedure DibujarTrozo(Filename: string; Count, Index: Integer; Dest: TCanvas);
var
Ancho: Integer;
begin
with TBitmap.Create do
try
LoadFromFile(Filename);
Ancho:= Width div Count;
Dest.CopyRect(Rect(0,0,Ancho,Height), Canvas,
Rect(Ancho*Index,0,Ancho*(Index+1),Height));
finally
Free;
end;
end;
Mi BitMap tiene fondo blanco, y con el DRAW me dibuja todo pero transparente, en cambio según el código de arriba no logro transparentarlo. Una ayuda please.
Saludos