Inhalt eines dynamischen Array in einen String kopieren

[oki]

Joop, da war das Problem: Delphi2010 mit UniCode nicht beachtet. Hier der Code der klappt:

Delphi-Quellcode:

procedure TListenerThread.DoReceivedData;
var SData : AnsiString;
begin
  SData := '';
  if Assigned(FOnReceivedData) then begin
    if (FReceivedData <> nil) and (Length(FReceivedData) >= 200) then begin
      SetLength(SData, Length(FReceivedData));
      system.Move(FReceivedData[0], SData[1], Length(FReceivedData));
      SetLength(FReceivedData, 0);

      FOnReceivedData(self, SData);
    end;
  end;
end;

Hätte ich auch dran denken können.

Dank und Gruß an alle, die mir geholfen haben.

oki