FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Error en MDI
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Error en MDI
Posted: Thu Jun 05, 2008 12:25 AM
Hola a todos.
Estoy intenando implementar MDI y me da el siguiente error

   Error description: Error BASE/1004  No exported method: OWNDCLIENT
   Args:
     [   1] = U   

Stack Calls
===========
   Called from:  => OWNDCLIENT(0)
   Called from:  => TMDICHILD:NEW(0)
   Called from: CAJA.prg => INMACOMP(38)
   Called from: INICIO.prg => (b)BUILDMENU(286)
   Called from:  => TMENU:COMMAND(0)
   Called from:  => TWINDOW:COMMAND(0)
   Called from:  => TMDIFRAME:COMMAND(0)
   Called from:  => TMDIFRAME:HANDLEEVENT(0)
   Called from: .\source\classes\WINDOW.PRG => _FWH(0)
   Called from:  => WINRUN(0)
   Called from:  => TMDIFRAME:ACTIVATE(0)
   Called from: INICIO.prg => MAIN(217)



La ventana principal la defino asi:

DEFINE WINDOW oWnd MDI;
   FROM 3,6 TO 20,70;
   COLOR "BG+/BG+";
   BRUSH oBrush1;
   ICON oIcon;
   MENU BuildMenu(oWnd)

ACTIVATE WINDOW MAXIMIXED



Funcion BuildMenu
Function BuildMenu(oWnd)
Local oMenu

   MENU oMenu
      MENUITEM "&Clientes"
      MENU
         MENUITEM "ABM de clientes y contactos";
            RESOURCE "CLIEN16";
            ACTION BrowClie(oWnd)
       ENDMENU
   ENDMENU
Return oMenu


Funcion BrowClie()

Function BrowClie(oWnd)
Local oHija

DEFINE WINDOW oHija MDICHILD OF oWnd

ACTIVATE WINDOW oHija


Por favor si alguien me puede dar una mano estaré agradecido, estuve mirando los ejemplos proporcionados, "testmdi", etc.
Realmente no encuentro cual puede ser el error que puedo estar cometiendo.

Desde ya muchas gracias
Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Posts: 408
Joined: Sun Aug 13, 2006 05:38 AM
Error en MDI
Posted: Thu Jun 05, 2008 02:06 AM

al crear la ventana principal te falta indicar el objeto de la ventana

ACTIVATE WINDOW oWnd MAXIMIXED

Saludos

Quique
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Error en MDI
Posted: Thu Jun 05, 2008 02:23 AM

Ups...!!
Lo estoy poniendo al Ojeto, me olvidé de ponerlo aquí en el post!
De todas maneras muchas gracias.

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Posts: 408
Joined: Sun Aug 13, 2006 05:38 AM
Error en MDI
Posted: Thu Jun 05, 2008 02:35 AM
Cuando creas el menĂș oWnd no tiene valor todavĂ­a, intenta creando el menĂș antes de la ventana

   MENU oMenu 
      MENUITEM "&Clientes" 
      MENU 
         MENUITEM "ABM de clientes y contactos"; 
            RESOURCE "CLIEN16"; 
            ACTION BrowClie(oWnd) 
       ENDMENU 
   ENDMENU

DEFINE WINDOW oWnd MDI; 
   FROM 3,6 TO 20,70; 
   COLOR "BG+/BG+"; 
   BRUSH oBrush1; 
   ICON oIcon; 
   MENU oMenu

ACTIVATE WINDOW oWnd MAXIMIXED
Saludos

Quique
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Error en MDI
Posted: Thu Jun 05, 2008 03:00 AM

MuchĂ­simas gracias... funcionĂł perfecto!!
Saludos, desde Argentina Esteban.

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda

Continue the discussion