Changeset 135 for trunk/Packages


Ignore:
Timestamp:
Jun 23, 2022, 10:22:43 PM (2 years ago)
Author:
chronos
Message:
  • Modified: Normalize line endings according vCard format specification.
Location:
trunk/Packages
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • trunk/Packages/Common/Common.lpk

    r134 r135  
    4141Source: https://svn.zdechov.net/PascalClassLibrary/Common/"/>
    4242    <License Value="Copy left."/>
    43     <Version Minor="9"/>
     43    <Version Minor="10"/>
    4444    <Files Count="30">
    4545      <Item1>

  • trunk/Packages/Common/StopWatch.pas

    r127 r135  
    55
    66uses
    7   {$IFDEF Windows}Windows,{$ENDIF}
     7  {$IFDEF WINDOWS}Windows,{$ENDIF}
    88  SysUtils, DateUtils;
    99
    … …  
    4141  fIsRunning := False;
    4242
    43   {$IFDEF Windows}
     43  {$IFDEF WINDOWS}
    4444  fIsHighResolution := QueryPerformanceFrequency(fFrequency) ;
    4545  {$ELSE}

  • trunk/Packages/VCard/UVCard.pas

    r133 r135  
    253253  VCardEncoding = 'ENCODING';
    254254  VCardCharset = 'CHARSET';
     255  VCardLineEnding = #13#10;
    255256
    256257procedure Register;
    … …  
    17651766begin
    17661767  with Output do begin
     1768    LineBreak := VCardLineEnding;
    17671769    Add(VCardBegin);
    17681770    for I := 0 to Properties.Count - 1 do
Note: See TracChangeset for help on using the changeset viewer.