Ignore:
Timestamp:
Jun 5, 2007, 8:28:53 PM (18 years ago)
Author:
RBRi
Message:

refactored, now uses FileUtilsUnit

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Components/ACLLanguageUnit.pas

    r39 r188  
    55uses
    66  OS2Def,
    7   Classes, Forms;
     7  Classes,
     8  Forms;
    89
    910type
     
    130131uses
    131132  Dos, SysUtils, // system
    132   StdCtrls, Buttons, ExtCtrls, TabCtrls, Dialogs,
    133   Coolbar2, Multicolumnlistbox,
    134   ACLUtility, ACLStringUtility,
    135 //  ACLProfile,
    136   ACLFileUtility;
     133  StdCtrls,
     134  Buttons,
     135  ExtCtrls,
     136  TabCtrls,
     137  Dialogs,
     138  Coolbar2,
     139  Multicolumnlistbox,
     140  ACLUtility,
     141  ACLStringUtility,
     142  FileUtilsUnit;
    137143
    138144var
     
    699705  if OSDir <> '' then
    700706  begin
    701     FilePath := AddSlash( OSDir )
     707    FilePath := AddDirectorySeparator( OSDir )
    702708                + 'lang\'
    703709                + Filename;
Note: See TracChangeset for help on using the changeset viewer.