Unit uRESTDWJSONObject

Descrição

 

Uses

Visão Geral

Classes, Interfaces, Objetos e Registros

Nome Descrição
Classe TJSONBufferObject  
Classe TDWParamsList  
Classe TJSONValue  
Classe TJSONParam  
Classe TStringStreamList  
Classe TRESTDWHeaders  
Classe TDWDatalist  

Funções e Procedimentos

Function StringToJsonString(OriginalString : String) : String;
Function CopyValue(Var bValue : String) : String;
Function unescape_chars(s : String) : String;
Function escape_chars(s : String) : String;
Function StringToGUID(GUID : String) : TGUID;

Tipos

TOnWriterProcess = Procedure (DataSet : TDataSet; RecNo, RecordCount : Integer;Var AbortProcess : Boolean) Of Object;
TDWParamExpType = (...);
TProcedureEvent = Procedure Of Object;
TNewDataField = Procedure (FieldDefinition : TFieldDefinition) Of Object;
TFieldExist = Function (Const Dataset : TDataset; Value : String) : TField Of Object;
TSetInitDataset = Procedure (Const Value : Boolean) Of Object;
TSetRecordCount = Procedure (aJsonCount, aRecordCount : Integer) Of Object;
TSetnotrepage = Procedure (Value : Boolean) Of Object;
TFieldListCount = Function : Integer Of Object;
TGetInDesignEvents = Function : Boolean Of Object;
TPrepareDetails = Procedure (ActiveMode : Boolean) Of Object;
PJSONParam = ˆTJSONParam;
PStringStream = ˆTStringStream;

Constantes

TSpecialChars : Array [0 .. 7] Of Char = ('\', '"', '/', #8, #9, #10, #12, #13);
MaxFloatLaz = 15;
LazDigitsSize = 6;

Descrição

Funções e Procedimentos

Function StringToJsonString(OriginalString : String) : String;
 
Function CopyValue(Var bValue : String) : String;
 
Function unescape_chars(s : String) : String;
 
Function escape_chars(s : String) : String;
 
Function StringToGUID(GUID : String) : TGUID;
 

Tipos

TOnWriterProcess = Procedure (DataSet : TDataSet; RecNo, RecordCount : Integer;Var AbortProcess : Boolean) Of Object;
 
TDWParamExpType = (...);
 
Valores
  • tdwpxt_All
  • tdwpxt_IN
  • tdwpxt_OUT
  • tdwpxt_INOUT
TProcedureEvent = Procedure Of Object;
 
TNewDataField = Procedure (FieldDefinition : TFieldDefinition) Of Object;
 
TFieldExist = Function (Const Dataset : TDataset; Value : String) : TField Of Object;
 
TSetInitDataset = Procedure (Const Value : Boolean) Of Object;
 
TSetRecordCount = Procedure (aJsonCount, aRecordCount : Integer) Of Object;
 
TSetnotrepage = Procedure (Value : Boolean) Of Object;
 
TFieldListCount = Function : Integer Of Object;
 
TGetInDesignEvents = Function : Boolean Of Object;
 
TPrepareDetails = Procedure (ActiveMode : Boolean) Of Object;
 
PJSONParam = ˆTJSONParam;
 
PStringStream = ˆTStringStream;
 

Constantes

TSpecialChars : Array [0 .. 7] Of Char = ('\', '"', '/', #8, #9, #10, #12, #13);

\b \t \n \f \r

MaxFloatLaz = 15;
 
LazDigitsSize = 6;
 

Gerado por PasDoc 0.16.0.