网上文摘 最近更新 下载排行 资源分类 下载指南
经典编程资源 精彩不容错过
设为首页
加入收藏
联系我们
当前位置:Delphi园地精彩源码开源项目 → Delphi 2007 Remobjects分布式ERP模型(附加源码)
  本周下载排行
  本月下载排行
资源名称:Delphi 2007 Remobjects分布式ERP模型(附加源码)
文件类型: RAR
适用版本: Delphi6, Delphi7
发 布 者: 滕启荣
资源类型: 免费
资源大小: 4 MB
资源等级:
整理时间: 2008-06-02 15:01:40
资源网址:
下载次数: 本 周:1 本月:3 总计:8978
下载链接:
资源简介: 本实例源码主要是讲了TCP/remote的分布式开发
效果还是不错了 改变了以往COM+的实施麻烦的问题
适合三层应用程序的开发

1.系统服务端开发 采用delphi2007及remobjects SDK 最新版本。
2.客户端的数据访问已经封装在Dll目录下的DllDataAccessObject.dll中,
所以新用户开发时不需要再安装delphi2007及remobjects SDK ,
其他版本也可以。
3.用户开发时只要写个SQL就可以进行远程传输数据。
4.ERP模型使用DELPHI7开发,用户在开发时需引用commom目录下的UnitRemoteLibary单元,集成了远程REMOTE访问数据库
服务端已经考虑了事务,所以不用担心。
5.请仔细研究源码吧...谢谢!

例:查询数据

procedure TMainForm.Button1Click(Sender: TObject);
var
 vDatas:OleVariant;
begin
  FRServerAddress:=Edit1.Text;
  Fiport:=StrToInt(Edit2.Text);
  vDatas:='select * from tbspda';
  if Getdatas(FRServerAddress,Fiport,vDatas) then
  Cds.Data:=vDatas
  else
  ShowVarError(Handle,vDatas,'查询时出错!');
end;

执行数据:
procedure TMainForm.Button2Click(Sender: TObject);
var
 vDatas:OleVariant;
begin
 FRServerAddress:=Edit1.Text;
 Fiport:=StrToInt(Edit2.Text);
 vDatas:='insert into tbdev(mycode)values(''100'')';
 if not Setdatas(FRServerAddress,Fiport,vDatas) then
  ShowVarError(Handle,vDatas,'保存失败!');
end;
相关资源:
  • Delphi 2005 for Win32 安装包 9.1
  • Mastering Delphi 2005 source code
  • Delphi 2007 精简安装版 update3
  • 李维《Delphi 2006高效数据库程序设计-dbExpress篇》
  • Delphi 2010 help update3
  • 相关文章:
  • Win32开发人员为什么”必须”升级到 delphi 2005 ?
  • Delphi 2005 Reviewers Guide
  • Borland推出Borland Delphi 2005
  • What’s New in Delphi 2005?
  • Borland 推出 Borland Delphi 2005
  • Borland Delphi 2005
  • 发现Delphi 2005的几个小Bug
  • 奇迹重现 Delphi 2005赏析 二
  • 奇迹重现 Delphi 2005赏析 三
  • 奇迹重现 Delphi 2005赏析 四
  • 下载帮助() 下载链接错误报告或者意见反馈
    下载说明:
    关于我们 | 广告服务 | 发布资源 | 联系站长 Copyright 2001-2012 Delphi园地 All Rights Reserved