见到很多人仍在直接写sql，不知这种情况是不是很普遍，希望大家多讨论。
我在开发目前的系统中定义了一些类，封装了对数据库的操作，能让程序员根据业务快速开发Com+和客户端，至少我觉得很有用。其中有些思想受益于肖兄，在此感谢。我想我们的产品出来后可以找些志同道合的Delphi方面的朋友一起来继续拓展，也算是为中国的软件出点微不足道的力吧。
希望能交更多的朋友。msn:[email protected]
另：国庆后我就是个已婚的程序员了，未婚的兄弟努力哦：）
我在开发目前的系统中定义了一些类，封装了对数据库的操作，能让程序员根据业务快速开发Com+和客户端，至少我觉得很有用。其中有些思想受益于肖兄，在此感谢。我想我们的产品出来后可以找些志同道合的Delphi方面的朋友一起来继续拓展，也算是为中国的软件出点微不足道的力吧。
希望能交更多的朋友。msn:[email protected]
另：国庆后我就是个已婚的程序员了，未婚的兄弟努力哦：）
我现在的SQL是自动生成的，我需要从界面上提取50多项写进数据库中，可是又不想用数据绑定控件，于是就把字段名和值扔到一个数组中，调用函数根据数组自动生成SQL语句。
常用的简单操作够用啦。只是还没想过如何写成编程框架。
我这样是不是很笨啊？总感觉抛弃了Delphi快速开发数据库程序的优势。直接用数据绑定控件的兄弟多不多啊？
shsunb (我怕来不及) 能不能貼些片段,點化一下啊?
我的框架做了两个月才完成，结合数据字典，基本上除了复杂统计外都可对付。至于数据绑定控件，我只用了DBGrid，并且只是浏览数据用。数据录入、查询等控件基本上都是自动生成的，拖上去的也有专门的容器负责管理，当然现在还没有人对其进行评测，效率还可以了。
其实软件最复杂的就是业务了，当然我们现在有业务顾问好多了，不知辛辛苦苦的调研几个月是什么滋味…… ：）
我个人认为创新、学习能力是最重要的，不管是新的软件架构，还是新的业务，如果不能很快适应并创新，终究是要被淘汰的。我很喜欢微软和曼联，就是因为他们对员工一直是培养而不仅仅是利用。
等你变成大老虎就知道了
你写的类能否上传到http://yousoft.hi.com.cn
见识一下！
这里不行吗，呵呵
但全部公开是不对的，毕竟是公司机密，可以公开部分代码学习研究用，不足之处还望大虾指正。
class function XXX.SQLTypeToCDSType(
SQLDataType: string): TFieldType;
begin
if SQLDataType = 'varchar' then Result := ftString
else if SQLDataType = 'uniqueidentifier' then Result := ftGUID
else if SQLDataType = 'datetime' then Result := ftDateTime
else if SQLDataType = 'smallint' then Result := ftSmallInt
else if SQLDataType = 'decimal' then Result := ftBCD
else if SQLDataType = 'numeric' then Result := ftBCD
else if SQLDataType = 'binary' then Result := ftBytes
else if SQLDataType = 'bit' then Result := ftBoolean
else if SQLDataType = 'bigint' then Result := ftLargeint
else if SQLDataType = 'char' then Result := ftString
else if SQLDataType = 'float' then Result := ftFloat
else if SQLDataType = 'image' then Result := ftBlob
else if SQLDataType = 'int' then Result := ftInteger
else if SQLDataType = 'money' then Result := ftBCD
else if SQLDataType = 'nchar' then Result := ftWideString
else if SQLDataType = 'ntext' then Result := ftMemo
else if SQLDataType = 'nvarchar' then Result := ftWideString
else if SQLDataType = 'real' then Result := ftFloat
else if SQLDataType = 'smalldatetime' then Result := ftDateTime
else if SQLDataType = 'smallmoney' then Result := ftBCD
else if SQLDataType = 'text' then Result := ftMemo
else if SQLDataType = 'timestamp' then Result := ftBytes
else if SQLDataType = 'tinyint' then Result := ftSmallint
else if SQLDataType = 'varbinary' then Result := ftVarBytes
else raise Exception.Create('该SQL数据类型无法转换成DELPHI类型！');
end;
因为做数据库开发的，根本离不开的
不过现在写存储过程多了些
恭喜楼主....
谢谢
你们的时间是不是太快了，我这里才20：54
做数据库开发也不可能让用户直接操作数据库呀。我以前也经常写存储过程，客户程序直接调用，但人一多了就特慢。所以还是三层的感觉好。to PrgmLover(爱国者)
谢谢，可惜我不是个体户，呵呵
：）
http://www.ezService.org/
我觉得分工最重要，不分工怎么能社会化大生产呢
当然是要有分工的：）我做的只是消灭一些导致重复劳动的东西
Devchenxip(天天快乐) ，你可以到我们公司来呀，大家一起研究最高效的开发方式。
我们现在用Delphi开发企业内部网和因特网应用。
http://expert.csdn.net/Expert/topic/2262/2262443.xml?temp=.6276667
像我这样的，自己加油>_<
你写的类能否米mail到[email protected]
见识一下！
再就是想问问BEYOND的北京2003演唱会在哪有下载?一直都在找,可惜没找到,请告之!