paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-06 06:57:54 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL/ShellTreeView: Move FFileInfo from private into protected section of TShellTreeNode.

Browse Source
This commit is contained in:
wp_xyz 2022-12-08 22:12:06 +01:00
parent b8a32b9515
commit e9d296ce8e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/shellctrls.pas
View File

@ -389,9 +389,9 @@ type
TShellTreeNode = class(TTreeNode)
private
FFileInfo: TSearchRec;
FBasePath: String;
protected
FFileInfo: TSearchRec;
procedure SetBasePath(ABasePath: String);
public
function ShortFilename: String;