mirror of
https://github.com/doublecmd/doublecmd.git
synced 2026-06-21 09:58:13 +00:00
107 lines
4.1 KiB
ObjectPascal
107 lines
4.1 KiB
ObjectPascal
unit WdxPlugin; { Content plugins }
|
|
|
|
interface
|
|
|
|
uses SysUtils;
|
|
|
|
const ft_nomorefields=0;
|
|
ft_numeric_32=1;
|
|
ft_numeric_64=2;
|
|
ft_numeric_floating=3;
|
|
ft_date=4;
|
|
ft_time=5;
|
|
ft_boolean=6;
|
|
ft_multiplechoice=7;
|
|
ft_string=8;
|
|
ft_fulltext=9;
|
|
ft_datetime=10;
|
|
ft_stringw=11;
|
|
|
|
// for ContentGetValue
|
|
ft_nosuchfield=-1;
|
|
ft_fileerror=-2;
|
|
ft_fieldempty=-3;
|
|
ft_ondemand=-4;
|
|
ft_notsupported=-5;
|
|
ft_setcancel=-6;
|
|
ft_delayed=0;
|
|
|
|
// for ContentSetValue
|
|
ft_setsuccess=0; // setting of the attribute succeeded
|
|
|
|
// for ContentGetSupportedFieldFlags
|
|
contflags_edit=1;
|
|
contflags_substsize=2;
|
|
contflags_substdatetime=4;
|
|
contflags_substdate=6;
|
|
contflags_substtime=8;
|
|
contflags_substattributes=10;
|
|
contflags_substattributestr=12;
|
|
contflags_passthrough_size_float=14;
|
|
contflags_substmask=14;
|
|
contflags_fieldedit=16;
|
|
|
|
// for ContentSendStateInformation
|
|
contst_readnewdir=1;
|
|
contst_refreshpressed=2;
|
|
contst_showhint=4;
|
|
|
|
setflags_first_attribute=1; // First attribute of this file
|
|
setflags_last_attribute=2; // Last attribute of this file
|
|
setflags_only_date=4; // Only set the date of the datetime value!
|
|
|
|
|
|
CONTENT_DELAYIFSLOW=1; // ContentGetValue called in foreground
|
|
CONTENT_PASSTHROUGH=2; // If requested via contflags_passthrough_size_float: The size
|
|
// is passed in as floating value, TC expects correct value
|
|
// from the given units value, and optionally a text string
|
|
|
|
type tContentDefaultParamStruct=record
|
|
size,
|
|
PluginInterfaceVersionLow,
|
|
PluginInterfaceVersionHi:longint;
|
|
DefaultIniName:array[0..MAX_PATH-1] of char;
|
|
end;
|
|
pContentDefaultParamStruct=^tContentDefaultParamStruct;
|
|
|
|
type tdateformat=record
|
|
wYear,wMonth,wDay:word;
|
|
end;
|
|
pdateformat=^tdateformat;
|
|
|
|
type ttimeformat=record
|
|
wHour,wMinute,wSecond:word;
|
|
end;
|
|
ptimeformat=^ttimeformat;
|
|
|
|
{ Function prototypes: }
|
|
|
|
(*
|
|
|
|
procedure ContentGetDetectString(DetectString:pchar;maxlen:integer); {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
function ContentGetSupportedField(FieldIndex:integer;FieldName:pchar;
|
|
Units:pchar;maxlen:integer):integer; {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
function ContentGetValue(FileName:pchar;FieldIndex,UnitIndex:integer;
|
|
FieldValue:pbyte; maxlen,flags:integer):integer; {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
function ContentGetValueW(FileName:pwidechar;FieldIndex,UnitIndex:integer;
|
|
FieldValue:pbyte; maxlen,flags:integer):integer; {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
procedure ContentSetDefaultParams(dps:pContentDefaultParamStruct); {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
procedure ContentPluginUnloading; {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
procedure ContentStopGetValue(FileName:pchar); {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
procedure ContentStopGetValueW(FileName:pwidechar); {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
function ContentGetDefaultSortOrder(FieldIndex:integer):integer; {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
function ContentGetSupportedFieldFlags(FieldIndex:integer):integer; {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
function ContentSetValue(FileName:pchar;FieldIndex,UnitIndex,FieldType:integer;
|
|
FieldValue:pbyte;flags:integer):integer; {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
function ContentSetValueW(FileName:pwidechar;FieldIndex,UnitIndex,FieldType:integer;
|
|
FieldValue:pbyte;flags:integer):integer; {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
procedure ContentSendStateInformation(state:integer;path:pchar); {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
procedure ContentSendStateInformationW(state:integer;path:pwidechar); {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
function ContentEditValue(handle:thandle;FieldIndex,UnitIndex,FieldType:integer;
|
|
FieldValue:pchar;maxlen:integer;flags:integer;langidentifier:pchar):integer; {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF};
|
|
|
|
*)
|
|
|
|
implementation
|
|
end.
|
|
|