в проге так procedure TForm1.ServerSocket1ClientRead(Sender: TObject; Socket: TCustomWinSocket); var s: String; begin s:= Socket.ReceiveText; if s='R' then begin как быть,? а то drweb говорит что это back door
Тут пишут что обнаруживается как BackDoor но никак не Virus.Win32.Induc.a (думайте что пишите) ТС изучай библиотеку winsock лучше, всякие эти компоненты на форме - зло (не удивительно что доктор веб палит из-за этого компонента)
Через ServerSocket идёт передача данных клиент-сервер, а бекдор как правило работает по аналогии так что именно из за этого опредиляет как backdoor
Большинство мало-мальски адекватных проактивных защит будет обращать на себя внимание при открытии соединения. Так что не стоит придавать значение подобной реакции Dr.Web на свою программу, в которой используется работа с сокетами.