paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-14 02:59:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

ShellTreeView: remove method GetSelectedNodePath (deprecated since 1.4.0).

Browse Source 
git-svn-id: trunk@51357 -
This commit is contained in:
bart 2016-01-20 14:41:04 +00:00
parent 494d6d83c4
commit dc9997b0d8
1 changed files with 0 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/shellctrls.pas
View File

@ -85,7 +85,6 @@ type
AMask: string; AObjectTypes: TObjectTypes; AResult: TStrings; AFileSortType: TFileSortType = fstNone); AMask: string; AObjectTypes: TObjectTypes; AResult: TStrings; AFileSortType: TFileSortType = fstNone);
{ Other methods specific to Lazarus } { Other methods specific to Lazarus }
function GetPathFromNode(ANode: TTreeNode): string; function GetPathFromNode(ANode: TTreeNode): string;
function GetSelectedNodePath: string; deprecated 'Use property Path instead';
procedure Refresh(ANode: TTreeNode); overload; procedure Refresh(ANode: TTreeNode); overload;
{ Properties } { Properties }
@ -943,10 +942,6 @@ begin
Result := ''; Result := '';
end; end;
function TCustomShellTreeView.GetSelectedNodePath: string;
begin
Result := GetPathFromNode(Selected);
end;
procedure TCustomShellTreeView.Refresh(ANode: TTreeNode); procedure TCustomShellTreeView.Refresh(ANode: TTreeNode);
//nil will refresh root //nil will refresh root