109 lines
4.0 KiB
Plaintext
109 lines
4.0 KiB
Plaintext
{*******************************************************}
|
|
{ }
|
|
{ Tocsg.KvFilter.Kwautdef }
|
|
{ }
|
|
{ Copyright (C) 2022 kku }
|
|
{ }
|
|
{*******************************************************}
|
|
|
|
unit Tocsg.KvFilter.Kwautdef;
|
|
|
|
interface
|
|
|
|
uses
|
|
Winapi.Windows, Tocsg.KvFilter.adinfo;
|
|
|
|
const
|
|
adMnemStrSize = 5; // Number of characters in mnemStr of adDocDesc
|
|
adDescStrSize = 128; // Number of characters in descStr of adDocDesc
|
|
adVersStrSize = 30; // Number of characters in versStr of adDocDesc
|
|
|
|
// ENencapType
|
|
NOT_ENCAPSULATED = 0; // Not encapsulated with MAC encasulation
|
|
MAC_BINARY = 1; // In Mac binary format
|
|
APPLE_SINGLE = 2; // In Apple Single format
|
|
APPLE_DOUBLE = 3; // In Apple Double format
|
|
WANG_GDL = 4; // WANG GDL format
|
|
|
|
// ENminFormat
|
|
MINOR_NOT_DEFINED = 0; // No minor format
|
|
MINOR_STANDARD = 1;
|
|
MINOR_BOOK = 2;
|
|
MINOR_CHART = 3;
|
|
MINOR_MACRO = 4;
|
|
MINOR_TEXT = 5;
|
|
MINOR_BINARY = 6;
|
|
MINOR_PC = 7;
|
|
MINOR_WINDOWS = 8;
|
|
MINOR_DOS = 9;
|
|
MINOR_MACINTOSH = 10;
|
|
MINOR_RGB = 11;
|
|
MINOR_TIFF = 12;
|
|
MINOR_IFF = 13;
|
|
MINOR_EXPERIMENTAL = 14;
|
|
MINOR_FMTINFO = 15; // changed from MINOR_FORMAT
|
|
MINOR_RLE = 16;
|
|
MINOR_SYMBOL = 17;
|
|
MINOR_OLD = 18;
|
|
MINOR_FOOTNOTE = 19;
|
|
MINOR_STYLE = 20;
|
|
MINOR_PALETTE = 21;
|
|
MINOR_CONFIGURATION = 22;
|
|
MINOR_ACTIVITY = 23;
|
|
MINOR_RESOURCE = 24;
|
|
MINOR_CALCULATION = 25;
|
|
MINOR_GLOSSARY = 26;
|
|
MINOR_SPELLING = 27;
|
|
MINOR_THESAURUS = 28;
|
|
MINOR_HYPHENATION = 29;
|
|
MINOR_MISC = 30;
|
|
MINOR_UNIX = 31;
|
|
MINOR_VAX = 32;
|
|
MINOR_DRIVER = 33;
|
|
MINOR_ARCHIVE = 34;
|
|
|
|
type
|
|
ENencapType = Integer;
|
|
ENminFormat = Integer;
|
|
|
|
PAdMacEncap = ^TAdMacEncap;
|
|
TAdMacEncap = record
|
|
encapType: ENencapType;
|
|
dataOffset,
|
|
dataLength,
|
|
rsrcOffset,
|
|
rsrcLength: Integer;
|
|
end;
|
|
|
|
// autodetect
|
|
PKvAdDocDesc = ^TKvAdDocDesc;
|
|
TKvAdDocDesc = record
|
|
sFileRec: PChar; // - Pointer to struct for file name and path.
|
|
// If NULL then use adFormat to fill adClass,
|
|
// descStr and mnemStr.
|
|
// MAC: FSSpec record of the file.
|
|
// OTHERS: char * of file path name.
|
|
nAdVersion: Integer; // - version number of this Auto-detect API
|
|
nAdClass: ENdocClass; // - same as return value of function. Return
|
|
// values of kwAutoDet are described below.
|
|
nAdFormat: Integer; // - Formats are numbered 1 to ...
|
|
// (See Auto-detect documentation
|
|
sVersStr: array [0..adVersStrSize-1] of Char; // - Version string of format found
|
|
nMajorVersion,
|
|
nMinorVersion: Integer;
|
|
sMnemStr: array [0..adMnemStrSize-1] of Char; // - Keyword mnemonic of format found
|
|
macEncap: TAdMacEncap; // - Structure describing MAC encapsulation
|
|
nIsEncripted: Integer; // - TRUE if this file is encrypted (Protected)
|
|
nMinorFormat: ENminFormat;
|
|
sDescStr: array [0..adDescStrSize-1] of Char; // - Description string of format found
|
|
|
|
pIoObj, //KPTPIOobj IS_FAR * ioObj; // - I/O object autodetect will access document from
|
|
pVAPI: Pointer; // void IS_FAR * pVAPI; // - pointer to VAPI services structure
|
|
|
|
reserved: array [0..5] of Char; // - Reserved for future use
|
|
end;
|
|
|
|
implementation
|
|
|
|
end.
|