关于Delphi团队开发的问题，只要有好建议就有分 2.新建一个unit，就可以了。 解决方案 » 免费领取超大流量手机卡，每月29元包185G流量+100分钟通话, 中国电信官方发货 大虾，您说新建一个Unit，将全局变量和函数写在新建的unit中？别的窗口中如何调用？还有在新建的unit中如何声明函数和变量？给个例子好吗？ 在工程中加入一个Unit(取名为xxx),全局变量和公用的函数集中定义都在那里搞定.每个人都uses xxx. 用teamsource工具，DELPHI安装盘中有teamsource工具，主要针对于团队开发而开发的。 TeamSource使用简介 如果我们的开发项目需要在小组模式下进行，那么协调和规范工作流程是非常重要的环节。工欲善其事，必先利其器，如果能够借助版本控制工具，必然会达到事半功倍的效果。 我最近因为需要在csdn上查找版本控制工具的介绍，但发现这方面的帖子很少，可能一个开发小组的领导者都是某个技术领域的专家，玩转一个简单的工具绰绰有余，而初学者往往会因为缺少需求把精力放在技术的实现细节上，anyway,我还是想把我的使用心得简单介绍一下，希望能起一个抛砖引玉的作用。 因为项目是使用BCB进行开发，所以使用的工具是Borland的TeamSource，虽然有部分同僚对TeamSource的印象不是很好，认为和VSS的差距很大，但对于一个5、6个人的小组来说，也能满足大部分要求了，好了，言归正传。以下才是正文:）。使用TeamSource首先要分清几个概念：A（主开发机），B（第三方备份机），C（辅助开发机） 。 在这里A、B都是指局域网上以开发为目的计算机，而A是指建立TeamSource工程文件的计算机；小组开发需要将程序以某种方式共享，B就是指开发人员都能访问的计算机，共享程序就是在B上实现的。注：B上提供共享的文件夹对于小组成员必须是具有完全访问权限的。 注意：TeamSource必须工作在域环境下（如果服务器的操作系统是win2000，需要配置Active Directory） 在小组开发中一般有个TeamLeader，首先应由TeamLeader建立一个新工程(Create new Project)，但在建立工程之前，TeamLeader的计算机上必须有一个”Local directory”保存着程序源文件（一般是项目的代码框架），而”Remote directory”（即第三方备份机）中暂时是没有代码文件的（在工程建立之后可以通过TeamSource将程序文件从Local directory“上传到”Remote directory）。 Local directory和Remote directory是TeamSource中的叫法。 当TeamLeader建立了工程，就可以添加用户了，方法是选Project|Options中的User页，因为在TeamSource中初始权限是只读的，所以可能Add User等按钮是Disabled的，这时候应该将Local View（TeamSource中的本地视图，通过选Local图标查看）中所有文件上锁，权限就变成Write/read，你将发现按钮Enable了，可以添加用户了（当然你得具备添加用户的权限啦！:)）。还有在添加用户时要保证添加的用户名是域中已经存在的用户，因为只有在开发机上以域用户身份登陆TeamSource才会识别用户身份。 至于设置用户的权限的详细方法，在User页上提供了全部功能，只要仔细看看就明白啦！ 添加完用户以后就可以将Local directory中的代码文件备份到第三方备份机上了（就是刚才所说的上传），将所有文件加锁（选中所有文件，然后按F4），然后选中所有文件，点Do it按钮，或者在右键菜单中选择Check in就可以了。 在申请加锁的对话框中，有一个Comment文本框，你在其中填入的文本可以让其他用户看到，那么其他用户就可以知道你申请锁的目的。 如果工程建立成功，那在第三方备份机上就会自动建立几个文件夹，工程文件以cpj为扩展名，一般来说保存在Archives目录下。 现在假设有用户Dippa在一个辅助开发机上登陆并运行TeamSource，应该首先新建一个工程，但建立的方式是Import a existing project，可以把TeamLeader建立在第三方备份机上的工程文件(.cpj)导入，当然辅助开发机上也要有相应的Local Directory（这个Local directory负责保存备份机上代码文件的副本以提供开发机上使用者对源码进行的修改或添加），如果导入成功，那么现在就可以把代码文件从备份机上复制到开发机上了，方法是选择Project|pull to...就可以了。一般来说主要用到的是Local View，他的显示界面分为三个面板，左边的面板显示第三方备份机上被其他用户改动过的文件，应该copy到Local directory；右边的面板显示你在开发机上改动过的文件，并建议你将改动Check in到备份机上；而最下边的面板是Lock list，显示了各个用户对文件加锁情况。 由于我也是刚刚接触TeamSource，所以文章中可能存在着错误，请各位看官批评指正。至于TeamSource的其他使用细节，可以在使用中揣摩或是参考帮助文档转载 zyy_zyy(tourist) teamsource不是特别好用，建议使用vss另外，一定要做好前期工作，特别重要，另外看好你的版本，delphi5的话一定要安装补丁如果使用sql server作后台的话，那么务必注意使用ado组件的时候，在修改，新增记录（指char型）时要使用trim()函数将字符串两边的空格去掉！否则下回读出的时候，如果字段长50，你的内容是10，那么读出的长度是50，也就是你有40个空格在字段内容中 2、我想把全局变量和公用的函数集中定义在一处，应如何做到？好像没地方定义全局变量啊？----------------------------------------------------------------新建一个DATAmodul1数据模块，把全局变量和公用的函数全放这里！其它单元uses unit1; 谢谢大家，To 雪原：DataMoudule如何创建？在哪里定义全局变量？ 1、建议使用CSV，例如WinCVS（Linux的管理核心就是两个CSV模块，我正在使用非常好！！！）2、可以建立一个公用的单元！！！3、编码规则一定要注意，否则程序员之间江看不懂对方的程序；编码风格也要一致，否则也会乱七八糟；为每编写的函数或过程一定要写相应的文档；在编写新的功能的时候，一定要先写好测试报告，如果连测试报告都没有，那么编写出来的东西谁知道对不对呢？4、...... 建议每个人在单独编写之前统一定义，并熟知全局变量编写人的思路。然后再自己的代码里uses 全局变量单元 。相互之间的接口要有统一的安排，以便整体上有条不紊。 那里有VSS，不怕见笑，初次听说。 用vss，然后下载一个插件，不过这个插件是适用版，我做了个改注册表的小程序，想要就给我发短消息。 VSS=Microsoft Visual SourceSafe VSS=Microsoft Visual SourceSafe VSS是微软的Visual Source Safe，VB的安装盘就有。谢谢“解脱”请问，全局变量建在Unit中，访问时是否要用 Unit_name.var_name ？还是可以直接写 var_name? settingsun：我的程序员说不可以，必须写Unit_name.Var_name请问在Unit中，变量如何定义：我新建一个unit，代码为：unit Unit2;interfaceimplementationend.我应当将变量定义在什么位置？ 你的程序员说必须Unit_name.Var_name？？胡来了！全局变量定义在implementation之前（其实类、变量都是定义在implementation之前的）比如：unit unit2interfacevar s:string;implementationend.然后在别的unit中uses这个单元就可以了那么s就可以直接用 unit Unit2;interfaceimplementationvar Var_Name:Var_Type;end.然后在调用单元中 uses Unit2 直接调用 Var_Name 其实object pascal同c++很相似的其编程结构如出一辙而vf、pb之类的则是将事件、函数之类的东东另外保存的虽然说我们写代码的时候不会受到其他代码的干扰但是它这样很不符合我们的编程习惯（在dos时代我们就是将代码写在一个文件里面的），而且当我们要找相应的函数、事件的时候很麻烦的，必须一个一个窗口打开 unit Unit2;interface private { Private declarations } public { Public declarations } end; var Var_Name1:Var_Type1; ... Var_NameN:Var_TypeNimplementationend.然后在调用单元中 uses Unit2 直接调用 Var_Name 我刚从书上看的你新建一个UNIT把要用的全局变量，过程序等放在里面然后在你的项目里选PROJECT下的OPTION选项，里面有一个选项KA，里面有个查找路径的标题，你把你的公用的UNIT的路径输入其中就行了然后要调用这个UNIT的过程的UNIT都加上USES 公用当元就行了 我要结贴放分了，请大家转到 http://www.csdn.net/expert/topic/868/868815.xml?temp=.1310999继续讨论。 可以把公共函数放到DLL里这样可以减少程序的大小 各位大虾： 自我提问之日起至今已一个半月了 我想把我自己的看法说给大家听 1、不要使用数据模块，adoQuery等就放到使用它的窗口上 2、TeamSource是一个很差的工具，不要用。可以选择SourceSafe+插件 3、将公共函数、全局变量等方在单独的Unit中很好 4、程序员有个习惯：adoQuery使用时总是先Close，再去赋sql，再open这个习惯很不好。这样是在遮盖错误而不是避免错误。往往open之后不close的就是他。我要放分了 做DELPHI+SQL SERVER时遇到的几个问题，请大家帮忙 请教一个数据导出为EXCEL的问题 如何建立主-细-子表 窗口显示的问题,请各位大侠进来帮帮忙,急!!! delphi数字0与大写字母O之间的----》23事 怎样检测Query是否为空？ 看看我的程序什么毛病？ 如何在窗口中动态创建控件 怎么没人回答,不会送分都不要? Trim怎么用？ 请问如何把 CHART 弄到 报表中，简单，马上给分 高手们请进来帮个忙吧!分数不够可以再加.
如果我们的开发项目需要在小组模式下进行，那么协调和规范工作流程是非常重要的环节。工欲善其事，必先利其器，如果能够借助版本控制工具，必然会达到事半功倍的效果。
我最近因为需要在csdn上查找版本控制工具的介绍，但发现这方面的帖子很少，可能一个开发小组的领导者都是某个技术领域的专家，玩转一个简单的工具绰绰有余，而初学者往往会因为缺少需求把精力放在技术的实现细节上，anyway,我还是想把我的使用心得简单介绍一下，希望能起一个抛砖引玉的作用。
因为项目是使用BCB进行开发，所以使用的工具是Borland的TeamSource，虽然有部分同僚对TeamSource的印象不是很好，认为和VSS的差距很大，但对于一个5、6个人的小组来说，也能满足大部分要求了，好了，言归正传。以下才是正文:）。
使用TeamSource首先要分清几个概念：
A（主开发机），B（第三方备份机），C（辅助开发机） 。
在这里A、B都是指局域网上以开发为目的计算机，而A是指建立TeamSource工程文件的计算机；小组开发需要将程序以某种方式共享，B就是指开发人员都能访问的计算机，共享程序就是在B上实现的。
注：B上提供共享的文件夹对于小组成员必须是具有完全访问权限的。
注意：TeamSource必须工作在域环境下（如果服务器的操作系统是win2000，需要配置Active Directory）
在小组开发中一般有个TeamLeader，首先应由TeamLeader建立一个新工程(Create new Project)，但在建立工程之前，TeamLeader的计算机上必须有一个”Local directory”保存着程序源文件（一般是项目的代码框架），而”Remote directory”（即第三方备份机）中暂时是没有代码文件的（在工程建立之后可以通过TeamSource将程序文件从Local directory“上传到”Remote directory）。
Local directory和Remote directory是TeamSource中的叫法。
当TeamLeader建立了工程，就可以添加用户了，方法是选Project|Options中的User页，因为在TeamSource中初始权限是只读的，所以可能Add User等按钮是Disabled的，这时候应该将Local View（TeamSource中的本地视图，通过选Local图标查看）中所有文件上锁，权限就变成Write/read，你将发现按钮Enable了，可以添加用户了（当然你得具备添加用户的权限啦！:)）。还有在添加用户时要保证添加的用户名是域中已经存在的用户，因为只有在开发机上以域用户身份登陆TeamSource才会识别用户身份。
至于设置用户的权限的详细方法，在User页上提供了全部功能，只要仔细看看就明白啦！
添加完用户以后就可以将Local directory中的代码文件备份到第三方备份机上了（就是刚才所说的上传），将所有文件加锁（选中所有文件，然后按F4），然后选中所有文件，点Do it按钮，或者在右键菜单中选择Check in就可以了。
在申请加锁的对话框中，有一个Comment文本框，你在其中填入的文本可以让其他用户看到，那么其他用户就可以知道你申请锁的目的。
如果工程建立成功，那在第三方备份机上就会自动建立几个文件夹，工程文件以cpj为扩展名，一般来说保存在Archives目录下。
现在假设有用户Dippa在一个辅助开发机上登陆并运行TeamSource，应该首先新建一个工程，但建立的方式是Import a existing project，可以把TeamLeader建立在第三方备份机上的工程文件(.cpj)导入，当然辅助开发机上也要有相应的Local Directory（这个Local directory负责保存备份机上代码文件的副本以提供开发机上使用者对源码进行的修改或添加），如果导入成功，那么现在就可以把代码文件从备份机上复制到开发机上了，方法是选择Project|pull to...就可以了。
一般来说主要用到的是Local View，他的显示界面分为三个面板，左边的面板显示第三方备份机上被其他用户改动过的文件，应该copy到Local directory；右边的面板显示你在开发机上改动过的文件，并建议你将改动Check in到备份机上；而最下边的面板是Lock list，显示了各个用户对文件加锁情况。
由于我也是刚刚接触TeamSource，所以文章中可能存在着错误，请各位看官批评指正。至于TeamSource的其他使用细节，可以在使用中揣摩或是参考帮助文档转载 zyy_zyy(tourist)
另外，一定要做好前期工作，特别重要，另外看好你的版本，delphi5的话一定要安装补丁
如果使用sql server作后台的话，那么务必注意使用ado组件的时候，在修改，新增记录（指char型）时要使用trim()函数将字符串两边的空格去掉！否则下回读出的时候，如果字段长50，你的内容是10，那么读出的长度是50，也就是你有40个空格在字段内容中
----------------------------------------------------------------
新建一个DATAmodul1数据模块，
把全局变量和公用的函数全放这里！
其它单元uses unit1;
To 雪原：
DataMoudule如何创建？在哪里定义全局变量？
2、可以建立一个公用的单元！！！
3、编码规则一定要注意，否则程序员之间江看不懂对方的程序；编码风格也要一致，否则也会乱七八糟；为每编写的函数或过程一定要写相应的文档；在编写新的功能的时候，一定要先写好测试报告，如果连测试报告都没有，那么编写出来的东西谁知道对不对呢？
4、......
谢谢“解脱”
请问，全局变量建在Unit中，访问时是否要用 Unit_name.var_name ？
还是可以直接写 var_name?
我的程序员说不可以，必须写Unit_name.Var_name
请问在Unit中，变量如何定义：
我新建一个unit，代码为：unit Unit2;interfaceimplementationend.我应当将变量定义在什么位置？
胡来了！全局变量定义在implementation之前（其实类、变量都是定义在implementation之前的）比如：
unit unit2interfacevar
s:string;implementationend.然后在别的unit中uses这个单元就可以了
那么s就可以直接用
Var_Name:Var_Type;end.然后在调用单元中 uses Unit2 直接调用 Var_Name
其编程结构如出一辙而vf、pb之类的则是将事件、函数之类的东东另外保存的
虽然说我们写代码的时候不会受到其他代码的干扰
但是它这样很不符合我们的编程习惯（在dos时代我们就是将代码写在一个文件里面的），而且当我们要找相应的函数、事件的时候很麻烦的，必须一个一个窗口打开
private
{ Private declarations }
public
{ Public declarations }
end; var
Var_Name1:Var_Type1;
...
Var_NameN:Var_TypeNimplementationend.然后在调用单元中 uses Unit2 直接调用 Var_Name
你新建一个UNIT
把要用的全局变量，过程序等放在里面
然后在你的项目里选PROJECT下的OPTION选项，里面有一个选项KA，里面有个查找路径的标题，你把你的公用的UNIT的路径输入其中就行了
然后要调用这个UNIT的过程的UNIT都加上USES 公用当元就行了
继续讨论。
自我提问之日起至今已一个半月了
我想把我自己的看法说给大家听
1、不要使用数据模块，adoQuery等就放到使用它的窗口上
2、TeamSource是一个很差的工具，不要用。可以选择SourceSafe+插件
3、将公共函数、全局变量等方在单独的Unit中很好
4、程序员有个习惯：adoQuery使用时总是先Close，再去赋sql，再open
这个习惯很不好。这样是在遮盖错误而不是避免错误。往往open之后不close的就是他。我要放分了