Migrate old CADImportVersion to DelphiXE2 and new CADImport
Posted: 14 Sep 2012, 10:02
Hello Support-Team,
I used the old version of CAD Import VCL (February, 2007: CAD Import VCL 6.1) with Delphi 7. It's work great. Now i upgrate to Delphi XE2 and the new version of CADImportVCL but they are not compatible to the old version.
The follow functions are not in the new version of CAD Import VCL. How can I migrate the functions? I use CADImportVCL to put elements to the CAD-plan and zoom in and out. i save the x/y coordinate of the new elemtes (doors and keys) in the database.
At 23.09.2012 we have a fair "Security" and I must show the new version of portier, but I can't migrate the new CAD Version.
Regards
Axel
I used the old version of CAD Import VCL (February, 2007: CAD Import VCL 6.1) with Delphi 7. It's work great. Now i upgrate to Delphi XE2 and the new version of CADImportVCL but they are not compatible to the old version.
The follow functions are not in the new version of CAD Import VCL. How can I migrate the functions? I use CADImportVCL to put elements to the CAD-plan and zoom in and out. i save the x/y coordinate of the new elemtes (doors and keys) in the database.
Code: Select all
property sgPaintBox: TsgDrawingNavigator read FsgPaintBox; property Img: TsgCADImage read GetImg;
---------------------------------------------------------------------------
sgPaintBox.ChangeScale(False, 2, sgPaintBox.Center)
sgPaintBox.PrevScale;
sgPaintBox.HasPrevScale;
sgPaintBox.IsBigScale := False;
sgPaintBox.ScaleMMWidth := Img.AbsWidth;
Img.Converter.OEM
Img.Charset
sgPaintBox.ScaleMMWidth := Img.AbsWidth;
{$IFNDEF sgDXFONLY}
DWGPreview := True;
{$ENDIF}
Regards
Axel