Вниз
Скачать: CL | DM;

Asynchronous socket error 10061   Найти похожие ветки 

 
VolanD666   (2006-08-16 17:27) [0]

Ставлю ClientSocket и Button. В Button`е пишу:

srcfile:=TFileStream.Create("c:\file.txt", fmOpenRead);
ClientSocket1.Host:="192.168.20.1";
ClientSocket1.Open;
ClientSocket1.Socket.SendStream(srcfile);
ClientSocket1.Close;
srcfile.Free;


В другом приложении пишу в ServerSocket1ClientRead:

var
 l: Integer;
 buf: PChar;
 src: TFileStream;
begin
 l :=Socket.ReceiveLength;
 GetMem(buf,l+1);
 Socket.ReceiveBuf(buf,l);
 src := TFileStream.Create("C:\file.exe",fmOpenReadWrite);
 src.Seek(0,soFromEnd);
 src.WriteBuffer(buf,l);
 src.Free;
 FreeMem(buf);


Но "Asynchronous socket error 10061" не дает мне радоваться успешной передаче файла. :( Почему?


 
Dmitrij_K   (2006-08-16 17:32) [1]

Потомучто ClientSocket1 работает в асинхронном режиме
Команда ClientSocket1.Open; не ждет пока откроется соединение, и далее ты пытаешься отсылать данные в некуда

чтобы работало установи ClientSocket1 в длокируюший режим, или Отсылай файл по событию OnWrite


 
Dmitrij_K   (2006-08-16 17:35) [2]

Кажется так
ClientSocket1.ClientType := ctBlocking;


 
Сергей М. ©   (2006-08-17 08:09) [3]


> VolanD666   (16.08.06 17:27)


Кр.того метод ReceiveLength() работает не так как ты предполагаешь. Это может привести к записи в файл "мусора".
Посмотри внимательно справку.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.031 c
1-1163952134
Calibr
2006-11-19 19:02
2007.01.14
Ассоциирование файла с программой


15-1166690617
Vovan #2
2006-12-21 11:43
2007.01.14
Дом-страница без глума про психопатство


1-1163803640
SkySpeed
2006-11-18 01:47
2007.01.14
Как определелить конец распечатки информации?


15-1166110968
Eraser
2006-12-14 18:42
2007.01.14
Редактор ASCII графики


15-1166626822
kroner
2006-12-20 18:00
2007.01.14
Кто-нибудь знает, есть ли XML SDK для 6 версии?




   Наверх