Problemas al Incrustar controles de un Dialog a una Ventana

Post Reply
User avatar
VPOZO
Posts: 32
Joined: Tue Jun 24, 2008 5:19 pm
Location: Punta Arenas, Chile

Problemas al Incrustar controles de un Dialog a una Ventana

Post by VPOZO »

Tiempo atras antonio dio una procedimiento para incrustar controldes de un Dialog a una ventana pero tengo problemas cuando los controles son del tipo GET, pasa loc controles bien pero al hacer clink en la ventana sobre el control traspasado me sale el siquiente error

Desde ya gracias


FIVEWIN ha causado un error de protecion general en el modulo KRNL386 en 0001:2D19

Escoja Cerrar FIVEWIN se cerrara

El codigo de la aplicacion es el siguiente

*----------------------------------------*
#include "FiveWin.ch"

local oChild

SET RESOURCES TO "RECURSO.DLL"

DEFINE WINDOW oChild TITLE "A Child Window" MDICHILD

ACTIVATE WINDOW oChild ;
ON INIT BuildDialog( oChild )

SET RESOURCES TO
return nil

function BuildDialog( oChild )

local oDlg, oGet1, oGet2, oGet3, oGet4, nLoca_desde, nBode_Desde
local cLoca_desde, cBode_Desde, aLocaD:={}, aBodeD:={}, oBtn


DEFINE DIALOG oDlg RESOURCE "DLG_PRUEBA" OF oChild


REDEFINE GET oGet1 ID 10 OF oDlg

REDEFINE COMBOBOX oGet3 VAR cLoca_Desde ITEMS aLocaD COLORS col_text, col_fondo ID 12 OF oDlg
REDEFINE COMBOBOX oGet4 VAR cBode_Desde ITEMS aBodeD COLORS col_text, col_fondo ID 13 OF oDlg
*
REDEFINE BTNBMP oBtn ID 17 OF oDlg ACTION oDlg:end() RESOURCE "BMP_CANCEL16" PROMPT "Cancela" LEFT TOOLTIP "Cancela el Ingreso del Traslado..."


ACTIVATE DIALOG oDlg NOWAIT ;
ON INIT ChangeParent( oDlg, oChild )

oDlg:End()

oChild:SetSize( 800, 400 )

return nil

function ChangeParent( oDlg, oChild )

local n

for n = 1 to Len( oDlg:aControls )
SetParent( oDlg:aControls[ n ]:hWnd, oChild:hWnd )
AAdd( oChild:aControls, oDlg:aControls[ n ] )
next

return nil
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Estas usando FiveWin para Clipper ó FWH 32 bits ?
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
VPOZO
Posts: 32
Joined: Tue Jun 24, 2008 5:19 pm
Location: Punta Arenas, Chile

incustar controles de un dialog a una ventana

Post by VPOZO »

recibi el correo donde me explica que el codigo esta probado para FWH 32 bit y que posiblemente no funcione en 16 bit. Le estoy dando vueltas al asunto pienzo que quizas si detecto el tipo de classe get al cambiar los controles del dialog a la ventana pueda definir un control similar en la ventana destino, como clonarlo o algo asi... Le voy a dedicar un tiempo mas al tema y si no seguire ocupando los dialog en mi sistema. el problema que queria solucionar con esto es que los dialog cuando son nomodal y saldo del ambito del dialogo para pinchar la ventana principal (MDI) las variables del dialog se destruyen.
Post Reply