救命啊！我有弱弱的问题要问(100分)

Q

qiqini

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #1

[?]我现在在做一个客户断用户登陆界面，要求通过发包验证用户身份和密码，
就是clientsocket.我现在想问的是如何实现连接服务器这一段代码，就是
如何添加port事件？请知道的高手指点！[]

 

H

haofang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #2

gz

 

D

daifan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #3

这个很简单的问题呀.
一、建立连接，就是用ClientSocket去连接一个指定的ServerSocket，这个你会吧？
二、建立完成之后，客户端发一个数据报（包含用户名和密码，格式自己可以确定）给
服务器端，服务器端进行验证，验证失败则返回错误信息，并断开连接，否则就可以
工作了。
还有不明白嘛？

 

Q

qiqini

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #4

procedure Tfrmlogin.ClientSocket1Connect(Sender: TObject;
Socket: TCustomWinSocket);
begin
socstr:=edit1.Text ;
socket.SendText:=('@|208|'+edit1.text+'|'+edit2.text+'|&');
这后面怎么写，就是联serversocket的怎么写，
end;
麻烦再帮我看看啊！
我对delphi刚从这个程序开始接受啊！我好着急哦！

 

L

langzizheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #5

我有相关的代码!
qianming1978@vip.sina.com

 

D

daifan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #6

ClientSocket1.Host := '....'
ClientSocket1.Port := ....
ClientSocket1.open;
如果连接成功,那么会运行到你写的那段代码;
将数据发送给SERVER后,SERVER给客户端的返回结果会出现在事件OnRead 中

 

Q

qiqini

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #7

我的EM是tingzheng@163.net

 

S

sidenggw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #8

问题不是很难的，那和bde连接是一样的

 

Q

qiqini

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #9

感谢各位的回答，我的理解是
procedure Tfrmlogin.FormActivate(Sender: TObject);
begin
ClientSocket1.Host := '....'
ClientSocket1.Port := ....
ClientSocket1.open;
end;
procedure Tfrmlogin.ClientSocket1Connect(Sender: TObject;
Socket: TCustomWinSocket);
begin
socstr:=edit1.Text ;
socket.SendText:=('@|208|'+edit1.text+'|'+edit2.text+'|&');
end;
我可以这样理解吗？

 

D

daifan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #10

可以.但最好不要放在procedure Tfrmlogin.FormActivate(Sender: TObject);
而是应该放在 按钮 login 的 Click 事件中

 

Q

qiqini

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #11

请问谁有“打印报表”的例程，可否发给我参考参考，突然要做这一块

 

Q

qiqini

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-27

• #12

这是我发的第一篇帖子，我还不太了解这个论坛的风格。不过我的感谢各位给我的解答
我在今天会结这篇帖子！
我还想问：哪位有PL/SQL的使用说明，以及delphi里如何使用SQL语句连接oracle数据库

 

Q

qiqini

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-27

• #13

多人接受答案了。