fix: No more relative paths on form caption

gcarreno · Feb 3, 2021 · 1ccc197 · 1ccc197
1 parent c0da09f
commit 1ccc197
Show file tree

Hide file tree

Showing 4 changed files with 6 additions and 5 deletions.
diff --git a/src/application/ljv.application.version.pas b/src/application/ljv.application.version.pas
@@ -27,11 +27,11 @@
 interface
 
 const
-  cVersion = '0.1.7.29';
+  cVersion = '0.1.7.30';
   cVersionMajor = 0;
   cVersionMinor = 1;
   cVersionRevision = 7;
-  cVersionBuild = 29;
+  cVersionBuild = 30;
 
 implementation
 

diff --git a/src/forms/ljv.forms.main.lfm b/src/forms/ljv.forms.main.lfm
@@ -11,6 +11,7 @@ object frmMain: TfrmMain
   OnDestroy = FormDestroy
   OnDropFiles = FormDropFiles
   SessionProperties = 'Top;Left;Height;Width;WindowState'
+  LCLVersion = '2.1.0.0'
   object psMain: TPairSplitter
     Cursor = crDefault
     Left = 224
@@ -38,7 +39,7 @@ object frmMain: TfrmMain
         Header.Columns = <        
           item
             Position = 0
-            Width = 398
+            Width = 400
           end>
         Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoShowSortGlyphs]
         TabOrder = 0

diff --git a/src/forms/ljv.forms.main.pas b/src/forms/ljv.forms.main.pas
@@ -537,7 +537,7 @@ procedure TfrmMain.AddFile(const AFilename: String);
     begin
       len:= Length(FFileList);
       SetLength(FFileList, len + 1);
-      FFileList[len]:= AFilename;
+      FFileList[len]:= ExpandFileName(AFilename);
     end;
   end;
 end;

diff --git a/src/lazJSONViewer.lpi b/src/lazJSONViewer.lpi
@@ -24,7 +24,7 @@
       <UseVersionInfo Value="True"/>
       <MinorVersionNr Value="1"/>
       <RevisionNr Value="7"/>
-      <BuildNr Value="29"/>
+      <BuildNr Value="30"/>
       <Language Value="0809"/>
     </VersionInfo>
     <BuildModes Count="4">