随笔分类 -  DELPHI MONGODB 驱动代码

摘要：function TMyMongoDbClass.JsonToBson(code:string;obj: tjsonvalue): tbson;var b:tbson; jv:tjsonvalue; buffer:tbsonbuffer; function BL_json(curbuf:tb... 阅读全文

摘要：function(){var a= db.test.find();var doc;for(i=0;i<a.length();i++)doc=doc||a;return doc;}function(){var a= db.test.findOne();return a;} 阅读全文

摘要：if dbman=nil then dbman:=tdbmanage.create;code:=tbsoncodewscope.Create('function(){var str="1111";db.testc.find().forEach(function(x){str=str+ x.name}... 阅读全文

摘要：procedure TForm1.BitBtn7Click(Sender: TObject);var query,b1,b2:tbson; buf:tbsonbuffer; code:tbsoncodewscope;beginif dbman=nil then dbman:=tdbmanage.c... 阅读全文

摘要：var query,b1,b2:tbson; buf:tbsonbuffer; code:TBsonCodeWScope; begin if dbman=nil then dbman:=tdbmanage.create; buf:=tbsonbuffer.Create; buf.startO... 阅读全文