fireredfox
41335
|
2011/2/17 21:14:33 |
要先起delphi scktsrvr.exe,还有client运行要先建立帐套的,不然会爆灾难星错误 |
yulin1025
38413
|
2009/8/19 11:25:19 |
谢谢。我现在也学些三层架构 |
yeon
35469
|
2008/9/6 17:56:25 |
没配置好 |
wmz812
35333
|
2008/8/20 17:43:20 |
有这个提示:连接中间层错误 觉得应该是个简单的问题,可一直找不出原因,哪位有时间,帮忙回一下,谢谢! procedure TdmClient.DataModuleCreate(Sender: TObject); begin socketconnection1.LoginPrompt:=False; socketconnection1.Connected:=False; if not socketconnection1.Connected then begin try with simpleobjectbroker1 do begin if Servers.Count = 0 then begin Servers.Add; Servers.Items[0].ComputerName:=SServerIP; end else begin Servers.Add; Servers.Items[Servers.Count-1].ComputerName:=SServerIP; end; end; simpleobjectbroker1.LoadBalanced:=True; socketconnection1.ObjectBroker:=simpleobjectbroker1; socketconnection1.ServerGUID:='{C3E65EEF-9C13-436C-AA24-C2E1BAF783D7}'; socketconnection1.ServerName:='ServerMain.untPooler'; socketconnection1.Connected:=True; except on E:exception do begin messagedlg('连接中间层错误 ! ',mtError,[mbok],0); abort; end; end; end; if socketconnection1.Connected then isScoketconnectionopen:=True else isScoketconnectionopen:=False; end; |
fslxzh
33957
|
2008/4/29 22:19:09 |
从你这里学了不少东西,谢谢啦! |
gencheng
32082
|
2007/12/3 22:10:49 |
对不起,刘大侠,我上面的话说的有些过头了。。。
其实你写的这个示例还是有很多值得学习的地方。我本人也是才学习三层开发一个多月,最近半个月看Pooler示例,基本都搞懂了。哪天下载了你的示例,粗略的看了一下,就感觉哪一块有点不对,一直看了两天,才发现你的Pooler确实有问题。
一个月前刚开始学习三层的时候,看李维写的多层分布系统篇,越看越糊涂。后来找了本COM原理方面的书学习了一下,再看李维的书感觉清楚多了。李维写他的那本书的时候,是深入学习过COM原理的,他在书中所说的,潜移默化中也使用了COM思想,所以对一般初学者来说,直接看他的书反而会越看越糊涂。
我个人认为刘大侠你是个非常聪明的人,如果你在学习一些COM知识,对于你今后的多层分布系统设计会有巨大的帮助。
一点个人经验,希望对你有所帮助。 |
liuxiangsoft
32002
|
2007/11/28 9:48:29 |
是是是, 我到现在为止,写的程序最多也就3-50个用户,这样的话,用二层也就是可以解决的。 谢谢gencheng的留言。正所谓学无止镜,我对DELPHI了解的也只是冰山一解。 |
gencheng
31998
|
2007/11/27 22:09:37 |
作者尚未悟道!!!
对作者好有一比:“神秀大师”。
作者虽然聪慧,程序中用尽了各种技巧,但他其实并未真正搞过懂三层。
作者其实并没搞清楚他自己写的这个三层中的连接池代码是什么?如果有一,二百台机器作客户端测试它的程序,作者就知道他自己写的程序问题有多大。他自己写的连接池无用!!! |
shiguoxing
30740
|
2007/8/8 10:59:07 |
怎么,连接中间层错误 |
xiao_xue
27499
|
2006/12/12 18:43:35 |
楼上说的对,老大写点关键性的描述嘛,我是初学者,无从下手看啊,先谢谢了! |
zyyjc
26486
|
2006/10/9 9:43:16 |
TO:oshj 我也发现了,好像没有做Blob字段的处理,不知道作者是解决了没有 |
supergq
26080
|
2006/9/15 9:36:54 |
楼主留个qq号或者msn把,有些问题想和你讨论下. |
hj6
26060
|
2006/9/14 12:18:57 |
liuxiang兄,有些请教的问题发送到了您的邮箱中regentsoft@163.com,请您指点,谢谢。 |
oshj
25600
|
2006/8/23 9:16:09 |
刘翔最近好像不来了?这个代码非常好,学习价值高。 有个问题请教一下:用例子中的upply...方式提交数据,好像对 BLOB 字段无效?不知道大家是否试过? 用这种缓冲池的方式,BLOB字段如何提交呢? |
oshj
25167
|
2006/7/31 10:51:03 |
大家好,我正在学习。 想问一下:那个untPooler是怎么建立的,看起来好像不是手工建的。 |
pcczx
25126
|
2006/7/28 12:31:34 |
ww开头的控件是IP4000 |
erenjian
25123
|
2006/7/28 10:51:10 |
兄弟,写点关键文档资料吧.跪求了. |
erenjian
25121
|
2006/7/28 10:49:56 |
unit untCommon; interface type Icommon = Interface ['{C110A171-72D7-4EA5-BFC1-A2CE31D747A2}'] function GetLogin(const DBName, UserCode, PassWord: WideString): Integer; safecall;
unit untCommons; interface type Tcommons = Class(TInterfacedObject,Icommon)
这里的方法怎么客户端就可以调用了?远程数据模块那个单元的代码到哪里去了. |
zbluecn
25062
|
2006/7/24 10:37:11 |
代理阿~~ |
zyyjc
25037
|
2006/7/21 16:19:48 |
不知哪位能告知,untPooler这个单元具体有什么作用? |