TCustomXsdGenerator

type TCustomXsdGenerator = class(TInterfacedObject,IInterface,IGenerator,IXsdGenerator)

protected

  function GetSchemaNode(); virtual; abstract;

  procedure SetPreferedShortNames();

  function GetPreferedShortNames;

  procedure GenerateEnum();

  procedure GenerateComplex();

  procedure Execute();

  procedure Prepare(); virtual;

  property Document: TDOMDocument; [r]

  property Options: TGeneratorOptions; [r]

public

  constructor Create();

  destructor Destroy; override;

end;

TCustomXsdGenerator

TObject,IInterface,IGenerator,IXsdGenerator