diff options
| -rw-r--r-- | docview/src/frm_main.pas | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/docview/src/frm_main.pas b/docview/src/frm_main.pas index 4eae0358..c3c0fd1e 100644 --- a/docview/src/frm_main.pas +++ b/docview/src/frm_main.pas @@ -954,6 +954,8 @@ begin s := ''; sep := ''; n := tvContents.Selection; + if n = nil then + Exit; while n.Parent <> nil do begin s := n.Parent.Text + sep + s; |