هل للمعلومات التي ترسل بين كلينت و سيرفر لها حدود معينه

لم تتوضح كامل الفكرة لي لكن بإمكانك استخدام SendStream بدلا من SendText

شكرا علي النصيحه و محاوله مساعدتي

المشكله هي ان محتويات الميمو التي كنت ارسلها كان لها حد معين و لا ترسل اكثر منه مثلا 1000 حرف

انا وجدت هذا الكود و اظن انه سيحل مشكلتي

Procedure SendBuffer(strInput:String);
Var
x			   :integer;
Temp			:string;
begin
X := length(strInput);
holdstr := strinput;

if x > 4096 then
  begin
	Repeat
	Temp := copy(strInput,0,4096);
	//should copy 4096 (4kb)

	socket.Socket.SendText ( (IntTostr(Length(Temp)))+ '|' + (Temp ));
	//sends amount of data + data

	Delete(Strinput,0,length(temp));
	//deletes length of data sent from orginal string,

	dec(x,length(temp));
	//decreases amount left to send

	Until x <= 0

  end else
  socket.Socket.SendText(StrInput);
  end;

صح الحل شبيه بالكود اللى وضعته يعني تستخدم ,for,Repeat,while

ولابد الموضوع يكون بكل الطرفين الكلينت والسيرفر

مثلا

المرسل

procedure TForm1.ClientSocket1Connect(Sender: TObject;
  Socket: TCustomWinSocket);
var
  s: string;
  i: Integer;
begin
  s := 'BEGIN';
  for i := 0 to 40000 do
	s := s + 'X';
  s := s + 'END';
  s := IntToStr(Length(s))+ '|'+ s; //Example: 40009|BEGINXXXXXXXXXXXXXX...etc...END
  clientsocket1.Socket.SendBuf(s[1], length(s));
end;

المستقبل

procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
  Socket: TCustomWinSocket);
var
  Received, sLength : String;
begin
Received := Socket.ReceiveText;
sLength := Copy(Received, 1, Pos('|', Received) - 1); //extracts the number before '|'
Delete(Received, 1, Pos('|', Received)); //deletes the number and the '|'
While Length(Received) < StrToInt(sLength) do
	  Received := Socket.ReceiveText;

Label1.caption := IntToStr(Length(Received));
end;

هل يمكن المساعدة بمثال لـ CLIENTS AND SERVER

للتعامل مع تراسل البيانات زى المثال لتموجود لكن على دلفي 7

ما عرفت استخدمها للاسف

هل ممكن تعطونى مثال بهيك شغلى للضرورة

بارك الله فيكم

اقتباس

هل للمعلومات التي ترسل بين كلينت و سيرفر لها حدود معينه

حدود لا لكنك تستعمل Buffer الذي له حدود

ايضا اي Packet يبعث في الشبكة له حد معين

والحل كما قال الإخوة تقسيم ما تريد ارسالة و يبعث في دفعات واحدة تلو الأخرى

والسلام عليكم ورحمة الله