TfrxPictureView
Помогите плиз!!!
TfrxPictureView
Выводит всегда белый цвет, как backgraund, а мне нужно , чтоб он был прозрачным , как быть???
TfrxPictureView
Выводит всегда белый цвет, как backgraund, а мне нужно , чтоб он был прозрачным , как быть???
Комментарии
Неподскажите какой метод хоть у какого класса переписать.
procedure frxDrawGraphic(Canvas: TCanvas; DestRect: TRect; aGraph: TGraphic);
var
Bitmap: TBitmap;
begin
if aGraph is TMetaFile then
Canvas.StretchDraw(DestRect, aGraph)
else
begin
Bitmap := TBitmap.Create;
try
Bitmap.Transparent := true;
Bitmap.Width := aGraph.Width;
Bitmap.Height := aGraph.Height;
Bitmap.PixelFormat := pf32Bit;
Bitmap.Canvas.Draw(0, 0, aGraph);
DrawBitmap(Canvas, DestRect, Bitmap);
finally
Bitmap.Free;
end;
end;
end;