forked from andersmelander/DWScriptStudio
-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathamScript.FileSystem.API.pas
More file actions
41 lines (31 loc) · 1.37 KB
/
amScript.FileSystem.API.pas
File metadata and controls
41 lines (31 loc) · 1.37 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
unit amScript.FileSystem.API;
(*
* Copyright © 2012 Anders Melander
*
* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
*)
interface
uses
dwsFileSystem,
amScript.Provider.API;
type
IScriptFileSystem = interface(IdwsFileSystem)
['{C4A51EBA-EC96-4533-BB4B-24F9C9BD2431}']
function OpenScriptProvider(const Filename: string; FileMustExist: boolean): IScriptProvider;
function ValidateFileNameEx(const FileName: string; FileMustExist: boolean): string;
end;
IScriptDelegatingFileSystem = interface(IScriptFileSystem)
['{203DBF33-1B2F-4B32-A17D-191427721F94}']
procedure MountFileSystem(const FileSystem: IScriptFileSystem);
procedure UnmountFileSystem(const FileSystem: IScriptFileSystem);
end;
// -----------------------------------------------------------------------------
// -----------------------------------------------------------------------------
// -----------------------------------------------------------------------------
implementation
// -----------------------------------------------------------------------------
// -----------------------------------------------------------------------------
// -----------------------------------------------------------------------------
end.