DXFExportVCL
Moderators: SDS, support, admin
DXFExportVCL
Hi,
i just DXFExportVCL compoment to create a dxf file dirtectly from my drawing. ( i use the 6.1 version of CadImport and DxfExport with source).
I use this code to export :
procedure TForm_FaceAvant.CreateDXF;
var
vExp: TsgCADtoDXF;
Nom_dxf: string;
Version: TsgDWGVersion;
begin
SaveDialogDXF.Filter := 'Fichier DXF|*.dxf';
if not SaveDialogDXF.Execute then
Exit;
Version := acR2004;
Form_Choix_DXF_Version := TForm_Choix_DXF_Version.Create(self);
Form_Choix_DXF_Version.ShowModal;
vExp := TsgCADtoDXF.Create(TsgDXFImage(sgPaintBox.Picture.Graphic));
case Form_Choix_DXF_Version.ComboBox1.ItemIndex of
0: Version := acR2000;
1: Version := acR2004;
2: Version := acR2007;
end;
if pos('.dxf', SaveDialogDXF.FileName) = 0 then Nom_dxf := SaveDialogDXF.FileName + '.dxf'
else Nom_dxf := SaveDialogDXF.FileName;
FreeAndNil(Form_Choix_DXF_Version);
vExp.Version := Version;
vExp.SaveToFile(Nom_Dxf);
vExp.Free;
end;
The dxf is correctly create and i can open it with a little homemade program.
But under AutoCad 2008 i got this error message :
Error at reading LINE at line 1480:
Type's name of line DASHDOT incorrect
DXF input incomplet.....
There is a update for DXFExport or Does AutoCad2008 have some problems to read it ?
Can i send to you the dxf file ?
Best regard
E.Jourde
i just DXFExportVCL compoment to create a dxf file dirtectly from my drawing. ( i use the 6.1 version of CadImport and DxfExport with source).
I use this code to export :
procedure TForm_FaceAvant.CreateDXF;
var
vExp: TsgCADtoDXF;
Nom_dxf: string;
Version: TsgDWGVersion;
begin
SaveDialogDXF.Filter := 'Fichier DXF|*.dxf';
if not SaveDialogDXF.Execute then
Exit;
Version := acR2004;
Form_Choix_DXF_Version := TForm_Choix_DXF_Version.Create(self);
Form_Choix_DXF_Version.ShowModal;
vExp := TsgCADtoDXF.Create(TsgDXFImage(sgPaintBox.Picture.Graphic));
case Form_Choix_DXF_Version.ComboBox1.ItemIndex of
0: Version := acR2000;
1: Version := acR2004;
2: Version := acR2007;
end;
if pos('.dxf', SaveDialogDXF.FileName) = 0 then Nom_dxf := SaveDialogDXF.FileName + '.dxf'
else Nom_dxf := SaveDialogDXF.FileName;
FreeAndNil(Form_Choix_DXF_Version);
vExp.Version := Version;
vExp.SaveToFile(Nom_Dxf);
vExp.Free;
end;
The dxf is correctly create and i can open it with a little homemade program.
But under AutoCad 2008 i got this error message :
Error at reading LINE at line 1480:
Type's name of line DASHDOT incorrect
DXF input incomplet.....
There is a update for DXFExport or Does AutoCad2008 have some problems to read it ?
Can i send to you the dxf file ?
Best regard
E.Jourde
Re: DXFExportVCL
Hello!
- Current version of DXF Export VCL supports export to DXF acR2000.
- Also we have incomplete support of DXF acR2004.
- We need your source file or a code that is used to create DXF file.
Technical Support E-mail: support@cadsofttools.com
Chat support on Skype: cadsofttools.support
Chat support on Skype: cadsofttools.support