get the scale dxfimage...

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

Moderators: SDS, support, admin

Post Reply
mangchy
Posts: 15
Joined: 08 Nov 2005, 03:06

get the scale dxfimage...

Post by mangchy » 10 Nov 2005, 15:17

Hi!
using CPP Builder and CADImportVCL.
following, I get the scale part image in a point.
but the image somtimes exactly display or absent image in the TsgImage
why?

Code: Select all

    TFPoint SearchPoint;
    Extended vScale;
    double vX, vY;
    TFRect vExt;
    char DS;
    String S;

    sgPaintBox->Align = alNone;
    vExt = Img->Extents;

    vX = StrToFloat(Edit1->Text);
    vY = StrToFloat(Edit2->Text);

    SearchPoint.X = vX;
    SearchPoint.Y = vY;
    SearchPoint.Z = 0;

    vScale = StrToFloat(Edit7->Text);

    sgPaintBox->ShowPoint(SearchPoint, vScale, Img->Extents);

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

Post by support » 11 Nov 2005, 15:39

Hi!

We need some days to correct this demo. Next week right version will be available.

Sergey.

please post questions to the forum or write to support@cadsofttools.com

mangchy
Posts: 15
Joined: 08 Nov 2005, 03:06

Post by mangchy » 11 Nov 2005, 18:18

Ok! I'll wait.
but I must finish a program using CADImportVCL component until next week.. I have things to do remained much.
so, thank for your answering right.
While develop by demonstration,we decide to purchase the license this time.



<blockquote id="quote"><font size="1" face="Verdana, Arial, Helvetica" id="quote">quote:<hr height="1" noshade id="quote"><i>Originally posted by support</i>
<br />Hi!

We need some days to correct this demo. Next week right version will be available.

Sergey.

please post questions to the forum or write to support@cadsofttools.com

<hr height="1" noshade id="quote"></font id="quote"></blockquote id="quote">

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

Post by support » 15 Nov 2005, 10:59

Hello,

This problem has been solved. Corrected CADImportVCL is available on: http://www.cadsofttools.com/download/CADImportVCL.zip

Sergey.

please post questions to the forum or write to support@cadsofttools.com

mangchy
Posts: 15
Joined: 08 Nov 2005, 03:06

Post by mangchy » 16 Nov 2005, 17:23

I download that Files and tried
but result is same .

Code: Select all

    TFPoint SearchPoint;
    Extended vScale;
    double vX, vY;
    TFRect vExt;

    sgPaintBox->Align = alNone;
    vExt = ((TsgDXFImage *)(sgPaintBox->Picture->Graphic))->Extents;

    vX = StrToFloat(edtCaptureX->Text);
    vY = StrToFloat(edtCaptureY->Text);

    SearchPoint.X = vX;
    SearchPoint.Y = vY;
    SearchPoint.Z = 0.0;

    vScale = StrToFloat(edtCaptureScale->Text);

    sgPaintBox->ShowPoint(SearchPoint, vScale, Img->Extents);
(x, y) (391, 357)
scale = 22000

As soon as open file, if do scale by 22000 times, fail
and do by 22000 times after one by 2200, success.

<blockquote id="quote"><font size="2" face="Verdana, Arial, Helvetica" id="quote">quote:<hr height="1" noshade id="quote"><i>Originally posted by support</i>
<br />Hello,

This problem has been solved. Corrected CADImportVCL is available on: http://www.cadsofttools.com/download/CADImportVCL.zip

Sergey.

please post questions to the forum or write to support@cadsofttools.com

<hr height="1" noshade id="quote"></font id="quote"></blockquote id="quote">

Post Reply