No logro que se presente la dialog en el folder
Código de la dialog:
Test.prg
- Code: Select all Expand view
#include "Fivewin.ch"
#include "common.ch"
STATIC oCn
FUNCTION Main()
LOCAL odlg
LOCAL id:="100", oGet, oSay, oFont, oFld, oBrush
DEFINE DIALOG odlg TITLE " " SIZE 1110,660
@ 1, 10 SAY oSay PROMPT "Cliente:" OF odlg FONT oFont
@ 1.25, 18 GET oGet VAR id SIZE 50,12 OF odlg FONT oFont READONLY UPDATE //id se debe reemplazar por la variable del rowset
@ 2, 1 FOLDER oFld ITEMS "Datos" DIALOGS "DLG_CLIENTE" OF odlg SIZE 545,294 ADJUST FONT oFont
ACTIVATE DIALOG odlg CENTER
RETURN nil
la dialog está en un RC que compilo con este sencillo prg
Recurso:
Test.rc
- Code: Select all Expand view
#include "C:\bcc7\include\windows\sdk\windows.h"
#include "C:\bcc7\include\windows\sdk\commctrl.h"
#include "C:\bcc7\include\windows\sdk\richedit.h"
#include "resource.h"
//
// Dialog resources
//
LANGUAGE LANG_NEUTRAL, SUBLANG_NEUTRAL
DLG_CLIENTES DIALOG 0, 0, 545, 294
STYLE DS_3DLOOK | DS_CENTER | DS_SHELLFONT | WS_VISIBLE | WS_CHILDWINDOW
FONT 8, "Ms Shell Dlg"
{
LTEXT "Muestra de Texto para probar como se comporta", 0, 197, 75, 154, 9, SS_LEFT, WS_EX_LEFT
PUSHBUTTON "Button", 0, 152, 121, 291, 131, 0, WS_EX_LEFT
}
Compilo y no muestra la dialog (he tratado de simplificar el ejemplo al máximo)
Aprecio que alguien pueda despabilarme