Список проголосовавших за комментарий "Merphi, <br/> // — Функции txmlconnector.dll — //<br/> Function con_SetCallBack; external 'txmlconnector.dll' name 'SetCallback';<br/> Function con_SetCallBackEx; external 'txmlconnector.dll' name 'SetCallbackEx';<br/> Function con_SendCommand; external 'txmlconnector.dll' name 'SendCommand';<br/> Function con_FreeMemory; external 'txmlconnector.dll' name 'FreeMemory';<br/> Function con_Initialize; external 'txmlconnector.dll' name 'Initialize';<br/> Function con_UnInitialize; external 'txmlconnector.dll' name 'UnInitialize';<br/> Function con_SetLogLevel; external 'txmlconnector.dll' name 'SetLogLevel';<br/> // — //<br/> <br/> Function Transaq_Function_CallBack(pData: PAnsiChar): Boolean;<br/> Begin<br/> with Transaq_Talk do<br/> begin<br/> fNum := Transaq_FindAnswerZero;<br/> with fAnswer[fNum] do<br/> begin<br/> fBusy := True;<br/> fTime := Now;<br/> fText := Utf8ToAnsi(pData);<br/> fType := Identify_AnswerRoot(fNum);<br/> end;<br/> end;<br/> con