Вниз
Скачать: 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.007 c
7-32583
harisma
2001-12-06 13:14
2002.03.11
Очень надо!!!


14-32574
FireMan
2002-01-25 10:25
2002.03.11
Где винда хранит пароли


3-32400
vitnt2000
2002-02-12 08:56
2002.03.11
Доступ к базе без BDE


1-32439
Light Elf
2002-02-22 13:52
2002.03.11
Жирный текст в Popup меню.


1-32491
Stialy
2002-02-24 20:58
2002.03.11
Как сделать окно активным?




   Наверх