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

Events, procedures, dll   Найти похожие ветки 

← →
Ivan Karikh   (2002-07-31 14:56) [0]

Помогите ламеру! (
есть dll реализующая транспортный уровень сервера. Для неё необходимо реализовать интерфейс в виде:
InitializeConnection,
function InitializeConnection( UseProxy : PChar;
SrvName : PChar; OnConnect : TDLLOnConnectProc;
OnError : TDLLOnErrorProc;
OnRecieve : TDLLOnReciveProc;
out IDConnection : Integer ) : boolean; stdcall;
type
TDLLOnReciveProc = procedure (IDConnection : Integer; var Buffer:Pointer; Size:integer); stdcall;
TDLLOnConnectProc = procedure (IDConnection : Integer; aState:integer); stdcall;
TDLLOnErrorProc = procedure (IDConnection : Integer; errCode:integer); stdcall;

Что такое эти OnConnect, OnError? функции, которые вызываются при генерации событий? как эти события генерить, как это вообще происходит??? подскажите хоть с чего начинать :(


← →
Набережных С.   (2002-07-31 22:13) [1]

Нужно передать в InitializeConnection адреса написанных тобой соответствующих функций, прототипы у тебя приведены, и длл их вызовет, когда сочтет нужным, сигнализируя тебе о произошедшем событии. Примерно так:

var
ID:integer;

procedure DLLReciveProc(IDConnection : Integer; var Buffer:Pointer; Size:integer); stdcall;
begin
...
end;

procedure DLLConnectProc(IDConnection : Integer; aState:integer); stdcall;
begin
...
end;

procedure DLLErrorProc(IDConnection : Integer; errCode:integer); stdcall;
begin
...
end;

InitializeConnection(UseProxy, SrvName, DLLConnectProc, DLLErrorProc, DLLReciveProc, ID);



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

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



Память: 0.45 MB
Время: 0.009 c
14-48307
RomanKulhc
2002-07-18 19:23
2002.08.15
Vinchestery Fujitsu


14-48282
farhad
2002-07-21 14:39
2002.08.15
Нужны ресурсы.


3-47990
Hawk2
2002-07-26 18:13
2002.08.15
СРОЧНО!!! Эксперементировать нет времени.


6-48235
JibSkeart
2002-05-30 14:32
2002.08.15
Как сделать прогу что то вроде Клинт ,Сервер ?


1-48175
Ivan Karikh
2002-07-31 14:56
2002.08.15
Events, procedures, dll




   Наверх