yoy.be "Why-o-Why"

2010 ...

januari (4) februari (6) maart (5) april (2) mei (2) juni juli augustus (2) september oktober (5) november (2) december (3)

TMongoWire

2010-12-02 10:05  i2949  delphi freeware  [permalink]

Delphi MongoDB Driver

A Delphi driver to access a mongoDB server.
It maps variables onto Delphi variables of type OleVariant, which resembles the loose typing of JavaScript a lot.
There are two main units and three main object to enable access to a mongo DB server:

bsonDoc.pas
  TBSONDocument = class(TInterfacedObject, IBSONDocument, IPersistStream)

  function BSON:IBSONDocument; overload;
  function BSON(x:array of OleVariant):IBSONDocument; overload;

mongoWire.pas
  TMongoWire=class(TObject)

  TMongoWireQuery=class(TBSONDocumentsEnumerator)

Additional tools

bsonUtils.pas
  function BsonToJson(Doc:IBSONDocument):WideString;
    Converts a BSON document into a JSON string.
  function JsonToBson(jsonData:WideString):IBSONDocument;
    Converts a JSON string into a BSON document.
  procedure JsonIntoBson(jsonData:WideString;doc:IBSONDocument); overload;
    Parses a JSON string and adds any keys to an existing BSON document, overwriting the value if a key already exists.
  procedure JsonIntoBson(jsonData:WideString;doc:IBSONDocument;var EndIndex:integer); overload;
    Parses only the first JSON object from a string into an existing BSON document, and returns the index into the string where the JSON object ends.
    Use this method to iterate over a list of JSON strings. (See also IBSONDocument.Clear)

https://github.com/stijnsanders/TMongoWire

TSQLite

2010-12-14 15:23  i2951  delphi freeware  [permalink]

An alternative SQLite3.dll wrapper

https://github.com/stijnsanders/TSQLite

TSQLite

2010-12-14 15:24  r1619  delphi freeware  [permalink]

TSQLite

(TSQLite)