console application update

Irwin1985 · Sep 9, 2023 · 57441e5 · 57441e5
1 parent 3ba613d
commit 57441e5
Show file tree

Hide file tree

Showing 31 changed files with 4 additions and 12 deletions.
diff --git a/bmps/APPLICATION_DISABLED16.bmp b/bmps/APPLICATION_DISABLED16.bmp
diff --git a/bmps/APPLICATION_DISABLED32.bmp b/bmps/APPLICATION_DISABLED32.bmp
diff --git a/bmps/BUG_DISABLED16.bmp b/bmps/BUG_DISABLED16.bmp
diff --git a/bmps/BUG_DISABLED32.bmp b/bmps/BUG_DISABLED32.bmp
diff --git a/bmps/COG_DISABLED16.bmp b/bmps/COG_DISABLED16.bmp
diff --git a/bmps/COG_DISABLED32.bmp b/bmps/COG_DISABLED32.bmp
diff --git a/bmps/DOOR_OUT_DISABLED16.bmp b/bmps/DOOR_OUT_DISABLED16.bmp
diff --git a/bmps/DOOR_OUT_DISABLED32.bmp b/bmps/DOOR_OUT_DISABLED32.bmp
diff --git a/bmps/FIND_DISABLED32.bmp b/bmps/FIND_DISABLED32.bmp
diff --git a/bmps/FOLDER_DISABLED16.bmp b/bmps/FOLDER_DISABLED16.bmp
diff --git a/bmps/FOLDER_DISABLED32.bmp b/bmps/FOLDER_DISABLED32.bmp
diff --git a/bmps/LIGHTNING_DISABLED16.bmp b/bmps/LIGHTNING_DISABLED16.bmp
diff --git a/bmps/LIGHTNING_DISABLED32.bmp b/bmps/LIGHTNING_DISABLED32.bmp
diff --git a/bmps/RELOAD_DISABLED16.bmp b/bmps/RELOAD_DISABLED16.bmp
diff --git a/bmps/RELOAD_DISABLED32.bmp b/bmps/RELOAD_DISABLED32.bmp
diff --git a/bmps/START_DISABLED16.BMP b/bmps/START_DISABLED16.BMP
diff --git a/bmps/START_DISABLED32.BMP b/bmps/START_DISABLED32.BMP
diff --git a/bmps/START_ENABLED16.BMP b/bmps/START_ENABLED16.BMP
diff --git a/bmps/CONTROL_PLAY_BLUE.BMP → bmps/START_ENABLED32.BMP b/bmps/CONTROL_PLAY_BLUE.BMP → bmps/START_ENABLED32.BMP
diff --git a/bmps/STOP_DISABLED16.BMP b/bmps/STOP_DISABLED16.BMP
diff --git a/bmps/STOP_DISABLED32.BMP b/bmps/STOP_DISABLED32.BMP
diff --git a/bmps/STOP_ENABLED16.BMP b/bmps/STOP_ENABLED16.BMP
diff --git a/bmps/STOP_ENABLED32.BMP b/bmps/STOP_ENABLED32.BMP
diff --git a/classes/emptyclass.VCT b/classes/emptyclass.VCT
diff --git a/classes/emptyclass.vcx b/classes/emptyclass.vcx
diff --git a/classes/magicmenu.VCT b/classes/magicmenu.VCT
diff --git a/classes/magicmenu.vcx b/classes/magicmenu.vcx
diff --git a/lang/languages.CDX b/lang/languages.CDX
diff --git a/lang/languages.FPT b/lang/languages.FPT
diff --git a/lang/languages.dbf b/lang/languages.dbf
diff --git a/magicmenu.prg b/magicmenu.prg
@@ -26,6 +26,7 @@ ENDIF
 
 IF NOT PEMSTATUS(_screen, 'oMagicMenu', 5)
 	_screen.AddProperty('oMagicMenu', CREATEOBJECT("Empty"))
+	ADDPROPERTY(_screen.oMagicMenu, "oBarra", .null.)
 	ADDPROPERTY(_screen.oMagicMenu, "cMainDir", ADDBS(JUSTPATH(SYS(16))))
 	ADDPROPERTY(_screen.oMagicMenu, "cDirBMP", ADDBS(JUSTPATH(SYS(16))) + 'bmps\')
 	ADDPROPERTY(_screen.oMagicMenu, "cVersion", "0.0.1")
@@ -42,23 +43,14 @@ IF EMPTY(tcLanguage)
 ENDIF
 
 IF EMPTY(tnToolBarSize)
-	tnToolBarSize = 32
+	tnToolBarSize = 16
 ENDIF
 
 IF NOT INLIST(UPPER(tcLanguage), "ES", "EN")
 	MESSAGEBOX("Wrong value for parameter: tcLanguage." + CHR(13) + CHR(10) + "Please send 'ES' for Spanish or 'EN' for English.", 16, "Error")
 	RETURN
 ENDIF
 
-public loBarra
-** DEBUG
-*!*	_screen.oMagicMenu.bDebugMode = .t.
-*!*	IF _screen.oMagicMenu.bDebugMode
-*!*		CD f:\desarrollo\github\magicmenu\
-*!*		SET DEFAULT TO f:\desarrollo\github\magicmenu\
-*!*	ENDIF
-** DEBUG
-
 CD (_screen.oMagicMenu.cMainDir)
 SET DEFAULT TO (_screen.oMagicMenu.cMainDir)
 
@@ -80,5 +72,5 @@ InitializeDotnetVersion()
 _screen.oBridge = getwwDotNetBridge()
 LOCAL lcMenuClass
 lcMenuClass = "ToolBarMenuX" + ALLTRIM(STR(tnToolBarSize))
-loBarra = CREATEOBJECT(lcMenuClass)
-loBarra.show()
+_screen.oMagicMenu.oBarra = CREATEOBJECT(lcMenuClass)
+_screen.oMagicMenu.oBarra.show()