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

Вниз

Не знаю как обозвать тему   Найти похожие ветки 

 
dkDimon ©   (2002-12-12 18:46) [0]

Мастера, напомните плиз примерчиком, как делать приложение без использования VCL (забыл что-то, и примеров то не осталось...). Форму создавать НЕ нужно. Нужно только зациклить приложение, чтобы оно висело в памяти. И как обработывать сообщения приложения (еще раз напоминаю формы нет). Это во-первых, а во-вторых, скажите плиз как назначить обработчик события допустим TServerSocket.

srvSocket.OnClientRead := ...


 
Anatoly Podgoretsky ©   (2002-12-12 19:05) [1]

Это все?

Program NoVcl;
uses Windows;
begin
end;


Вместо точек укажи имя своего обработчик


 
dkDimon ©   (2002-12-12 19:27) [2]

1) Прога так не зацикливается. Она запускается и выходит. А мне нужно чтобы она в памяти висела.

2) Вместо точек я указываю:

procedure srvSocketClientRead(Sender: TObject; Socket: TCustomWinSocket);
begin
{Обработчик}
end;

...

srvSocket.OnClientRead := srvSocketClientRead;


В итоге ошибка - Incompatible types: "method pointer and regular procedure"


 
Anatoly Podgoretsky ©   (2002-12-12 19:49) [3]

Что бы что то зацикливалось надо использовать цикд

обработчик должен быть методом класса



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

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

Наверх




Память: 0.47 MB
Время: 0.023 c
14-87119
Cr@sh
2003-01-09 23:25
2003.01.27
Она меня бросила... она бросила все...


1-86871
R
2003-01-20 07:26
2003.01.27
function Sum(const Data: array of Double)


1-86907
cult
2003-01-16 14:25
2003.01.27
Адрес окна по его хэндлу


14-87078
Maksss
2003-01-09 02:46
2003.01.27
здесь самый отвечаемый форум


1-86881
cranium
2003-01-20 02:07
2003.01.27
В чем ошибка