Class TfrmImportDXF

DescriptionHierarchyFieldsMethodsProperties

Unit

frmImportDXFUnit

Declaration

type TfrmImportDXF = class(TfrmCustomImportSimpleFile)

Description

TfrmImportDXF is used to import DXF files into GoPhast.

See miImportDXFFileClick.

Hierarchy

Overview

Fields

Private FDxfObject: DXF_Object;
Private FDxfName: string;

Methods

Implicit procedure btnOKClick(Sender: TObject);
Implicit procedure FormDestroy(Sender: TObject); override;
Private function CoordConvert(P: Point3D; OCS: pMatrix): Point3D;
Private procedure SetData;
Private procedure Think(const Sender: TObject; Message: string);
Public function GetData: boolean;

Description

Fields

Private FDxfObject: DXF_Object;

FDxfObject: DXF_Object; FDxfObject represents the contents of the DXF file. DXF_Object is defined in DXF_Structs.

Private FDxfName: string;
 

Methods

Implicit procedure btnOKClick(Sender: TObject);

btnOKClick calls SetData.

Implicit procedure FormDestroy(Sender: TObject); override;

FormDestroy frees FDxfObject.

Private function CoordConvert(P: Point3D; OCS: pMatrix): Point3D;

CoordConvert is used to transform the coordinates of P based on OCS.

Private procedure SetData;

SetData converts the entities from FDxfObject to TScreenObjects.

Private procedure Think(const Sender: TObject; Message: string);

Think is used to update frmProgressMM.

Public function GetData: boolean;

GetData is used to open and read a DXF file. It returns True if it was able to do so and the file contains something it can use.

Generated by PasDoc 0.12.1 on 2013-05-13 15:41:37