mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

ADD: GetCustomIcon() in FileSource (overload, by path, return TBitmap)

Browse source
This commit is contained in:
rich2014 2026-01-21 20:05:08 +08:00
commit e464e57171
1 changed files with 13 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

15
src/filesources/ufilesource.pas
View file

@ -181,7 +181,10 @@ type
function GetRootDir(sPath : String): String; overload;
function GetRootDir: String; overload;
function GetPathType(sPath : String): TPathType;
function GetCustomIcon(aFile: TFile; AIconSize: Integer; out AIcon: TBitmap): IntPtr;
function GetCustomIcon(aFile: TFile; AIconSize: Integer; out AIcon: TBitmap): IntPtr; overload;
function GetCustomIcon(const path: String; const iconSize: Integer): TBitmap; overload;
function GetFreeSpace(Path: String; out FreeSize, TotalSize : Int64) : Boolean;
function GetRealPath(const path: String): String;
function GetLocalName(var aFile: TFile): Boolean;
@ -383,7 +386,10 @@ type
function CreateDirectory(const Path: String): Boolean; virtual;
function FileSystemEntryExists(const Path: String): Boolean; virtual;
function GetCustomIcon(aFile: TFile; AIconSize: Integer; out AIcon: TBitmap): PtrInt; virtual;
function GetCustomIcon(aFile: TFile; AIconSize: Integer; out AIcon: TBitmap): PtrInt; virtual; overload;
function GetCustomIcon(const path: String; const iconSize: Integer): TBitmap; virtual; overload;
function GetFreeSpace(Path: String; out FreeSize, TotalSize : Int64) : Boolean; virtual;
function QueryContextMenu(AFiles: TFiles; var AMenu: TPopupMenu): Boolean; virtual;
function GetDefaultView(out DefaultView: TFileSourceFields): Boolean; virtual;
@ -712,6 +718,11 @@ begin
Result:= -1;
end;
function TFileSource.GetCustomIcon(const path: String; const iconSize: Integer): TBitmap;
begin
Result:= nil;
end;
function TFileSource.GetFreeSpace(Path: String; out FreeSize, TotalSize : Int64) : Boolean;
begin
Result := False; // not supported by default