mORMot sqlite3 数据库远程连接

uses

SynDB, SynOleDB,SynDBMidasVCL,SynDBSQLite3,SynDBRemote;

 

Database: TSQLDatabase;
    gPrope: TSQLDBSQLite3ConnectionProperties;
    DataServer: TSQLDBServerAbstract;

 

Database := TSQLDatabase.Create('GameWebDb.db3'); //这里面可以设置缓存大小

  gPrope := TSQLDBSQLite3ConnectionProperties.Create(Database);

  DataServer :=   TSQLDBServerHttpApi.Create(gPrope,'GameWebDb',7098,'admin','admin123', False, 3);

客户端

var

Props:TSQLDBWinHTTPConnectionProperties;

cds:TSynDBDataSet;

begin

Props := TSQLDBWinHTTPConnectionProperties.Create('127.0.0.1:8092','syndbremote','admin','admin888');

cds := TSynDBDataSet.Create(Self);

cds.Connection := Props;//设置TSynDBDataSet的Connection

cds.CommandText :='select * from HouseInfo '; //定义一个查询串 cds.Open;

DataSource1.DataSet := cds; //给DbGrid的DataSoured数据库的Dataset设置为TSynDBDataSet，将查询结果显示在DBGrid中