Classe TJSONValue

Unit

uRESTDWParams

Declaração

type TJSONValue = class(TObject)

Descrição

Hierarquia

• TObject
• TJSONValue

Visão Geral

Métodos

	Procedure BeginBytes(DataSize : DWInt64);
	Function AsString: String;
	Procedure Clear;
	Procedure ToStream(Var bValue : TMemoryStream);
	Procedure LoadFromDataset(TableName : String; bValue : TDataset; EncodedValue : Boolean = True; DataModeD : TDataMode = dmDataware; DateTimeFormat : String = ''; DelimiterFormat : String = ''; CharSet : TDatabaseCharSet = csUndefined; DataType : Boolean = False; HeaderLowercase : Boolean = False); Overload;
	Procedure LoadFromDataset(TableName : String; bValue, bDetail : TDataset; DetailType : TRESTDWJSONType = TRESTDWJSONArrayType; DetailElementName: String = 'detail'; EncodedValue : Boolean = True; DataModeD : TDataMode = dmDataware; DateTimeFormat : String = ''; DelimiterFormat : String = ''; CharSet : TDatabaseCharSet = csUndefined; DataType : Boolean = False; HeaderLowercase : Boolean = False); Overload;
	Procedure WriteToFieldDefs(JSONValue : String; Const ResponseTranslator : TRESTDWResponseTranslator);
	procedure WriteToDataset2(JSONValue: String; DestDS: TDataset);
	Procedure WriteToDataset(JSONValue : String; Const DestDS : TDataset); Overload;
	Procedure WriteToDataset(JSONValue : String; Const DestDS : TDataset; ResponseTranslator : TRESTDWResponseTranslator; RequestMode : TRequestMode); Overload;
	Procedure WriteToDataset(DatasetType : TDatasetType; JSONValue : String; Const DestDS : TDataset; Var JsonCount : Integer; Datapacks : Integer = -1; ActualRec : Integer = 0; ClearDataset : Boolean = False; CharSet : TDatabaseCharSet = csUndefined); Overload;
	Procedure WriteToDataset(DatasetType : TDatasetType; JSONValue : String; Const DestDS : TDataset; ClearDataset : Boolean = False; CharSet : TDatabaseCharSet = csUndefined); Overload;
	Procedure LoadFromJSON(bValue : String); Overload;
	Procedure LoadFromJSON(bValue : String; DataModeD : TDataMode); Overload;
	Procedure LoadFromStream(Stream : TStream);
	Procedure SaveToStream(Const Stream : TStream);
	Procedure SaveToFile(FileName : String);
	Procedure ToBytes(Value : String; Encode : Boolean = False);
	Function ToJSON: String;
	Procedure SetValue(Value : Variant; Encode : Boolean = True);
	Function Value: Variant;
	Constructor Create;
	Destructor Destroy; Override;
	Function IsNull: Boolean;

Propriedades

	property ServerFieldList : TFieldsList Read vFieldsList Write SetFieldsList;
	property NewFieldList : TProcedureEvent Read GetNewFieldList Write vNewFieldList;
	property FieldExist : TFieldExist Read GetFieldExist Write vFieldExist;
	property CreateDataset : TProcedureEvent Read GetCreateDataSet Write vCreateDataset;
	property NewDataField : TNewDataField Read GetNewDataField Write vNewDataField;
	property SetInitDataset : TSetInitDataset Read GetSetInitDataset Write vSetInitDataset;
	property SetRecordCount : TSetRecordCount Read GetSetRecordCount Write vSetRecordCount;
	property Setnotrepage : TSetnotrepage Read GetSetnotrepage Write vSetnotrepage;
	property SetInDesignEvents : TSetInitDataset Read GetSetInDesignEvents Write vSetInDesignEvents;
	property SetInBlockEvents : TSetInitDataset Read GetSetInBlockEvents Write vSetInBlockEvents;
	property SetInactive : TSetInitDataset Read GetSetInactive Write vSetInactive;
	property FieldListCount : TFieldListCount Read GetFieldListCount Write vFieldListCount;
	property GetInDesignEvents : TGetInDesignEvents Read GetGetInDesignEvents Write vGetInDesignEvents;
	property PrepareDetailsNew : TProcedureEvent Read GetPrepareDetailsNew Write vPrepareDetailsNew;
	property PrepareDetails : TPrepareDetails Read GetPrepareDetails Write vPrepareDetails;
	property TypeObject : TTypeObject Read vTypeObject Write vTypeObject;
	property ObjectDirection : TObjectDirection Read vObjectDirection Write vObjectDirection;
	property ObjectValue : TObjectValue Read vObjectValue Write vObjectValue;
	property Binary : Boolean Read vBinary Write vBinary;
	property Utf8SpecialChars : Boolean Read vUtf8SpecialChars Write vUtf8SpecialChars;
	property Encoding : TEncodeSelect Read vEncoding Write SetEncoding;
	property Tagname : String Read vtagName Write vtagName;
	property Encoded : Boolean Read vEncoded Write vEncoded;
	property DataMode : TDataMode Read vDataMode Write vDataMode;
	property FloatDecimalFormat : String Read vFloatDecimalFormat Write vFloatDecimalFormat;
	property AsBytes : TRESTDWBytes Read GetBytes Write WriteBytes;
	property DatabaseCharSet : TDatabaseCharSet Read vDatabaseCharSet Write vDatabaseCharSet;
	property OnWriterProcess : TOnWriterProcess Read vOnWriterProcess Write vOnWriterProcess;
	property Inactive : Boolean Read vInactive Write ExecSetInactive;

