Hola amigos,
Tengo un .rc así:
El caso es que desde el código fuente necesito poder acceder a Nombre, Págs., Vols, etc pero no están incluidos en oDlg:aControls, aunque sí que se pintan correctamente.
Aquí va un ejemplo que va a ser más clarito:
Por favor, ¿cómo puedo saber esos SAYS?.
Muy agradecida.
Tengo un .rc así:
// RESOURCE SCRIPT generated by "Pelles C for Windows, version 7.00".
#include <windows.h>
#include <commctrl.h>
#include <richedit.h>
LANGUAGE LANG_ENGLISH,SUBLANG_ENGLISH_US
ELVIRA DIALOG DISCARDABLE 23, 16, 258, 163
STYLE WS_POPUP|DS_MODALFRAME|WS_CAPTION
CAPTION "Búsquedas"
FONT 10, "MS Sans Serif"
{
CONTROL "", 100, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 51, 14, 86, 12
CONTROL "", 101, "Edit", ES_RIGHT|ES_AUTOHSCROLL|WS_VSCROLL|WS_BORDER|WS_TABSTOP, 52, 60, 49, 11
CONTROL "", 102, "Edit", ES_RIGHT|WS_BORDER|WS_TABSTOP, 152, 60, 24, 11
CONTROL "", 103, "Edit", ES_RIGHT|ES_NUMBER|ES_AUTOVSCROLL|WS_VSCROLL|WS_BORDER|WS_TABSTOP, 208, 60, 36, 11
CONTROL "&Nombre:", -1, "Static", WS_GROUP, 10, 16, 28, 8
CONTROL "&Págs.:", -1, "Static", SS_RIGHT|WS_GROUP, 184, 60, 19, 12
CONTROL "&Vols:", -1, "Static", SS_RIGHT|WS_GROUP, 30, 63, 17, 8
CONTROL "&Ejemplares:", -1, "Static", SS_RIGHT|WS_GROUP, 112, 60, 38, 8
CONTROL "&Aceptar", 701, "Button", WS_TABSTOP, 73, 128, 36, 14
CONTROL "&Cancelar", 702, "Button", WS_TABSTOP, 140, 128, 36, 14
}El caso es que desde el código fuente necesito poder acceder a Nombre, Págs., Vols, etc pero no están incluidos en oDlg:aControls, aunque sí que se pintan correctamente.
Aquí va un ejemplo que va a ser más clarito:
#include "FiveWin.ch"
#include "xbrowse.ch"
//----------------------------------------------------------------------------//
function Main()
local oDlg, lSave := .f.
local c100 := "TEST ELVIRA "
local c101 := 0
local c102 := 0
local c103 := 0
DEFINE DIALOG oDlg RESOURCE "ELVIRA" TITLE "Prueba Elvira"
REDEFINE GET c100 ID 100 OF oDlg
REDEFINE GET c101 ID 101 OF oDlg PICTURE "@E 9,999,999" SPINNER
REDEFINE GET c102 ID 102 OF oDlg PICTURE "@E 9,999,999"
REDEFINE GET c103 ID 103 OF oDlg PICTURE "@E 9999" SPINNER
REDEFINE BUTTON ID 701 OF oDlg ACTION( lSave := .T., oDlg:End() )
REDEFINE BUTTON ID 702 OF oDlg ACTION( lSave := .F., oDlg:End() )
ACTIVATE DIALOG oDlg CENTERED ;
ON INIT aControls( oDlg )
return nil
//----------------------------------------------------------------------------//
FUNCTION aControls( oDlg )
xbrowser oDlg:aControls
AEval( oDlg:aControls, { | o | msgalert( o:cCaption, o:ClassName() ) } )
return nilPor favor, ¿cómo puedo saber esos SAYS?.
Muy agradecida.
