extern "C" static LRESULT CALLBACK NewProc(HWND hwnd,UINT msg, WPARAM wParam, LPARAM lParam){
	switch(msg){
		case WM_KEYDOWN:
			if (wParam==VK_RETURN){ //Если нажат Enter, то отсылаем в TEdit текст 
				SendMessageA(hwnd,WM_SETTEXT,0,(LPARAM)"AAAAAAAA");
				return 0;
		}
	}
	return CallWindowProcA(OldProc,hwnd,msg,wParam,lParam); //Возвращаем исходную процедуру для контрола
}


extern "C" static LRESULT CALLBACK HookMsg(UINT nCode,WPARAM wParam,LPARAM lParam){  //хук на активацию окна чата

	if(nCode<0)return CallNextHookEx(mHook,nCode,wParam,lParam);
	if(nCode==HCBT_ACTIVATE){
		HWND hwnMy=(HWND)wParam;
		char s[256];
		ZeroMemory(s,sizeof(s));
		int pp=GetClassNameA(hwnMy,(LPSTR)s,255);   //получаем имя класса чата 
		if(strcmp(s,"TFrmIntranetChatMain")==0){  //Если это тот класс идем дальше
			HWND hNP=FindWindowA("TFrmIntranetChatMain","Chat"); // Это надо за тем что прога создает несколько окон с одинаковыми именами, но разными классами
			EnumChildWindows(hNP,EnumWindowsProc,NULL); //находим нужный нам TEdit и помещаем его в tEDIT
			WNDPROC OldProc=(WNDPROC)SetWindowLongPtrA(tEDIT,GWL_WNDPROC,(LONG)NewProc); //назначаем на нужный контрол нашу процедуру
		}
	}
	return CallNextHookEx(mHook, nCode, wParam, lParam);
}