Код рабочий. Ошибка была при преобразовании строки в буфер данных. Несоответствие длинны буфера )) Вопрос закрыт.
У меня появилась идея. Если попробовать перехватить Socket и создать свой а прогремме подсунуть копию. Как думаете пройдет такая мысль?
Я даже пробовал делать Send из инжектированной DLL Всеравно обрыв связи
Я создал 2 приложения клиент и сервер, попрактиковался на них. Все работает внедряюсь копирую хендл сокета. Из своего приложения Сенд проходит...
Нет я так не делаю
Объясни для чего?
Всем участникам спасибо, разобрался. Есть только одна неприятность: Я получаю копию Хендла, и пытаюсь туда Sendить в этот момент связь между...
Вот чего я доcтиг: это в инжектнутой длл var apph, app: HWND; appi:Cardinal; WPI : LPWsaProtocol_InfoA; pcds : CopyDataStruct; begin if...
n0name Спасибо разобрался
WSADuplicateSocket возвращает -1, подскажите, почему? инжектирую dll делаю hook на функцию send (Socket) - тут все идеально вот код функции из...
Вот http://www.tdoc.ru/c/programming/win32/win32-windows-struct-msg-page18.htmlтут я нашел описание метода, но на практике добиться этого немогую...
function WSADuplicateSocket( S:TSocket; dwProcessID:DWORD; var ProtocolInfo:TWSAProtocolInfo):Integer; Параметр S задаёт сокет, дескриптор...
Единственный минус, я не умею с ней работать
DuplicateHandle что-то копирует, но то что он выдает непохоже на TSoket Попробую с WSADuplicateSocket
От GetProcID я отказался, я передаю его также в SendMessage
app:=OpenProcess(PROCESS_ALL_ACCESS, FALSE, GetCurrentProcessId()); apph:=FindWindow('TSimpleKraftForm',nil); Тут путаюсь в ДЛЛ 1. вариант...
Это кусок из инжектнутой длл function SendHookProc(s: TSocket; var Buf; len, flags: Integer): Integer; stdcall; var apph: HWND;...
-1
MSoft ошибки нету, просто не работает :) данные не отсылаются WSAStartup я вызываю у себя WSAStartup(MAKEWORD(2,2), vwsadata); str2 := '3A 29 00...
Тут ты прав, я перемудрил. GetProcID вполне достаточно. Если возможно, расскажите правильный механизм получения сокета и использования в моей проге
Имена участников (разделяйте запятой).