Visual Fortran V - cuadro dialogo
Publicado por Elsa (1 intervención) el 10/06/2011 21:47:42
Estoy tratando de editar un dialogo y no funciona.
No aparece el cuador de dialogo y me da error la funcion MessageBoxqq.
unresolved external symbol _MESSAGEBOXQQ@20
Muchas Gracias
Elsa
El codigo es:
USE DFLOGM
! IMPLICIT NONE
INCLUDE 'script1.FD'
TYPE (dialog) dlg
LOGICAL return
INTEGER IDD_script1
INTEGER retint
LOGICAL retlog
CHARACTER msg
CHARACTER caption
INTEGER mtype
return = DLGINIT(IDD_script1, dlg )
retint = DlgModal( dlg )
msg = "HOLA"
caption = "HOLA"
mtype = 1
return = MESSAGEBOXQQ (msg, caption, mtype)
! Release dialog resources.
! CALL DlgUninit( dlg )
END
No aparece el cuador de dialogo y me da error la funcion MessageBoxqq.
unresolved external symbol _MESSAGEBOXQQ@20
Muchas Gracias
Elsa
El codigo es:
USE DFLOGM
! IMPLICIT NONE
INCLUDE 'script1.FD'
TYPE (dialog) dlg
LOGICAL return
INTEGER IDD_script1
INTEGER retint
LOGICAL retlog
CHARACTER msg
CHARACTER caption
INTEGER mtype
return = DLGINIT(IDD_script1, dlg )
retint = DlgModal( dlg )
msg = "HOLA"
caption = "HOLA"
mtype = 1
return = MESSAGEBOXQQ (msg, caption, mtype)
! Release dialog resources.
! CALL DlgUninit( dlg )
END
Valora esta pregunta


0