Witam
Mam wykres graficzny zrobiony na TChart i chce go wstawić jako bitmapę
do komponentu TQRImage jest to komponent z pakietu QReport oba komponenty
stanowią całość z Delphi7.
tak nie działa:
QRImage1.Picture.Bitmap.Assign(Chart1.Canvas.Brush.Bitmap);
inne pomysły tez nie:
procedure TForm1.Button4Click(Sender: TObject);
var
rysunek:TBitmap;
begin
rysunek:=nil;
rysunek:=TBitmap.Create;
try
rysunek:=Chart1.Canvas.Brush.Bitmap;
QRImage1.Canvas.Brush.Bitmap.Assign(rysunek);
finally
rysunek.Free;
end;
end;
end.
jak to zrobić?