Форум: "Основная";
Текущий архив: 2002.03.11;
Скачать: [xml.tar.bz2];
Внизламерский вопрос относительно чата для локальной сети Найти похожие ветки
← →
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 вся ветка
Форум: "Основная";
Текущий архив: 2002.03.11;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.004 c