¡@
2014/10/16 ¤W¤È 12:03:32
jquery Programming Glossary: fsumindentConvert Record to Serialized Form Data for sending via HTTP http://stackoverflow.com/questions/11427706/convert-record-to-serialized-form-data-for-sending-via-http Classes RTTI TypInfo Type TSerializer record private FSumIndent string procedure IncIndent procedure DecIndent public procedure.. end implementation procedure TSerializer.IncIndent begin FSumIndent FSumIndent ' ' end procedure TSerializer.DecIndent begin SetLength.. procedure TSerializer.IncIndent begin FSumIndent FSumIndent ' ' end procedure TSerializer.DecIndent begin SetLength FSumIndent..
Convert Record to Serialized Form Data for sending via HTTP http://stackoverflow.com/questions/11427706/convert-record-to-serialized-form-data-for-sending-via-http unit unit SerializerBoilerplate interface uses System.SysUtils Classes RTTI TypInfo Type TSerializer record private FSumIndent string procedure IncIndent procedure DecIndent public procedure Serialize const name string thing TValue sList TStrings.. name string thing TValue sList TStrings first boolean true end implementation procedure TSerializer.IncIndent begin FSumIndent FSumIndent ' ' end procedure TSerializer.DecIndent begin SetLength FSumIndent Length FSumIndent 2 end procedure TSerializer.Serialize.. thing TValue sList TStrings first boolean true end implementation procedure TSerializer.IncIndent begin FSumIndent FSumIndent ' ' end procedure TSerializer.DecIndent begin SetLength FSumIndent Length FSumIndent 2 end procedure TSerializer.Serialize..
|