var
bm:TBitmap;
begin
bm:=TBitmap.create;
bm.Width:=oc_OrgChart.FullWidth;
bm.Height:=oc_OrgChart.FullHeight;
oc_OrgChart.PaintContentTo(bm.Canvas,0,0);
bm.SaveToFile('d:\1.bmp');
var
hdc:THandle;
bm:TBitmap;
begin
bm:=TBitmap.create;
hdc:=Bitmap1.canvas.handle;
SendMessage(dxOrgChart1.handle, WM_Paint, hdc, 0);
image1.picture.bitmap:=bm;
end