Всем привет! Давно не писал. Простите, сейчас времени очень мало. В общем, как давно обещал: в кратце расскажу, как использовать Transaq Connector в Delphi Очень просто: (пишем в Delphi 2010) 1) Описываем функции DLL-ки: function SetCallback(pCallback: Tcallback): boolean; stdcall; external 'txmlconnector.dll'; function SendCommand(pData: PAnsiChar): PAnsiChar; stdcall; external 'txmlconnector.dll'; function FreeMemory(pData: PAnsiChar): boolean; stdcall; external 'txmlconnector.dll'; 2) Описываем функцию для отправки команды и получения результата: function sendCmd(command: string): string; var cmd, ans: PAnsiChar; begin cmd := PAnsiChar(AnsiToUtf8(command)); ans := SendCommand(cmd); Result := Utf8ToAnsi(ans); FreeMemory(ans); end; 3) Описываем колбэк функцию: function funcCallBack(pData: PAnsiChar): PAnsiChar; var str: string; begin str := Utf8ToAnsi(pData); FreeMemory(pData); //Делаем что угодно с str end; 4) Перед отправкой команд устанавливаем колбэк функцию: SetCallback(funcCallBack); 5) Отправляем команды var cmd, ans: string; begin cmd := '<command id="..."/>'; ans := sendCmd(cmd); //работаем с ans как со строкой end; 6) Пишем робота, торгуем и зарабатываем ))) Удачной торговли!