AdjustLineBreaks

Convert possible line-endings to the currently valid line ending.

Declaration

Source position: line 0

function AdjustLineBreaks(

const S: String

):String; function AdjustLineBreaks(

const S: String;

Style: TTextLineBreakStyle

):String;

Description

AdjustLineBreaks will change all #13 characters with #13#10 on Windowsnt and dos. On linux, all #13#10 character pairs are converted to #10 and single #13 characters also.

Errors

None.

Example

Program Example48;

{ This program demonstrates the AdjustLineBreaks function }

Uses sysutils;

Const
  S = 'This is a string'#13'with embedded'#10'linefeed and'+
       #13'CR characters';

Begin
  Writeln (AdjustLineBreaks(S));
End.

Notes

 No notes exist for this page yet.