20221023

Help/WinFBE/Visual Designer/Controls/ListView.html

@@ -337,6 +337,9 @@
   <meta http-equiv='X-UA-Compatible' content='IE=edge' />
   <meta http-equiv='MSThemeCompatible' content='Yes'>
 
+  <meta http-equiv='X-UA-Compatible' content='IE=edge' />
+  <meta http-equiv='MSThemeCompatible' content='Yes'>
+
   <meta charset="utf-8" />
   <meta name="generator" content="pandoc" />
   <meta name="viewport" content="width=device-width, initial-scale=1.0, user-scalable=yes" />
@@ -1032,5 +1035,6 @@ <h5 id="wfxpoint">wfxPoint</h5>
 
 
 
+
 
 

changes.txt

@@ -1,4 +1,4 @@
-Version 3.0.2 (beta 2)
+Version 3.0.2 (beta 3)
 Editor:
 - Fixed bug where WinFBE 64-bit only would GPF if currently loaded file is edited by an external editor causing WinFBE to reload the file.
 - Fixed bug where focus would be lost from the Find textbox as the user typed a search word and a corresponding match was found.
@@ -7,6 +7,7 @@ Editor:
 
 Visual Designer:
 - MAJOR FILE FORMAT CHANGE: Form data separated from code file and is now saved to external file with *.design file extension.
+- Existing visual designer files are saved with a "*.backup-before-upgrade" file extension prior to the new file format upgrade in case something goes wrong and the user needs revert to the older file.
 - When selecting a control from the toolbox and then just clicking on a form (not "drawing" it), it creates a control with a height and width of 0. There are now default sizes for all controls that may be created too small.
 - When double-clicking an event in the toolbox, automatically enable that event, create the placeholder (if needed) and switch to that event in the code view.
 - When double-clicking a control in design view, automatically switch to the code view for the default event handler for that control (e.g.: the _Click handler if it's a button).

src/clsDocument.inc

@@ -1198,13 +1198,28 @@ function clsDocument.SaveFile( _
       if AfxFileExists(wszAutoSaveFilename) then AfxDeleteFile(wszAutoSaveFilename)
       wszSaveFilename = wszAutoSaveFilename
    else   
+      ' If we are upgrading to v3.02+ then save the original file because the original
+      ' file format has visual designer and code all in one file.
+      ' Save a copy of the original file to the backup in the event that there is
+      ' issues with the upgrade process. Fail if backup already exists.
+      if this.IsDesigner then
+         if (ConvertWinFBEversion(this.wszFormVersion) >= ConvertWinFBEversion("3.0.2")) orelse _
+            (ConvertWinFBEversion(this.wszFormVersion) = 0) then  'b/c upgraded form files do not have version loaded yet
+            ' We are already using new form file format
+         else   
+            dim as CWSTR wszBackupFilename = this.DiskFilename & ".backup-before-upgrade"
+            AfxCopyFile( this.DiskFilename, wszBackupFilename, CTRUE )   
+         end if
+      end if   
+
       ' ensure any previously created AutoSave files are delete should 
       ' the user had chosen a new filename
       if AfxFileExists(wszFilename) then AfxDeleteFile(wszFilename)
       if AfxFileExists(wszAutoSaveFilename) then AfxDeleteFile(wszAutoSaveFilename)
       wszSaveFilename = wszFilename
    end if   
 
+
    dim pStream as CFileStream
    if pStream.Open(wszSaveFilename, STGM_CREATE or STGM_WRITE) = S_OK then
       dim as string st