- Notifications
You must be signed in to change notification settings - Fork 2
Expand file tree
/
Copy pathWebAPI.Files.pas
More file actions
Latest commit
27 lines (20 loc) · 860 Bytes
/
Copy pathWebAPI.Files.pas
File metadata and controls
27 lines (20 loc) · 860 Bytes
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
unit WebAPI.Files;
interface
uses WebAPI.TypedArrays;
type
JBlob = classexternal'Blob'
constructor Create(data : arrayof Variant; options : Variant);
Size : Integer; external'size';
TypeMime : String; external'type';
functionArrayBuffer : JArrayBufferPromise; external'arrayBuffer';
functionSlice(startByte, endByte : Integer) : JBlob; external'slice';
end;
JFileReader = classexternal"FileReader"
procedureAddEventListener(event : String; callback : procedure; useCapture : Boolean); external'addEventListener';
procedureReadAsDataURL(input : Variant); external'readAsDataURL';
procedureReadAsArrayBuffer(blob : JBlob); external'readAsArrayBuffer';
end;
JFile = classexternal'File' (JBlob)
Name : String; external'name';
end;
JFileList = arrayof JFile;