Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.06;
Скачать: CL | DM;

Вниз

Помогите пожалуйста!   Найти похожие ветки 

 
HDD ©   (2002-02-20 04:00) [0]

Клиент
procedure TForm1.Memo1Change(Sender: TObject);
begin
ClientSocket1.Socket.SendText(Memo1.Lines[Memo1.Lines.count -1]);
end;

Сервер
procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
brgin
Form2.Memo1.Lines.Add(Socket.ReceiveText);
end;
Проблема такая когда я пишу в мемо1 клиента хотябы одну букву и автоматически начинает идти строка rrrrrrrrrrrrrrrrrrrrrrr и так до бесконечности. Помогите пожалуйста!


 
Ghost. ©   (2002-02-20 09:18) [1]

А че ты хотел ты строку эту в мемо и отправляешь такой какая она есть ты не ставь на "изменение"(процедуру)


 
BAHO ©   (2002-02-21 04:53) [2]

Да уж...
круто !!!
первый раз такое вижу...!!!
Это ш надо додуматься тако безконечный цикл замутить !!!


 
Smb   (2002-02-22 16:56) [3]

procedure TForm1.Memo1Change(Sender: TObject);
begin
ClientSocket1.Socket.SendText(Memo1.Lines[Memo1.Lines.count -1] + #10#13);
end;



Страницы: 1 вся ветка

Текущий архив: 2002.05.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
1-17576
KIR
2002-04-19 09:53
2002.05.06
Как отловить нажатие на стрелки?


6-17651
Pat
2002-02-22 00:48
2002.05.06
NMFTP


1-17546
Игорь Алексеев
2002-04-24 09:05
2002.05.06
ColorDialog


4-17734
j0ker
2002-02-27 01:20
2002.05.06
Handle


4-17730
TCP
2002-03-01 18:49
2002.05.06
Треей и ДАта