I used the DevExpress TdxOrgchart made a department under the architecture diagram, thinking of the architecture diagram export is saved as a JPG image format, how to do excuse me?

CodePudding user response:

Screenshot

CodePudding user response:

Screenshots can only be part of, because the architecture diagram is very big, I need the up and down or so scroll dxOrgchart control to finish see architecture diagram,

CodePudding user response:

Sends a WM_Paint message to the dxOrgChart controls set to send the past HDC into a Tbitmap HDC, controls will behave put it onto your bitmap, the content of the

CodePudding user response:

reference Playmaster reply: 3/f

send dxOrgChart controls the WM_Paint message, set to send the past HDC into a Tbitmap HDC, controls will behave put it onto your bitmap, the content of the

How do you achieve specific please?

CodePudding user response:

HDC:=Bitmap1. Canvas. Handle;//bitmap1 is used to store the picture
SendMessage (dxOrgChart1. Handle, WM_Paint, HDC, 0).//check to help you, take a look at the WM_PAINT message specific format,

Then, have a picture in the bitmap1,

You try

CodePudding user response:

reference 5 floor Playmaster reply:

HDC:=Bitmap1. Canvas. Handle;//bitmap1 is used to store the picture
SendMessage (dxOrgChart1. Handle, WM_Paint, HDC, 0).//check to help you, take a look at the WM_PAINT message specific format,

Then, have a picture in the bitmap1,

You try

Tried, if not, the code is as follows:

 
Var 
HDC: THandle; 
Bm: TBitmap; 
The begin 
Bm:=TBitmap. Create; 
HDC:=Bitmap1. Canvas. Handle; 
SendMessage (dxOrgChart1. Handle, WM_Paint, HDC, 0). 
Image1. Picture. Bitmap:=bm; 
End 

There is no response after execution,

CodePudding user response:

Look to the PaintTo dxOrgChart this method name (or similar),

CodePudding user response:

Try through control screenshot??

CodePudding user response:

refer to the eighth floor lyhoo163 response:

try through control screenshot??

Can only be cut into the part

CodePudding user response:

Var
Bm: TBitmap;
The begin
Bm:=TBitmap. Create;
Bm. Width:=oc_OrgChart. FullWidth;
Bm. Height:=oc_OrgChart. FullHeight;
Oc_OrgChart. PaintContentTo (bm. The Canvas, 0, 0).
Bm. SaveToFile (' d: \ 1. BMP);