Вниз
Скачать: CL | DM;

ламерский вопрос относительно чата для локальной сети   Найти похожие ветки 

← →
b00ts0   (2002-02-22 23:01) [0]

заранее извиняюсь за свой тупой вопрос и потраченное Вами на него время.
делаю чат для локальной сети.
есть строка для ввода текста.
мне нужно вывести текст из этой строки (TEdit) в компонент TMemo при нажатии не кнопки ОТПРАВИТЬ, а при нажатии , например, кнопки enter. подскажите ламеру а то я уже кучу сайтов переры и ниче не нашел :(


← →
Pat ©   (2002-02-23 03:05) [1]

Причем тут чат? И вообще есть Сети...

Можно сделать и при нажатии Enter"a и при клике на кнопке. Если у тебя установлен обработчик клика на кнопке BSend, то это событие будет происходить при нажатии на Edit"e Enter"a:

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=vk_return then BSendClick(sender);
end;


← →
Артемий ©   (2002-02-23 08:10) [2]

Посмотри внимательно на примеры чатов которые лежат если память не изменяет в директории Delphi\demo\FastNet в папках NMudp и NMmsg


← →
KaPaT ©   (2002-02-23 11:32) [3]

Я такое писал. Лучше отправить сообщение на сервер и потом с сервера отправлять ко всем клиентам. А то добавишь в свой Memo, а вдруг сообщение не дойдет вообще? У тебя будет а у всех не будет. Уловил фишку?


← →
Sasha9   (2002-02-23 14:45) [4]

Не надо гемороится с событием OnKeyDown, просто поставь у кнопки "отправить" свойство Default=True



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.006 c
7-32580
Hisant
2001-11-28 10:57
2002.03.11
Блокировка клавиш в Delphi


14-32539
AndreyP
2002-01-24 10:59
2002.03.11
Программа


1-32481
Diamond Dog
2002-02-24 13:54
2002.03.11
Перемещение курсора но пустому! Memo


1-32436
Vacheslav
2002-02-21 18:50
2002.03.11
Подскажите, как создать фоновый поток или/и киньте ссылки на лит-ру по потокам.


1-32430
novomod
2002-02-16 10:37
2002.03.11
Курсор. Help.




   Наверх