CientSocket 和 ServerSocket控件问题？(100分)

F

fossick

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-08

• #1

在ClientSocket端设置好Address和Host后，在一过程中中将ClientSocket.Active置为
True后，在当前过程中执行ClientSocket.Socket.SendText('test')向ServerSocket发送
文本，在ServerSocket段收不到，再重复执行本过程在ServerSocket端就能收到。或是在
一个过程中将ClientSocket.Active置为True，而在另一个过程中执行ClientSocket.
Socket.SendText('test')在ServerSocket端也能够收到，不知道在将ClientSocket.Active
设置为True前或后还需要执行什么操作。

 

P

panyongze

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-08

• #2

将ClientSocket.Active置为True后需要等待连接成功的消息（OnConnect事件），
才能发送文本。

 

T

terry_lzs

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-08

• #3

这个不是socket的问题，原因如楼上的那位所说
建议你在serversocket的onaccpet的事件中添加
socket.SendText('+OK Welcome'+#13+#10);这样可以确认连接成功
在你的clientsocket的onread事件中判断收到信息为'+OK Welcome'再发送

 

F

fossick

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-08

• #4

　　可是我是用我自己做的程序利用ClientSocket连接其他程序的ServerSocket，我没有
办法修改ServerSocket端，能不能只在ClientSocket端通过事件或过程来判断已经连接
成功。

 

S

seesaw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-08

• #5

可写一个procedure专门用与测试连接并发送!

 

S

seesaw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-08

• #6

可写一个procedure专门用与测试连接并发送!

 

H

huchunguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-08

• #7

可以先发送：ClientSocket.SendText("Request");
然后，等待，ServerSocket接收后，返回：ServerSocket.SendText("OK");

在Client中收到后，再发送下一个数据。

 

P

panyongze

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-09

• #8

使用ClientSocket端的OnConnect事件判断连接是否成功。

 

F

fossick

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-09

• #9

　　再问一个小问题，分马上就分给大家。
　　用TMemo控件时，当Memo中的字节数超过一定的字节后，就没有办法再增加了，如何
实现在当Memo中的行数到了一定数量（比如２００行）后，每增加一行就自动删除第一行
。我在OnChange事件中先监测Memo中的行数是否超过给定的行数，如果超过，就用Delete
命令删除第一行，但是在一次向Memo中增加的行数较多时，会出现Memo的滚动条上下滚动
，如何做才能克服这一点。

 

H

huchunguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-09

• #10

可以先Enabled := False;
然后再Enabled := True;

 

F

feishu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-09

• #11

我遇到一个类似的问题，连接已建立，Clientsocket的onConnect事件已触发，但使用Senttext时提示
套接字没有建立，或没有绑订地址。

 

F

fossick

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-10

• #12

使用Enabled:=True 和 Enabled:=False 的方法仍不能解决问题，滚动条还是上下滚动。

 

F

fossick

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-11

• #13

为什么没有人回答？？？？？？

 

P

panyongze

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-12

• #14

将TMemo的ScrollBars特性设置成ssNone

 

刘

刘李子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-12

• #15

我想肯定是可以通过滚动条消息控制它的动作！
一点建议。

 

H

Hexi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-12

• #16

while Memo1.Lines.Count>200 do Memo1.Lines.Delete(0);

 

F

fossick

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-14

• #17

“将TMemo的ScrollBars特性设置成ssNone”虽然看不到滚动条了，但同样可以看到Memo
控件内的内容上下滚动。
我想应该是在删除第一行时，将Selstart置为0，在向Memo中增加一行时，将SelStart
置为最后一行的开始，所以才会出现上下滚动，不知道有没有办法克服这一点。

 

F

fossick

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-18

• #18

看来没有人解决这个问题了，分分给大家！

 

F

fossick

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-18

• #19

多人接受答案了。