FIX: Label visibility

This commit is contained in:
Alexander Koblov 2017-01-14 18:29:24 +00:00
commit 557bfc851f

View file

@ -421,7 +421,8 @@ begin
//if Attrs is TNtfsFileAttributesProperty
ShowPermissions(Attrs);
chkExecutable.Visible:= FPS_ISREG(Attrs);
lblExecutable.Visible:= FPS_ISREG(Attrs);
chkExecutable.Visible:= lblExecutable.Visible;
edtOctal.Text:= DecToOct(GetModeFromForm);
lblAttrText.Caption := Properties[fpAttributes].Format(DefaultFilePropertyFormatter);