DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: a1871584487
今日帖子: 9
在线用户: 8
导航: 论坛 -> 开源项目 斑竹:joki,ralf_jones  
作者:
男 ralf_jones (Ralf) ★☆☆☆☆ -
盒子活跃会员
2004/3/17 10:09:11
标题:
SmallStruct3的基本开发流程 浏览:4353
加入我的收藏
楼主: 1.从TS2ServerDataModel派生一个子类
2.覆盖TS2ServerDataModel的GetCaption和GetPrimaryKeyName方法.
3.从某个View派生一个子类
4.覆盖TS2View的GetCaption和InitView方法.
----------------------------------------------
-
作者:
男 waterstone (waterstone) ★☆☆☆☆ -
盒子活跃会员
2004/3/17 10:44:39
1楼: 弄个DEMO出来吧!

----------------------------------------------
我来自农村广阔的田野我的每一个动作都很夸张http://waterstone.51r.com
作者:
男 ralf_jones (Ralf) ★☆☆☆☆ -
盒子活跃会员
2004/3/17 10:51:22
2楼: 有个Demo,在App目录下。
----------------------------------------------
-
作者:
男 arichman (aaa) ★☆☆☆☆ -
盒子活跃会员
2004/3/17 10:57:19
3楼: 捕获的错误信息怎么显示,怎么光有提示框,没有信息内容?
----------------------------------------------
-
作者:
男 arichman (aaa) ★☆☆☆☆ -
盒子活跃会员
2004/3/17 11:03:41
4楼: 测试的页面上的其他按钮是从哪里来的,怎么只有增加和保存可以用,其他没有反映
----------------------------------------------
-
作者:
男 ralf_jones (Ralf) ★☆☆☆☆ -
盒子活跃会员
2004/3/17 11:11:17
5楼: 因为没弄完,你可以看看代码。
----------------------------------------------
-
作者:
男 arichman (aaa) ★☆☆☆☆ -
盒子活跃会员
2004/3/17 11:51:55
6楼: 好的,我们也会帮你测试的。
----------------------------------------------
-
作者:
男 debugxp (hahaha) ★☆☆☆☆ -
普通会员
2004/3/25 22:53:13
7楼: 关注。
希望有个Demo
----------------------------------------------
-
作者:
男 luckynavy (luckynavy) ★☆☆☆☆ -
盒子活跃会员
2004/3/26 9:54:07
8楼: ralf_jones你好,我对smallstruct非常感兴趣,但是无从下手。能否给个例子,不胜感激啊!
----------------------------------------------
-
作者:
男 scjinsui2003 ( ) ★☆☆☆☆ -
普通会员
2004/4/13 13:00:49
9楼: 使用了太多的接口,看得有些头胀,不知有没有比较详细的文档可供参考呢?
----------------------------------------------
-
作者:
男 ralf_jones (Ralf) ★☆☆☆☆ -
盒子活跃会员
2004/4/13 17:43:52
10楼: 这里有文档:http://www.efile.com.cn/eFile/ralf_jones/20040410.rar
----------------------------------------------
-
作者:
男 zengsun (Drak) ★☆☆☆☆ -
普通会员
2004/4/23 16:15:15
11楼: 文档太简单了,程序很复杂。看的我头大!
有没有一个小的模型? 和有关原理的文档
以及实现mvc的手段。
mvc来自java,主要在web的项目中使用。我们知道web是没有状态的。
controller是servlet.但delphi程序是有状态的,我们还需要实现controller吗
我刚开始接触mvc,上面的话可能没有描述清楚,也可能是错误的。
望大家不吝赐教。
对了,在目前的SmallStruct3中实现了那些经典的设计模式?
我在数据处理的上有不同的方法。
下面是我定义的接口文件
unit DataSvrIntfs;

interface

uses DB;

type
  { DataSet interface. v1.14 + zengsun 2004-3-3
    * v1.24 zengsun 2004-4-5.
    }
  IDataSet = interface
  ['{6B2413CC-A7A8-474C-9BCE-A42BA4CB4496}']
    procedure Query(const Command: String);
    procedure SetMaster(Master: IDataSet);
    procedure SetMasterFields(Fields: String);

    procedure SetValueParamByName(const ParamName: String; Value: Variant);
    procedure SetSQLText(const Value: String);
    procedure Open;
    function DataSet: TDataSet;
    function DataSource: TDataSource;

  end;

  { Data Server interface. v1.4 + zengsun 2004-3-3 }
  IDataServer = interface
  ['{8E1E363F-C9F9-4061-BE97-945D42014F0A}']
    function Active: Boolean;
    function Query(const Command: WideString): IDataSet;
    function GetDataSet: IDataSet;
    procedure Execute(const Command: WideString; var RecordsAffected: Integer);
    function InsertID(const Command, FieldName: WideString): Integer;
    function DataCount: Integer;
    function Msg: String;
    function BeginTrans: Integer;
    procedure CommitTrans;
    procedure RollbackTrans;
  end;

