CADSoftTools

Posted: **15 Nov 2010, 13:16**

Hello everyone.

I have big problem with mirroring/rotating function. The problem doesn't exist to one DXF or when I'm trying to mirror whole image (with many DXF's on the canva).
To show what am I talking (writting) about I need to paste some code (the example appies to rotate around Z axis but is doesn't matter):

Code: Select all

TFPoint P,Scale;
  P.X = 0;
  P.Y = 100;
  P.Z = 0;
  Scale.X = 1;
  Scale.Y = 1;
  Scale.Z = 1;
  //////////////////////////////////////////////////////////////////////////////
 //-----Creating a fixed clamp--------------------
 TsgCADImage *vGlobalCADFile;
 TsgCADImage *Im1,*Im2;
 TObject *vCADFiles[2];
 vCADFiles[0] = new TsgCADdxfImage;
 Im1 = dynamic_cast<TsgCADImage *>(vCADFiles[0]);
 Im1->LoadFromFile("bjmclleft.dxf");
 //-----Reading new DXF file----------------------
 vCADFiles[1] = new TsgCADdxfImage;
 Im2 = dynamic_cast<TsgCADImage *>(vCADFiles[1]);
 Im2->LoadFromFile(OpenDialog1->FileName);
//----VERY IMPORTAND PART---------
 Im1->Converter->AddXRef(vCADFiles[1],OpenDialog1->FileName,P,Scale,0);
 TsgDXFXref *Ref;
 Ref = (TsgDXFXref *)Im1->Converter->XRefs->First();

 TsgCADImage *RIm = dynamic_cast<TsgCADImage *>(Ref->CADImage);
 RIm->Rotate(axisZ,45);                    // this doesn't works !

 RIm->Entities[0]->SetColor(clBlue);  // this works properly
 
 RIm->GetExtents(); 
 
 Im1->Rotate(axisZ,45);                    // this works properly but rotate whole image (all DXF's)
 Im1->GetExtents();
//-------------------------------------------------------------------
  vGlobalCADFile = Im1;
  vGlobalCADFile->GetExtents();
  sgPaintBox->Picture->Graphic = vGlobalCADFile;
  sgPaintBox->Invalidate();
  sgPaintBox->FitToSize();

I may say more - the result of rotating/mirroring function is not savable, that means - the rotation/mirror is only visible but when I call SaveToFile function, then the saved file is not rotated/mirrored. It looks like this is not real DXF rotation/mirror but only global coordinate system rotation/mirror. I would to rotate separate DXF betwen another DXF's on the canva.

Maby someone from you had the same problem and is able to help me.
Thank you for any help.

Best regards,

Mariusz Hyżorek

Posted: **16 Nov 2010, 11:47**

Hello Mariusz.
The code sample is correct generally. The rotate method affects XRef's image matrix and angle. However draw method doesn't consider these parameters for XRef. There is another way to draw rotated referenced image. XRef represented as Insert in DXF structure. You can change TsgDXFInsert.Angle property for rotation or redirect TsgDXFInsert.Scale axes for mirroring.

Code: Select all

  TsgCADImage *Im;
  Im = dynamic_cast<TsgCADImage *>(sgPaintBox->Picture->Graphic);

  TsgDXFInsert *Ins;
  Ins = (TsgDXFInsert *)Im->Converter->Entities[i];
  Ins->Angle = some_angle;
  Im->Converter->Loads(Ins);
  sgPaintBox->Refresh();

Alexander.

CADSoftTools

Mirroring function to separate DXF's

Mirroring function to separate DXF's

Re: Mirroring function to separate DXF's