Descrição

Métodos

	Procedure BeginBytes(DataSize : DWInt64);

	Function AsString: String;

	Procedure Clear;

	Procedure ToStream(Var bValue : TMemoryStream);

	Procedure LoadFromDataset(TableName : String; bValue : TDataset; EncodedValue : Boolean = True; DataModeD : TDataMode = dmDataware; DateTimeFormat : String = ''; DelimiterFormat : String = ''; CharSet : TDatabaseCharSet = csUndefined; DataType : Boolean = False; HeaderLowercase : Boolean = False); Overload;

Procedure LoadFromDataset(TableName : String; bValue, bDetail : TDataset; DetailType : TRESTDWJSONType = TRESTDWJSONArrayType; DetailElementName: String = 'detail'; EncodedValue : Boolean = True; DataModeD : TDataMode = dmDataware; DateTimeFormat : String = ''; DelimiterFormat : String = ''; CharSet : TDatabaseCharSet = csUndefined; DataType : Boolean = False; HeaderLowercase : Boolean = False); Overload;

	Procedure WriteToFieldDefs(JSONValue : String; Const ResponseTranslator : TRESTDWResponseTranslator);

	procedure WriteToDataset2(JSONValue: String; DestDS: TDataset);

	Procedure WriteToDataset(JSONValue : String; Const DestDS : TDataset); Overload;

	Procedure WriteToDataset(JSONValue : String; Const DestDS : TDataset; ResponseTranslator : TRESTDWResponseTranslator; RequestMode : TRequestMode); Overload;

	Procedure WriteToDataset(DatasetType : TDatasetType; JSONValue : String; Const DestDS : TDataset; Var JsonCount : Integer; Datapacks : Integer = -1; ActualRec : Integer = 0; ClearDataset : Boolean = False; CharSet : TDatabaseCharSet = csUndefined); Overload;

	Procedure WriteToDataset(DatasetType : TDatasetType; JSONValue : String; Const DestDS : TDataset; ClearDataset : Boolean = False; CharSet : TDatabaseCharSet = csUndefined); Overload;

	Procedure LoadFromJSON(bValue : String); Overload;

	Procedure LoadFromJSON(bValue : String; DataModeD : TDataMode); Overload;

	Procedure LoadFromStream(Stream : TStream);

	Procedure SaveToStream(Const Stream : TStream);

	Procedure SaveToFile(FileName : String);

	Procedure ToBytes(Value : String; Encode : Boolean = False);

	Function ToJSON: String;

	Procedure SetValue(Value : Variant; Encode : Boolean = True);

	Function Value: Variant;

	Constructor Create;

	Destructor Destroy; Override;

	Function IsNull: Boolean;

Propriedades

	property ServerFieldList : TFieldsList Read vFieldsList Write SetFieldsList;

	property NewFieldList : TProcedureEvent Read GetNewFieldList Write vNewFieldList;

	property FieldExist : TFieldExist Read GetFieldExist Write vFieldExist;

	property CreateDataset : TProcedureEvent Read GetCreateDataSet Write vCreateDataset;

	property NewDataField : TNewDataField Read GetNewDataField Write vNewDataField;

	property SetInitDataset : TSetInitDataset Read GetSetInitDataset Write vSetInitDataset;

	property SetRecordCount : TSetRecordCount Read GetSetRecordCount Write vSetRecordCount;

	property Setnotrepage : TSetnotrepage Read GetSetnotrepage Write vSetnotrepage;

	property SetInDesignEvents : TSetInitDataset Read GetSetInDesignEvents Write vSetInDesignEvents;

	property SetInBlockEvents : TSetInitDataset Read GetSetInBlockEvents Write vSetInBlockEvents;

	property SetInactive : TSetInitDataset Read GetSetInactive Write vSetInactive;

	property FieldListCount : TFieldListCount Read GetFieldListCount Write vFieldListCount;

	property GetInDesignEvents : TGetInDesignEvents Read GetGetInDesignEvents Write vGetInDesignEvents;

	property PrepareDetailsNew : TProcedureEvent Read GetPrepareDetailsNew Write vPrepareDetailsNew;

	property PrepareDetails : TPrepareDetails Read GetPrepareDetails Write vPrepareDetails;

	property TypeObject : TTypeObject Read vTypeObject Write vTypeObject;

	property ObjectDirection : TObjectDirection Read vObjectDirection Write vObjectDirection;

	property ObjectValue : TObjectValue Read vObjectValue Write vObjectValue;

	property Binary : Boolean Read vBinary Write vBinary;

	property Utf8SpecialChars : Boolean Read vUtf8SpecialChars Write vUtf8SpecialChars;

	property Encoding : TEncodeSelect Read vEncoding Write SetEncoding;

	property Tagname : String Read vtagName Write vtagName;

	property Encoded : Boolean Read vEncoded Write vEncoded;

	property DataMode : TDataMode Read vDataMode Write vDataMode;

	property FloatDecimalFormat : String Read vFloatDecimalFormat Write vFloatDecimalFormat;

	property AsBytes : TRESTDWBytes Read GetBytes Write WriteBytes;

	property DatabaseCharSet : TDatabaseCharSet Read vDatabaseCharSet Write vDatabaseCharSet;

	property OnWriterProcess : TOnWriterProcess Read vOnWriterProcess Write vOnWriterProcess;

	property Inactive : Boolean Read vInactive Write ExecSetInactive;

---

Gerado por PasDoc 0.16.0.