Changeset 9 for trunk/Directories.pas


Ignore:
Timestamp:
Jan 7, 2017, 1:28:56 PM (7 years ago)
Author:
chronos
Message:
  • Modified: Converted to Lazarus project. Application can be run with errors.
Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk

    • Property svn:ignore

      •  

        old new  
        66Win32
        77*.~dsk
         8C-evo.exe
         9Integrated.compiled
         10Integrated.lps
         11lib

  • trunk/Directories.pas

    r6 r9  
    1 {$INCLUDE switches}
     1{$INCLUDE Switches.pas}
    22unit Directories;
    33
    … …  
    1212
    1313uses
    14   ShlObj, Windows, SysUtils;
     14  ShlObj, LCLIntf, LCLType, LMessages, SysUtils, FileUtil;
    1515
    1616function GetSpecialDirectory(const CSIDL: integer): string;
Note: See TracChangeset for help on using the changeset viewer.