Unix-Linebreaks

[Dax]

Wenn du >= Delphi 2005 hast, funktioniert auch das:

Delphi-Quellcode:

type
  TClientHelper = class helper for TIdTCPClient
  public
    procedure WriteLnAlternate(s: string);
  end;

procedure TClientHelper.WriteLnAlternate(s: string);
begin
  Write(s + #10);
end;