盒子论坛 v2.1

做中间件需要大量的测试、检验、改进完善，所以V4版本经过了7、8年的艰苦打磨，此过程非常艰辛。最近在V4版本趋于完善之后，又基本完成了V5版本的开发，目前正在综合测试阶段。V5版本将继承V4终极版的全部功能与特色，并开始以64位技术进行实现，将给系统带来更大可用内存、更大的并发性能。另外，V5版本的服务管理器等周边管理工具也会使用新版Delphi来编写，并不再采用第三方界面控件，确保最为方便的OEM改造手段。相信QuickBurro V5/64Bits能继续在Delphi三层架构领域一骑当先、再做典范。

此帖子包含附件:

大小:82.1K

----------------------------------------------
樵夫的大马甲

作者：

jopher3 (樵夫的马六甲)	▲▲▲▲▲	-
	普通会员

2017/9/19 5:17:30

1楼：

英文版，界面一样清爽
无三方，便于OEM
.

此帖子包含附件:

大小:75.6K

----------------------------------------------
樵夫的大马甲

作者：

homejun (homejun)	★☆☆☆☆	-
	盒子活跃会员

2017/9/19 6:55:21

2楼：

顶一下
----------------------------------------------
-delphi新资讯站 http://www.delphigear.cn

作者：

jopher3 (樵夫的马六甲)	▲▲▲▲▲	-
	普通会员

2017/9/19 7:08:59

3楼：

按惯例，值此中秋国庆佳节来临之际，我们以最优惠的低价开展让利促销活动，一次购买永久使用（无项目数限制，永久免费升级），并赠送纸质《QuickBurro从入门到精通》资料一套、综合示例源码礼包、买OEM加送源码礼包等实惠赠品。所谓“红粉赠佳人、宝剑赠英雄”，希望能将本人打造十年的利刃交付于各位英雄、助您斩获更丰。
.

此帖子包含附件:

大小:107.7K

----------------------------------------------
樵夫的大马甲

作者：

hardnut (麦轲数据管家)	★☆☆☆☆	-
	普通会员

2017/9/19 7:52:19

4楼：

这个界面不错啊,
----------------------------------------------
UniKeeper V10.40 -- 您最贴心的个人数据管理助手

作者：

snakegao (snakegao)	★☆☆☆☆	-
	盒子活跃会员

2017/9/19 8:05:16

5楼：

樵夫的功力越来越深厚啊！！！
----------------------------------------------
-

作者：

jopher3 (樵夫的马六甲)	▲▲▲▲▲	-
	普通会员

2017/9/19 8:36:10

6楼：

买软件赠送书本一套，本人的原创！
.

此帖子包含附件:

大小:200.1K

----------------------------------------------
樵夫的大马甲

作者：

star5 (星五)	★☆☆☆☆	-
	盒子活跃会员

2017/9/19 8:55:12

7楼：

哇~ 都出书了，这个不错。。。
----------------------------------------------
博客 - http://offeu.com
脚本模型 - http://webpascal.com
需要短信接口的请联系我，可发行业与营销内容。

作者：

ghs_79 (ghs)	★☆☆☆☆	-
	盒子活跃会员

2017/9/19 13:53:23

8楼：

为楼主点赞，为Delphi欢呼。
----------------------------------------------
Delphi爱好者。

作者：

looper (keyo)	★☆☆☆☆	-
	盒子活跃会员

2017/9/19 18:26:20

9楼：

这个一看就比较高大上啊，支持支持！
----------------------------------------------
虽千万人吾往矣！

作者：

5bug (5bug)	▲▲▲△△	-
	普通会员

2017/9/19 19:13:37

10楼：

精神上支持支持！
----------------------------------------------
- 写什么呢？

http://www.5bug.wang

作者：

edwinyeah (Edwin)	★☆☆☆☆	-
	盒子活跃会员

2017/9/19 22:04:46

11楼：

支持支持！
----------------------------------------------
-

作者：

akai1203 (w-dins)	★☆☆☆☆	-
	普通会员

2017/9/19 23:27:18

12楼：

顶樵夫！
----------------------------------------------
-把学习当信仰

作者：

nevergrief (孤独骑士)	★☆☆☆☆	-
	盒子活跃会员

2017/9/20 0:44:38

12楼：

可喜可贺，终于5.0了
----------------------------------------------
只有偏执狂才能生存！

作者：

lxy1997 (lxy)	★☆☆☆☆	-
	普通会员

2017/9/20 8:49:28

13楼：

技术牛人。
----------------------------------------------
-

作者：

jopher3 (樵夫的马六甲)	▲▲▲▲▲	-
	普通会员

2017/9/21 8:52:27

14楼：

好东西就是要顶！
要良币驱逐劣币、怎能劣币驱逐良币！
----------------------------------------------
樵夫的大马甲

作者：

mochizuki (mochizuki)	★☆☆☆☆	-
	普通会员

2017/9/21 13:34:38

15楼：

不错，顶一下
----------------------------------------------
-

作者：

jopher3 (樵夫的马六甲)	▲▲▲▲▲	-
	普通会员

2017/9/21 21:09:19

