fpvviewer: Very small improvements

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2745 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2013-06-10 07:33:00 +00:00
parent 8abec37d49
commit 90c3a68e07
2 changed files with 9 additions and 0 deletions
--- a/applications/fpvviewer/examples_files/svg/arcs_1.svg
+++ b/applications/fpvviewer/examples_files/svg/arcs_1.svg
@ -23,4 +23,12 @@
            sweep-flag=1
        </text>
    </g>
+  <path
+     style="fill:none;stroke:#000000;stroke-width:1px;stroke-linecap:butt;stroke-linejoin:miter;stroke-opacity:1"
+     d="M 46.938776,46.938776 42.857143,271.42857"
+     id="path2838" />
+  <path
+     style="fill:none;stroke:#000000;stroke-width:1px;stroke-linecap:butt;stroke-linejoin:miter;stroke-opacity:1"
+     d="m 283.67347,34.693878 428.57143,0"
+     id="path2840" />
 </svg>
--- a/applications/fpvviewer/fpvv_mainform.pas
+++ b/applications/fpvviewer/fpvv_mainform.pas
@ -87,6 +87,7 @@ var
  CanvasSize: TPoint;
 begin
  // First check the in input
+  if editFileName.FileName = '' then Exit; // silent exit in this simple case
  //if not CheckInput() then Exit;

  notebook.PageIndex := 0;