FiveTech Software tech support forums

... 4-the time he had succes) in a network from 5 computers. On the active alias i can see which table he tryed to open , it is only possible from the mainmenu. In the errorlist i can not see that. The second and third try let see that the error occurs after +/- 1 min. This is only possible when he ...

... accented chars (like šđčžć) on user computer regardles of what he have in "Code Page for Non-Unicode programs". This includes text in MainMenu, labels, fields, grids. Is there a way to use unicode in fwh app? Our dbf data is in cp852. Thank you.

... .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE(273) Called from: testxbr3.prg => RDDBRWALLCOLSDLG(644) Called from: testxbr3.prg => (b)MAINMENU(114) Called from: .\source\classes\MENU.PRG => TMENU:COMMAND(441) Called from: .\source\classes\WINDOW.PRG => TWINDOW:COMMAND(1043) Called ...

... Called from: .\source\classes\PRINTER.PRG => PRINTEND(985) Called from: LSTCOOPP.PRG => REPPATS(228) Called from: LSTCOOPP.PRG => (b)MAINMENU(268) Called from: .\source\classes\MENU.PRG => TMENU:COMMAND(437) Called from: .\source\classes\WINDOW.PRG => TWINDOW:COMMAND(1027) Called ...

You better implement Alt-X behavior through ACCELERATOR clause of menu item, than by set key. MainMenu() should be a function returning Menu Object. This is a simplified code implementing what you wanted. You can later add language specific code and code for logos and ...

The function MainMenu executes prior to creation of the main window. Therefore the parameter oWindow received by MainMenu() function is NIL and you are calling oWindow:End() results in calling NIL:End().

Instead of using oWindow:End(), use WndMain():End()

Hunter, Try that: ... MainMenu (@oWindow, @oMenu, @nChoice, {|| oWindow } ) ... STATIC PROCEDURE MainMenu (oWindow, oMenu, nChoice, bWindow ) SETKEY(ASC("X"), {|| IIF( GetKeyState( ACC_ALT ), EVAL({|| IIF(ALERT( ; "¿ Terminar ...

... + Implemented: Harbour level codepage protocol. Please make experiments. WARNING: you may need to re-select appropriate codepage from <MainMenu><Setup><Codepages> menu option before saving any source. Better would be - select codepage as above and exit hbIDE, reenter. ...

... mostrarlo me parece que por donde he ido no es el camino .... Seguiré con ello . La manera de hacerlo es crear un nib con una ventana yllamarla MainMenu .Colocarlo dentro de Contens-> resources->English.lproj. Para llamarlo con esta simple funcion vale : HB_FUNC( WINDOWCONTROLCREATE ) ...

Estimados compañeros:

Yo lo tengo asi y me funciona..

STATIC FUNCTION MainMenu()
LOCAL oMenu
MENU oMenu 2007

Saludos Ruben Fernandez

... Llamado desde: LEN(0) Llamado desde: Ap_brow1.prg BARRABOT(360) Llamado desde: Ap_brow1.prg AP_BROWSE1(218) Llamado desde: Ap_main.prg (b)MAINMENU(73) Llamado desde: MENU.prg TMENU:COMMAND(407) Llamado desde: WINDOW.prg TWINDOW:COMMAND(932) Llamado desde: MDIFRAME.prg TMDIFRAME:COMMAND(229) ...

Ahhhh!!, ya entendí, es cierto, no le ví de esa forma.
Gracias Antonio, por despejar esta duda.

Saludos cordiales.

Carlos.

Carlos,

Cuando se llama a MenuSistema( oWnd ) para construir el menu, oWnd es nil pues la ventana no se ha creado aún

Code: Select all  Expand view

    DEFINE WINDOW oWnd TITLE "Sistema..." ;
        MENU MenuSistema( oWnd )
 

Hola a todos. Esta es una simpre curiosidad: Tengo dos programas: MainSis.prg #include "Fivewin.ch"Static oWndFunction Main()    DEFINE WINDOW oWnd TITLE "Sistema..." ;        MENU MenuSistema( oWnd )        ACTIVATE WINDOW oWnd MAXIMIZED ;        VALID MsgNoYes&#...