Combining DXF files into a new one

Discuss and ask questions about CAD VCL (Delphi and C++ Builder).

Moderators: SDS, support, admin

Post Reply
uligerhardt
Posts: 8
Joined: 20 Jan 2015, 12:46

Combining DXF files into a new one

Post by uligerhardt » 02 Feb 2023, 17:59

Hello!

I'm trying to combine a few DXF files into one (see attached project) and have a few problems. We're still at CAD VCL 14.1.1 #47687 according to Readme.txt if that matters.
  • If one uncomments the AddDXF line for 358300 just starting and ending the program causes memory leaks:
    1 - 12 bytes: Unknown x 96
    13 - 20 bytes: TsgCADExtendedData x 32, Unknown x 32
    37 - 44 bytes: TsgCollection x 14
    45 - 52 bytes: UnicodeString x 16
    53 - 60 bytes: TsgList x 32, UnicodeString x 14
    61 - 68 bytes: UnicodeString x 2
    77 - 84 bytes: Unknown x 14
  • After starting the program or (un)checking DXF files in the list view the combined DXF is shown correctly in the paint box. However after clicking the "Save" button the exported combined.dxf is empty and after ending the program memory leaks are displayed:
    1 - 12 bytes: TsgTableItem x 2
    13 - 20 bytes: TsgOwneredItem x 1
    21 - 28 bytes: TListNotify x 1
    173 - 188 bytes: TsgDXFBlock x 1
Please help me get rid of these issues!

Best regards,
Uli

Edit:The forum didn't let me upload the attachment a few times, so I put it on Google Drive: https://drive.google.com/drive/folders/ ... sp=sharing
I hope it'll work.

support
Posts: 3271
Joined: 30 Mar 2005, 11:36
Contact:

Re: Combining DXF files into a new one

Post by support » 06 Feb 2023, 14:40

uligerhardt wrote:
02 Feb 2023, 17:59
Hello!

I'm trying to combine a few DXF files into one (see attached project) and have a few problems. We're still at CAD VCL 14.1.1 #47687 according to Readme.txt if that matters.
  • If one uncomments the AddDXF line for 358300 just starting and ending the program causes memory leaks:
    1 - 12 bytes: Unknown x 96
    13 - 20 bytes: TsgCADExtendedData x 32, Unknown x 32
    37 - 44 bytes: TsgCollection x 14
    45 - 52 bytes: UnicodeString x 16
    53 - 60 bytes: TsgList x 32, UnicodeString x 14
    61 - 68 bytes: UnicodeString x 2
    77 - 84 bytes: Unknown x 14
  • After starting the program or (un)checking DXF files in the list view the combined DXF is shown correctly in the paint box. However after clicking the "Save" button the exported combined.dxf is empty and after ending the program memory leaks are displayed:
    1 - 12 bytes: TsgTableItem x 2
    13 - 20 bytes: TsgOwneredItem x 1
    21 - 28 bytes: TListNotify x 1
    173 - 188 bytes: TsgDXFBlock x 1
Please help me get rid of these issues!

Best regards,
Uli

Edit:The forum didn't let me upload the attachment a few times, so I put it on Google Drive: https://drive.google.com/drive/folders/ ... sp=sharing
I hope it'll work.
Hello,
Thank you for attaching the files.
We fixed the issue with memory leaks, however, to send you a fixed and revised VCL package we need to know your order No or registration email. Could you contact me at support@cadsofttools.com with this information and I will send you a link with improved CAD VCL package?
P.S.: the issue is fixed in CAD VCL 15, the package is sent.

Catherine.
Technical Support E-mail: support@cadsofttools.com
Chat support on Skype: cadsofttools.support

uligerhardt
Posts: 8
Joined: 20 Jan 2015, 12:46

Re: Combining DXF files into a new one

Post by uligerhardt » 20 Feb 2023, 19:45

support wrote:
06 Feb 2023, 14:40
Hello,
Thank you for attaching the files.
We fixed the issue with memory leaks, however, to send you a fixed and revised VCL package we need to know your order No or registration email. Could you contact me at support@cadsofttools.com with this information and I will send you a link with improved CAD VCL package?
P.S.: the issue is fixed in CAD VCL 15, the package is sent.

Catherine.
Thanks Catherine,
we've received version 15 now, and indeed the memory leaks are gone!
Unfortunately the exported DXF is still empty. Can you help me there too?

support
Posts: 3271
Joined: 30 Mar 2005, 11:36
Contact:

Re: Combining DXF files into a new one

Post by support » 21 Feb 2023, 11:24

uligerhardt wrote:
20 Feb 2023, 19:45
support wrote:
06 Feb 2023, 14:40
Hello,
Thank you for attaching the files.
We fixed the issue with memory leaks, however, to send you a fixed and revised VCL package we need to know your order No or registration email. Could you contact me at support@cadsofttools.com with this information and I will send you a link with improved CAD VCL package?
P.S.: the issue is fixed in CAD VCL 15, the package is sent.

Catherine.
Thanks Catherine,
we've received version 15 now, and indeed the memory leaks are gone!
Unfortunately the exported DXF is still empty. Can you help me there too?
Hi,
Sure.
Now we're inverstigating the issue. If you don't mind, I will keep you posted on this via email.

Catherine.
Technical Support E-mail: support@cadsofttools.com
Chat support on Skype: cadsofttools.support

support
Posts: 3271
Joined: 30 Mar 2005, 11:36
Contact:

Re: Combining DXF files into a new one

Post by support » 21 Feb 2023, 12:03

support wrote:
21 Feb 2023, 11:24
uligerhardt wrote:
20 Feb 2023, 19:45
support wrote:
06 Feb 2023, 14:40
Hello,
Thank you for attaching the files.
We fixed the issue with memory leaks, however, to send you a fixed and revised VCL package we need to know your order No or registration email. Could you contact me at support@cadsofttools.com with this information and I will send you a link with improved CAD VCL package?
P.S.: the issue is fixed in CAD VCL 15, the package is sent.

Catherine.
Thanks Catherine,
we've received version 15 now, and indeed the memory leaks are gone!
Unfortunately the exported DXF is still empty. Can you help me there too?
Hi,
Sure.
Now we're inverstigating the issue. If you don't mind, I will keep you posted on this via email.

Catherine.
Hi,
Try using the code below to export DXF files corrrectly:

Code: Select all

...
Pos.X := x - Extents.Left;
      Pos.Y := -Extents.Top - (i * 10);
      Pos.Z := 0;
      FCADFile.AddScaledDXF(
        dxf,
        li.Caption,
        Pos,
        MakeFPoint(1.0, 1.0, 1.0),
        0.0);
...
Catherine.
Technical Support E-mail: support@cadsofttools.com
Chat support on Skype: cadsofttools.support

Post Reply