max Länge TCPIP

[AJ_Oldendorf]

Also ich habe eine Form mit TIdTCPServer und verknüpften TIdServerIOHandlerStack.

Delphi-Quellcode:

procedure TMyForm.FormCreate(Sender: TObject);
begin
  IdTCPServer1.DefaultPort := 44001;
end;

procedure TMyForm.FormDestroy(Sender: TObject);
begin
  IdTCPServer1.Active := False;
end;

procedure TMyForm.IdTCPServer1Connect(AContext: TIdContext);
begin
  if Assigned(LogSL) then
  begin
    LogSL.Add('A client connected');
  end;
end;

procedure TMyForm.IdTCPServer1Disconnect(AContext: TIdContext);
begin
  if Assigned(LogSL) then
  begin
    LogSL.Add('A client disconnected');
  end;
end;

procedure TMyForm.IdTCPServer1Exception(AContext: TIdContext;
  AException: Exception);
begin
  if Assigned(LogSL) then
  begin
    LogSL.Add('A exception happend !');
  end;
end;

procedure TMyForm.IdTCPServer1Execute(AContext: TIdContext);
var
  tmpStr : String;
begin
  if IdTCPServer1.Active then
  begin
    if not AContext.Connection.IOHandler.InputBufferIsEmpty then
    begin
      tmpStr := AContext.Connection.IOHandler.ReadLn('#~#*', 300, -1);
      LogSL.Add(tmpStr);

      Timer1.Enabled := True;
    end;
  end;
end;

Das ist im groben alles...

[jaenicke]

Pack mal am Ende des OnExecute ein Sleep(1) rein oder verwende AContext.Connection.IOHandler.CheckForDataOnSource(10); , damit die Anzahl der Aufrufe reduziert wird, dann sollte das nicht mehr passieren.

[AJ_Oldendorf]

Der Aufruf von AContext.Connection.IOHandler.CheckForDataOnSource(10); vor dem if not AContext.Connection.IOHandler.InputBufferIsEmpty then hat geholfen bzgl der CPU Auslastung.
Du meintest ja sicherlich davor aufrufen oder?

Wie ist es beim Client?
Da habe ich das mit der CPU Auslastung bisher nicht festgestellt (der Lesevorgang mit "InputBufferIsEmpty" und "ReadLn" ist dort auch in einem Thread ausgelagert).
Sollte man dort auch TCPClient.IOHandler.CheckForDataOnSource(10); aufrufen?

Sleep(1) wird nicht gebraucht

[jaenicke]

Sehr gut, ja, ich meinte davor aufrufen. Und Sleep(1) war nur eine Alternative, die brauchst du dann nicht, nein.

Im Client brauchst du das nicht, wenn du ReadLn verwendest. Wenn nicht, eines der beiden schon, so habe ich es ja auch in meinem Codebeispiel drin (das Sleep).

[AJ_Oldendorf]

Ja ich verwende im Client das ReadLn. Hatte nur gefragt, da ich es ja im Server auch verwende das ReadLn.

Danke für die Unterstützung bisher