Commit 35506f67 authored by Bart B's avatar Bart B 🐞
Browse files

ShellCtrls: fix rasing excption when changing TShellTreeView.FileSortType in...

ShellCtrls: fix rasing excption when changing TShellTreeView.FileSortType in designer. Issue #36055.

git-svn-id: trunk@61823 -
parent e4ee7090
......@@ -529,7 +529,7 @@ var
begin
if FFileSortType=AValue then exit;
FFileSortType:=AValue;
if (csLoading in ComponentState) then Exit;
if (([csLoading,csDesigning] * ComponentState) <> []) then Exit;
CurrPath := GetPath;
try
BeginUpdate;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment