10048 (not 10038!)

Giganews Newsgroups
Subject: 10048 (not 10038!)
Posted by:  Vlad Gonchar (vgonch…@performancesoft.com)
Date: Mon, 23 May 2005

If I loop this call 1000 times (payload = 1K) in two clients simultaneously.
I get 10048 error. Should I catch it and process somehow?

procedure TForm1.DoPostIndy( const Url: string; const Payload: string );
var
  aContentStream: TStringStream;
  aResponse: string;
begin
  aContentStream  := TStringStream.Create( Payload );
  try
    IdHTTP1.Request.Method := hmPost;
    IdHTTP1.Request.ContentType := 'text/plain';
    aResponse := IdHTTP1.Post( Url, aContentStream );
  finally
    aContentStream.Free;
  end;
end;

Replies