🚀 go-pugleaf

Hello all,

I have a TIdHTTPServer and in the Connect event i do like this
		dataptr = new TServDataObj(this);
		dataptr->OnIoInfo = IoInfoEvent;
		AThread->Data = dataptr;

in the IdHTTPServerCommandGet like this
	TServDataObj *dataptr;

		dataptr = (TServDataObj*)AThread->Data;
		dataptr->xmlVal = RequestInfo->Params->Values["trans"];
		if ( dataptr->xmlVal.Length() > 10 ) {
			dataptr->Exequte();
			ResponseInfo->ContentStream = new 					 
TStringStream(dataptr->sResponse);
			ResponseInfo->ContentStream->Write("OK", 2 );
		}



and in the dataptr i do this

typedef void __fastcall (__closure *TIoInfoEvent)(System::TObject* Sender,
AnsiString &Msg, AnsiString &Seqno, AnsiString &sReturnInfo, AnsiString 
&sTextid, int &seq);


__fastcall TServDataObj::TServDataObj(TObject* Sender)
{

}
void __fastcall TServDataObj::Exequte()
{
	//call a function and fire the event OnIoInfo
}

if ( FOnIoInfo && SDiDspTxt.Length() ) {
	OnIoInfo(this, SDiDspTxt, seqno, sReturnInfo, sTxtId, F_localseqno);

the problem is that in the Taskmanager i can se that the handles is 
increase every time i fire the event, why?

Christer