Changeset 397


Ignore:
Timestamp:
May 22, 2016, 12:19:33 PM (9 years ago)
Author:
RBRi
Message:

remove usage of ACLStringUtility

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Components/ComponentsTestForm.pas

    r145 r397  
    4949    Button16: TButton;
    5050    Image1: TImage;
     51    DirectoryListBox1: TCustomDirectoryListBox;
    5152    Button15: TButton;
    5253    Panel1: TPanel;
    … …  
    116117  ControlScrolling,
    117118  ACLResourceUtility,
    118   ACLStringUtility,
    119119  RichTextPrintUnit,
    120120  RichTextStyleUnit,
    121   ACLLanguageUnit;
     121  ACLLanguageUnit,
     122  CharUtilsUnit,
     123  DebugUnit;
    122124
    123125{$R DialogIcons}
    … …  
    145147           4 );
    146148
    147   Memo1.Lines.Add( StrNPas( p, l ) );
     149  Memo1.Lines.Add( StrPasWithLength( p, l ) );
    148150
    149151  StrDispose( p );
    … …  
    516518    TCustomDirectoryListBox, TCustomFilelistBox, TListBox, TRadioGroup
    517519   , TEdit, TSpeedButton, TPanel, THeaderControl, TMemo, TImage]);
     520
     521   SetLogAspects('LogDebug');
    518522End.
Note: See TracChangeset for help on using the changeset viewer.