Page 1 of 1

Extendet Version FMG ?

Posted: Tue Dec 10, 2019 4:48 am
by AUGE_OHR
hi,

i try to use CLICK Source with Extendet Version.
but it does not start just a Errot with
Subsystem Call ....: MGERROR
System Code .......: 0
Default Status ....: .F.
Description .......: Main Window is not defined. Program terminated.
Operation .........:
Involved File .....:
Dos Error Code ....: 0
now have a look at this Snapshot
MiniGUI_Main_FMG_Error.jpg
MiniGUI_Main_FMG_Error.jpg (325.05 KiB) Viewed 1693 times
FMG is there and Code

Code: Select all

PROCEDURE main( filespec )
PUBLIC cStatusBox := ""
PUBLIC cInBox     := ""
PUBLIC cOutBox    := ""
PUBLIC ClickForm

#IFDEF Use_Gui
*DECLARE ClickForm
*IF !IsWindowDefined( ClickForm )
   Load Window ClickForm As Main
   CENTER WINDOW Main
   Activate Window Main
*ENDIF
#ELSE
   StartClick( filespec )
#ENDIF
RETURN
so please tell me how to use FMG with Extendet Version.

Re: Extendet Version FMG ?

Posted: Tue Dec 10, 2019 4:59 am
by bpd2000
Refer link for HMG-IDE Form File to PRG Source Code (FMG2PRG) Converter
http://hmgforum.com/viewtopic.php?f=10& ... 2prg#p1011

Re: Extendet Version FMG ?

Posted: Tue Dec 10, 2019 5:22 am
by AUGE_OHR
hi,
bpd2000 wrote: Tue Dec 10, 2019 4:59 am Refer link for HMG-IDE Form File to PRG Source Code (FMG2PRG) Converter
http://hmgforum.com/viewtopic.php?f=10& ... 2prg#p1011
do you recommend NOT to use FMG :?:

Re: Extendet Version FMG ?

Posted: Tue Dec 10, 2019 9:46 am
by dragancesu
PRG vs FMG, it's same, a matter of taste and habit

Re: Extendet Version FMG ?

Posted: Tue Dec 10, 2019 11:35 am
by danielmaximiliano
AUGE_OHR wrote: Tue Dec 10, 2019 5:22 am hi,

do you recommend NOT to use FMG :?:
Using FMG is more comfortable since I can use the form editor to see how my development is in the visual part, but then with small tricks hide those annoying files and arrange them in their respective container folders. something that added to the use of VFP IDE, the main folder containing the project file.
2019-12-10 08_31_31-Window.png
2019-12-10 08_31_31-Window.png (38.38 KiB) Viewed 1646 times

Code: Select all

REQUEST DBFCDX, DBFFPT
RDDSETDEFAULT ("DBFCDX")
SET CODEPAGE TO UNICODE
InitMessages( "ES" )

SET INTERACTIVECLOSE ON 
SET SOFTSEEK ON
SET NAVIGATION EXTENDED
SET DELETE ON
SET DEFAULT TO '.\Bases\'
                                      // Seleccionamos las Tablas 
   DBUSEAREA( .T. , "DBFCDX" , "PRODUCTOS" )
   If File(".\Bases\PRODUCTOS.CDX")
    DELETE FILE .\Bases\PRODUCTOS.CDX
   EndIF
   
  SET WINDOW MAIN OFF
      CreateScreenSplash ( cFileName , nDelaySeconds , nAnimateSeconds )
   SET WINDOW MAIN ON
   
   Load Window .\Formularios\Principal