From 87209148425d31a6fe4e60da57b729af2659bb4a Mon Sep 17 00:00:00 2001 From: Tomas Bzatek Date: Sun, 5 Oct 2008 11:04:58 +0200 Subject: VFS API break: Introduce FDisplayName property --- vfs/uVFSprototypes.pas | 14 +++++++++----- 1 file changed, 9 insertions(+), 5 deletions(-) (limited to 'vfs/uVFSprototypes.pas') diff --git a/vfs/uVFSprototypes.pas b/vfs/uVFSprototypes.pas index dbc9547..df45ecb 100644 --- a/vfs/uVFSprototypes.pas +++ b/vfs/uVFSprototypes.pas @@ -28,7 +28,7 @@ unit uVFSprototypes; interface const - cVFSVersion = 3; // current version of the VFS API + cVFSVersion = 4; // current version of the VFS API // Capabilities capVFS_nil = 0; @@ -87,14 +87,15 @@ type {$ENDIF} - -// All filenames should be UTF-8 as much as possible + //* TODO: FName/FDisplayName: napsat presne pravidla pro absolutni/relativni cesty a opravit v modulech i v UVFSCore PVFSItem = ^TVFSItem; TVFSItem = packed record {$IFNDEF CPU64} // 32-bit platform - sFileName: PChar; + FName: PChar; + // FDisplayName - plugins must ensure correct UTF-8 string + FDisplayName: PChar; iSize: Int64; m_time: DWORD; a_time: DWORD; @@ -105,7 +106,8 @@ type iGID: Integer; ItemType: TVFSItemType; {$ELSE} // 64-bit platform - sFileName: PChar; + FName: PChar; + FDisplayName: PChar; iSize: Int64; m_time: QWORD; a_time: QWORD; @@ -233,6 +235,8 @@ type TVFSListFirst = function (g:TVFSGlobs; const sDir: PChar; VFSItem: PVFSItem): TVFSResult; cdecl; TVFSListNext = function (g:TVFSGlobs; const sDir: PChar; VFSItem: PVFSItem): TVFSResult; cdecl; TVFSListClose = function (g:TVFSGlobs): TVFSResult; cdecl; + + //* TODO: napsat presne pravidla pro absolutni/relativni cesty a opravit v modulech i v UVFSCore TVFSFileInfo = function (g:TVFSGlobs; AFileName: PChar; VFSItem: PVFSItem): TVFSResult; cdecl; // Gets a single info item without need to list a whole directory -- cgit v1.2.3