16楼：

V5/64Bits将继续对Lazarus进行支持，解决了高版本Delphi与Lazarus的TDataset不兼容出现的互通障碍。买不起Delphi的，Lazarus+QuickBurro，照样开发三层应用！效果很好。
.

此帖子包含附件:

大小:114.5K

----------------------------------------------
樵夫的大马甲

作者：

jopher3 (樵夫的马六甲)	▲▲▲▲▲	-
	普通会员

2017/9/24 22:28:55

17楼：

QuickBurro中秋国庆节日促销活动明天开始！买驴送书送码送祝福，一次购买永久使用，永久免费升级！（即将升级到V5/64位）超值！
----------------------------------------------
樵夫的大马甲

作者：

jopher3 (樵夫的马六甲)	▲▲▲▲▲	-
	普通会员

2017/9/27 12:53:59

18楼：

QuickBurro V5 Beta版发布：
==========
1、增加64位中间件（Server64目录下，原32位服务改为Server32目录）
2、对全部API函数单元进行改造，使它们适合编写Win32/Win64服务端双环境插件
3、对vclsdk下的TDLLPlugin函数进行改进，排除了异步调用可能因请求头问题而失败的缺陷
4、对全部外围工具进行改写，全部采用Delphi 10.1 Update2（Berlin）进行实现，并去掉了第三方控件
5、对全部资料相关Demo程序进行一遍基于64位服务端的功能测试，修正了几个小问题
6、对核心服务代码进行优化、提高运行效率及可靠性
7、对64位中间件的默认工作参数进行改设，增大任务队列长度、并发线程上限，以充分发挥大内存作用
8、Tools下增加UPX64压缩工具、Demo目录下增补资料外杂项示例
----------
此版本为测试、体验版，意在通过客户体验和反馈修正来提高V5版本品质。
正式的V5/64Bits版本，将于10月中旬发布！
----------------------------------------------
樵夫的大马甲

作者：

jopher3 (樵夫的马六甲)	▲▲▲▲▲	-
	普通会员

2017/10/6 8:58:37

19楼：

V5/64Bits将正式全面支持C++Builder，可以在C++Builder里使用中间件的几十个应用开发控件，轻松编写C/S三层桌面程序、FMX移动App、Web应用，同时也支持用C++Builder编写服务端插件，供前端Delphi/C++Builder/Lazarus/JS/H5等调用。

举个例子：
//
// 以Cds为容器读取数据集...
void __fastcall TFormMain::Button3Click(TObject *Sender)
{
   int i;
   if (MBA->ReadDataset("select * from customers order by customerid",Cds)) {
    Grid->RowCount=Cds->RecordCount;
    Cds->First();
    i=0;
    while ((Cds->Eof)==false) {
      Grid->Cells[0][i]=Cds->FieldByName("CustomerId")->AsString.Trim();
      Grid->Cells[1][i]=Cds->FieldByName("CompanyName")->AsString.Trim();
      Grid->Cells[2][i]=Cds->FieldByName("Phone")->AsString.Trim();
      i++;
      Cds->Next();
     }
    Cds->Close();
    ShowMessage("读数据集成功！");
   }
   else {
    ShowMessage("读数据集失败！");
   }
}

此帖子包含附件:

大小:128.3K

----------------------------------------------
樵夫的大马甲

作者：

jopher3 (樵夫的马六甲)	▲▲▲▲▲	-
	普通会员

2017/10/6 9:01:45

20楼：

再比如，轻松松松的消息传输：

//
// 向绑定字符串属性的连接群发消息...
void __fastcall TForm1::Button5Click(TObject *Sender)
{
   TQBParcel *Parcel=new TQBParcel();
   int i;
//
   Parcel->PutStringGoods("MessageText","莫道谗言如浪深，莫言逐客似沙沉。千淘万漉虽辛苦，吹尽狂沙始到金。");
   for (i=0;i<StrToInt(Edit1->Text);++i)
    {
     if (Poster->PostToStrPropConnections(AnsiString(Edit12->Text.Trim()),AnsiString(Edit5->Text),Parcel))
      {
        Memo1->Lines->Add("发送消息给属性为【"+Edit5->Text.Trim()+"】的所有连接成功！");
          }
         else
      {
         Memo1->Lines->Add("发送消息给属性为【"+Edit5->Text.Trim()+"】的所有连接失败！Error="+Poster->LastError());
      };
     SafeDelay(10);
    };
   Parcel->Free();
}

//
// 收到群发给绑定字符串属性的连接的消息时...
void __fastcall TForm1::ReceiverStrPropConnectionsMessage(TQBParcel *MsgParcel, UnicodeString FromId)
{
   UnicodeString tmpstr;
   //
   Edit2->Text=IntToStr(StrToInt(Edit2->Text)+1);
   tmpstr=MsgParcel->GetStringGoods("MessageText");
   Memo1->Lines->Add("*** 收到了发给绑字符串属性连接的消息：");
   Memo1->Lines->Add(tmpstr);
}

此帖子包含附件:

大小:133.3K

----------------------------------------------
樵夫的大马甲

信息

登陆以后才能回复