Project file information.
$ = Gfa_FileName
date = Gfa_FileTime
$ = Gfa_ExeName
date = Gfa_ExeTime
Gfa_FileName returns the full path and filename of the current project. If the project has no name, when it isn't saved before, this function returns an empty string.
Gfa_FileTime returns the file date of the latest save action of the project currently loaded. The return value is of type Date. In case of an error the return value is CDate(0.0).
Gfa_ExeName returns the name of the compiled project currently loaded in the IDE. This function can be used to determine whether a program is compiled before, if it isn't the function returns an empty string.
Gfa_ExeTime returns the file date of the compile Exe, GLL, or lg32. The return value is of type Date. In case of an error the return value is CDate(0.0).
Insert the filename and time, exe name, and time.
Sub Gfa_App_F
Dim i% = PopUp(" FileName| FileTime| Exe FileName| Exe FileTime")
Gfa_Insert Choose(i% + 1, Gfa_FileName, Gfa_FileTime, Gfa_ExeName, Gfa_ExeTime)
EndSub
{Created by Sjouke Hamstra; Last updated: 08/10/2014 by James Gaite}