implementation

end.

这是一个工厂模式的设计。我在其他的单元文件中实现这个接口。
然后在其他的模块中使用这个接口来获得需要的数据集。
这样可以实现其他模块与数据引擎分离的目的。
也不知道我说明白没有?哈,先到这里。

----------------------------------------------
-
作者:
男 arichman (aaa) ★☆☆☆☆ -
盒子活跃会员
2004/4/23 17:02:31
12楼: 欢迎高手来交流
(我来学习了,哈哈,旁听)
----------------------------------------------
-
作者:
男 ralf_jones (Ralf) ★☆☆☆☆ -
盒子活跃会员
2004/4/28 8:58:10
13楼: to: zengsun
我看看了你的例子。你已经破坏大部分OO的基本原则。
这两个接口像是对DataSet和DataModule的再包装,
即没有让程序变的更简单,也没有增加更多的功能。
----------------------------------------------
-
作者:
男 ralf_jones (Ralf) ★☆☆☆☆ -
盒子活跃会员
2004/4/28 10:07:34
14楼: //////////////////////////////////////////////////////////////////
mvc来自java,主要在web的项目中使用。我们知道web是没有状态的。
controller是servlet.但delphi程序是有状态的,我们还需要实现controller吗
//////////////////////////////////////////////////////////////////
1.mvc最早的实现在Smalltalk里.作为一个一般的设计模式可以用在任何面向对象的语言里.
2.现在常见的基于java的web框架大都使用mvc(version 2),比如Struts,Enhydra等等.在mvc里Model主要用来保存状态的,亦也用来实现Business Logic.Controller和View都没有状态,但View会将自已的状态保存在Model中.Web的前端不能直接保存状态,这是一个限制.由于..Net的Web Form技术出现,这一个限制亦成为过去.
3.一个对象(Delphi中的对象)有没有状态取决于你的设计和你的意图,与使用什么样的语言没有关系.
4.GUI程序基于离散事件模型,出于实际用图和它的根本特性,必然会接收和响应用户的各种请求(输入).Controller即是用来完成这一功能的.如果在mvc里不使用Controller,你的程序怎么运行呢?
----------------------------------------------
-
作者:
男 ralf_jones (Ralf) ★☆☆☆☆ -
盒子活跃会员
2004/4/28 10:32:31
15楼: ------------------------------------------------
对了,在目前的SmallStruct3中实现了那些经典的设计模式?
------------------------------------------------
设计模式是怎为一项基本的设计工具在SmallStruct使用的很普遍.MVC本身就是一个经典的设计模式.其它常用的像Factory Class, Factory Method, Faced, Broadcast, Proxy, Adapter, Single等等.没有计算过,总之是该用多少就用多少吧.
----------------------------------------------
-
作者:
男 plutozhuam (pluto) ★☆☆☆☆ -
普通会员
2004/6/15 8:37:54
16楼: 我是搞JAVA的,不过最近在做DELPHI方面的程序

RALF_JONES说的没错!
其实刻意追求设计模式是没有必要的
,只是你需要的时候,可以应用罢了,MVC是很不错的,JAVA方面他的实现FRAMEWORK
也有很多,比如struts,webwork等等许多,感觉许多的DELPHI程序员还在写背离OOP的
程序,他们感觉自己不错,呵呵!!

----------------------------------------------
-
作者:
男 plutozhuam (pluto) ★☆☆☆☆ -
普通会员
2004/6/15 8:45:53
17楼: mvc简介
-----------------------------------


客户(IE),OR OTHER CLIENT 1----> CONTROLLER 2------> MODEL{(DATA,BUSINESS)
                                           3<------
                                           4------->VIEW
       
客户(IE),OR OTHER CLIENT5<-----------------------------
----------------------------------------------
-
作者:
男 jhwh (jhwh) ★☆☆☆☆ -
普通会员
2004/6/24 22:55:41
18楼: 如果连这些“构架”都不追求模式,还谈什么别人背离了OOP。自己看看自己懂了什么是oo没有。
----------------------------------------------
-
作者:
男 ralf_jones (Ralf) ★☆☆☆☆ -
盒子活跃会员
2004/6/25 10:06:31
19楼: 请jhwh兄就事论事,不要作无谓的人生攻击,这里是技术论坛。
这里的讨论表不代表对你本人有什么看法,仅仅就技术本身进行讨论,请你不要误会,也不要发表明显带有情绪色彩的言论.
谢谢你的参与,如果我说了什么使你不快的话,请你不要计较,在此我向你真诚道歉.
----------------------------------------------
-
作者:
男 libertine (libertine) ★☆☆☆☆ -
盒子活跃会员
2004/6/25 10:31:45
20楼: 文档下载不了.
----------------------------------------------
-
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行70.3125毫秒 RSS