2013/4/25 Michael Van Canneyt <mich...@freepascal.org>

> Why is that ?
>
> Please define "read and write at the same time" first.


Sorry, my English is bad. ^^

So, a small example (pseudo code):

procedure TMyThread1.Execute;
begin
  while not Terminated do
  begin
    GlobalSocket.Write ...
  end;
end;

procedure TMyThread2.Execute;
begin
  while not Terminated do
  begin
    GlobalSocket.Read ...
  end;
end;

MyThread1.Start;
MyThread2.Start;

 Thank you!
>>
>> * 
>> https://bitbucket.org/**silvioprog/tcpipcomp<https://bitbucket.org/silvioprog/tcpipcomp>
>>  (this
>> repo is temporary, and this all code can undergo drastic changes at any
>> time)
>>
>>
>> ... like ScktComp of Delphi. (no Synapse, LNet or Indy please, I need to
>> use native code)
>>
>
> Strange remark. Synapse, lnet or Indy are native pascal code.
>
> Michael.


Yes, I love Synapse, but it is not distributed with Free Pascal. I think
the Free Pascal need to distribute something like SktComp(
http://pastebin.com/QBZU89cy) of Delphi. SSockets is not multi-threaded.

-- 
Silvio Clécio
My public projects - github.com/silvioprog
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to