Ignore:
Timestamp:
Jun 13, 2007, 8:32:31 PM (18 years ago)
Author:
RBRi
Message:

using StringUtilsUnit

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Components/Outline2.PAS

    r15 r211  
    44
    55Uses
    6   Classes, Forms, SysUtils, BseDos;
     6  Classes,
     7  Forms,
     8  SysUtils,
     9  BseDos;
    710
    811{
    … …  
    455458uses
    456459  Messages,
    457   ACLStringUtility,
    458   ControlScrolling;
     460  ControlScrolling,
     461  StringUtilsUnit;
    459462
    460463// ============================================================================
    … …  
    22142217      exit;
    22152218
    2216     if StrStarts( S, Node.Text ) then
     2219    if StrStartsWithIgnoringCase( S, Node.Text ) then
    22172220    begin
    22182221      // found
Note: See TracChangeset for help on using the changeset viewer.