Page 4 of 5

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Sat Jul 15, 2023 6:37 pm
by El Loco
Ya lo hice Karinha, es mas, es parte del ejemplo que me recomendo Antonio

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Sat Jul 15, 2023 6:43 pm
by El Loco
Amigo, no has probado con el PellesC de 64 bits ? por si aun tienes el de 32.


Si Jose utilizo la version de 64bits.
Hace un rato baje e instale la ultima version la 12.00.2
...y el problema persiste

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Tue Jul 18, 2023 5:53 am
by JESUS MARIN
Buenos dias
Tal vez es una tontería, pero una vez me pasó.

( por si te puede ayudar a localizar el origen del error)

En mi caso el problema fué al definir el tamaño del folder.
Al definir el folder, como no sabía el tamaño definitivo que debería tener, lo definía con un tamaño pequeño.
Luego durante el pintado de la ventana o dialogo, lo ajustaba al tamaño definitivo.

Los controles que se quedaban fuera del tamaño original no se pintaban.

Me costó mucho entender que no siempre el folder actualizaba nWidth y nHeight, aunque si actualizaba nRight y nBottom.
Cambié el tamaño original ( a un tamaó muy grande 2000 x 2000 ) y entonces SI se "pintaban" los controles.

Lo dicho, tal vez sea una estupidez. Pero por si acaso

Saludos
Jesús

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Tue Jul 18, 2023 2:51 pm
by karinha
Jesús, no creo. El más probable sea el PELLESC.exe No me gusta de ninguna forma este editor de recursos.

Regards, saludos.

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Tue Jul 18, 2023 3:28 pm
by JoseAlvarez
El Loco wrote:
Amigo, no has probado con el PellesC de 64 bits ? por si aun tienes el de 32.


Si Jose utilizo la version de 64bits.
Hace un rato baje e instale la ultima version la 12.00.2
...y el problema persiste


Enviame el RC por favor.

jalvarez AT neurosistema DOT online

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Tue Jul 18, 2023 4:29 pm
by El Loco
JoseAlvarez wrote:
El Loco wrote:
Amigo, no has probado con el PellesC de 64 bits ? por si aun tienes el de 32.


Si Jose utilizo la version de 64bits.
Hace un rato baje e instale la ultima version la 12.00.2
...y el problema persiste


Enviame el RC por favor.

jalvarez AT neurosistema DOT online


Buenos dias Jose, ya lo habia enviado, ahi te lo envio nuevamente

Code: Select all  Expand view
// RESOURCE SCRIPT generated by "Pelles C for Windows, version 10.00".

#include <windows.h>
#include <commctrl.h>
#include <richedit.h>

LANGUAGE LANG_SPANISH,SUBLANG_SPANISH_ARGENTINA

8005 BITMAP "res1.bmp"

8001 BITMAP "res2.bmp"

DLG00 DIALOGEX DISCARDABLE 6, 18, 410, 236
STYLE WS_POPUP|WS_CAPTION|WS_SYSMENU|WS_MINIMIZEBOX|WS_VISIBLE
EXSTYLE WS_EX_APPWINDOW|WS_EX_CONTROLPARENT
FONT 9, "Arial", 0, 0, 1
{
  CONTROL "", 4002, "SysTabControl32", 0x00000000, 108, 24, 296, 188, 0x00000108, 188
  CONTROL "&Salir", IDCANCEL, "Button", BS_FLAT, 352, 220, 50, 12
  CONTROL "Diseño Registro DBF", 4005, "Button", BS_FLAT, 4, 28, 96, 14
  CONTROL "Diseño Registro TXT", 4008, "Button", BS_FLAT, 4, 48, 96, 14
  CONTROL "This is a label:", 101, "Static", SS_CENTERIMAGE, 0, 0, 460, 22
}

DBLP DIALOGEX DISCARDABLE 6, 18, 620, 292
STYLE DS_MODALFRAME|WS_CAPTION|WS_SYSMENU|WS_VISIBLE
EXSTYLE WS_EX_TOOLWINDOW
FONT 8, "Arial", 0, 0, 1
{
  CONTROL "&Salir", IDCANCEL, "Button", BS_FLAT, 560, 272, 50, 12
  CONTROL "Custom control", 4003, "TxBrowse", 0x00b00000, 0, 17, 620, 250
  CONTROL "DOBLE CLICK  o  ENTER SELECCIONA   /    ESC. SALE", 4001, "Static", SS_CENTERIMAGE|WS_GROUP, 3, 268, 205, 8
  CONTROL "&Exporta a Excel", 4004, "Button", BS_FLAT, 400, 272, 70, 12
  CONTROL "", 4016, "msctls_progress32", NOT WS_VISIBLE, 3, 282, 248, 6
  CONTROL "&Visualiza Planilla", 4005, "Button", NOT WS_VISIBLE|BS_FLAT, 471, 272, 70, 12
  CONTROL "This is a label:", 4002, "Static", SS_CENTERIMAGE|WS_GROUP, 0, 0, 620, 16
}

DBCP DIALOGEX DISCARDABLE 6, 18, 625, 292
STYLE WS_CAPTION|WS_SYSMENU|WS_VISIBLE
EXSTYLE WS_EX_TOOLWINDOW
FONT 8, "Arial", 0, 0, 1
{
  CONTROL "Custom control", 4004, "TxBrowse", 0x00a00000, 0, 17, 624, 250
  CONTROL "&Salir", IDCANCEL, "Button", BS_FLAT, 560, 272, 50, 13
  CONTROL "DOBLE CLICK  o  ENTER SELECCIONA   /    ESC. SALE", 4001, "Static", SS_CENTERIMAGE|WS_GROUP, 3, 268, 201, 12
  CONTROL "This is a label:", 4002, "Static", SS_CENTERIMAGE|WS_GROUP, 0, 0, 624, 16
  CONTROL "&Exporta a Excel", 4003, "Button", BS_FLAT, 400, 272, 70, 12
  CONTROL "", 4016, "msctls_progress32", NOT WS_VISIBLE, 4, 280, 248, 6
  CONTROL "&Visualiza Planilla", 4005, "Button", NOT WS_VISIBLE|BS_FLAT, 472, 272, 70, 12
}

8002 BITMAP "res3.bmp"

BUSCA_16 BITMAP "res4.bmp"

BUSCA_32 BITMAP "res5.bmp"

DIS_REG DIALOGEX DISCARDABLE 6, 18, 522, 360
STYLE DS_MODALFRAME|WS_CAPTION|WS_SYSMENU|WS_VISIBLE
EXSTYLE WS_EX_TOOLWINDOW
FONT 8, "Arial", 0, 0, 1
{
  CONTROL "Custom control", 4003, "TxBrowse", 0x00a00000, 0, 16, 520, 324
  CONTROL "&Salir", IDCANCEL, "Button", BS_FLAT, 460, 344, 50, 12
  CONTROL "This is a label:", 4002, "Static", SS_CENTERIMAGE|WS_GROUP, 0, 0, 520, 16
}

8004 ICON "res1.ico"

8003 ICON "res2.ico"

8006 ICON "res3.ico"

8007 ICON "res4.ico"

8008 ICON "res5.ico"

8009 ICON "res6.ico"

DCPOSTAL DIALOGEX DISCARDABLE 6, 18, 300, 170
STYLE WS_CHILD|WS_VISIBLE
FONT 9, "Arial", 0, 0, 1
{
  CONTROL "", 4001, "ComboBox", WS_BORDER|CBS_DROPDOWNLIST|WS_TABSTOP, 92, 4, 136, 125
  CONTROL "Editbox", 4002, "Edit", ES_RIGHT|ES_NUMBER|ES_WANTRETURN|WS_BORDER|WS_TABSTOP, 92, 20, 52, 10
  CONTROL "", 4003, "TBtnBmp", WS_TABSTOP, 144, 20, 10, 10
  CONTROL "DBase (.dbf)", 4012, "Button", BS_RADIOBUTTON|WS_GROUP|WS_TABSTOP, 92, 44, 64, 10
  CONTROL "Texto (.txt)", 4013, "Button", BS_RADIOBUTTON|WS_GROUP|WS_TABSTOP, 92, 60, 64, 10
  CONTROL "Excel (.xls)", 4014, "Button", BS_RADIOBUTTON|WS_GROUP|WS_TABSTOP, 92, 76, 64, 10
  CONTROL "Editbox", 4015, "Edit", WS_BORDER|WS_TABSTOP, 100, 100, 156, 10
  CONTROL "", 4008, "TBtnBmp", 0x00000000, 256, 100, 10, 10
  CONTROL "&Ejecutar", IDOK, "Button", BS_FLAT|WS_TABSTOP, 188, 120, 80, 11
  CONTROL "Ingrese Disponible (desde)  ", 4029, "Static", NOT WS_VISIBLE|WS_GROUP, 4, 140, 188, 8
  CONTROL "", 4016, "msctls_progress32", NOT WS_VISIBLE, 8, 156, 280, 5
  CONTROL "Ingrese Codigo Postal  ", 101, "Static", SS_CENTERIMAGE|WS_GROUP, 12, 20, 80, 11
  CONTROL "Seleccione Provincia  ", 107, "Static", SS_CENTERIMAGE|WS_GROUP, 12, 4, 80, 12
  CONTROL " Tipo Archivo de Salida ", 4004, "Static", WS_GROUP, 8, 44, 76, 8
  CONTROL " Nombre Archivo de Salida ", 4005, "Static", WS_GROUP, 8, 100, 96, 8
  CONTROL "DEBE SELECCIONAR UN CODIGO POSTAL", 4006, "Static", 0x00000000, 160, 20, 132, 20
}

DLPAGO DIALOGEX DISCARDABLE 6, 18, 300, 170
STYLE WS_CHILD|WS_VISIBLE
FONT 9, "Arial", 0, 0, 1
{
  CONTROL "", 4001, "ComboBox", WS_BORDER|CBS_DROPDOWNLIST|WS_VSCROLL|WS_TABSTOP, 84, 4, 204, 125
  CONTROL "Editbox", 4002, "Edit", ES_RIGHT|ES_NUMBER|ES_WANTRETURN|WS_BORDER|WS_TABSTOP, 84, 20, 58, 10
  CONTROL "DBase (.dbf)", 4012, "Button", BS_RADIOBUTTON|WS_GROUP|WS_TABSTOP, 92, 44, 64, 10
  CONTROL "Texto (.txt)", 4013, "Button", BS_RADIOBUTTON|WS_GROUP|WS_TABSTOP, 92, 60, 64, 10
  CONTROL "Excel (.xls)", 4014, "Button", BS_RADIOBUTTON|WS_GROUP|WS_TABSTOP, 92, 76, 64, 10
  CONTROL "Editbox", 4015, "Edit", WS_BORDER|WS_TABSTOP, 100, 100, 156, 10
  CONTROL "&Ejecutar", IDOK, "Button", BS_FLAT|WS_TABSTOP, 188, 120, 80, 11
  CONTROL "", 4003, "TBtnBmp", WS_TABSTOP, 144, 20, 10, 10
  CONTROL "Ingrese Disponible (desde)  ", 4029, "Static", NOT WS_VISIBLE|WS_GROUP, 4, 140, 188, 8
  CONTROL "", 4016, "msctls_progress32", NOT WS_VISIBLE, 8, 156, 280, 5
  CONTROL "Ingrese Nro. Sucursal", 101, "Static", SS_CENTERIMAGE|WS_GROUP, 12, 20, 80, 11
  CONTROL "Seleccione Banco  ", 107, "Static", SS_CENTERIMAGE|WS_GROUP, 12, 4, 64, 12
  CONTROL "", 4008, "TBtnBmp", 0x00000000, 256, 100, 10, 10
  CONTROL " Tipo Archivo de Salida ", 4004, "Static", WS_GROUP, 8, 44, 76, 8
  CONTROL " Nombre Archivo de Salida ", 4005, "Static", WS_GROUP, 8, 100, 92, 8
}

1 MANIFEST "Windowsxp.manifest64"

Abrazo

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Tue Jul 18, 2023 4:37 pm
by karinha
Elloco, ¿estos BITMAPS están todos en perfecto estado (no corruptos)? ¿Los revisó uno por uno con el BITMAP EDITOR IRFANVIEW.exe? - ¿Ninguno es del tamaño incorrecto?

Regards, saludos.

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Tue Jul 18, 2023 4:44 pm
by Antonio Linares
Estimado Miguel Angel,

Podrias proporcionar tu EXE ó una versión demo de él ?

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Tue Jul 18, 2023 5:49 pm
by cnavarro
Me ha sido imposible construir el ejemplo que has puesto en mega
No tiene Main, variables sin definir y las bases de datos
En cualquier caso, te doy un consejo: crea los dialogos y controles en el on init del dialog, prueba y nos vas contando como va
Code: Select all  Expand view


   DEFINE DIALOG oDlg RESOURCE "test"

   REDEFINE FOLDEREX oFld ID 110 OF oDlg ;
      DIALOGS "dlg1", "dlg2" PROMPTS "One", "Two"

   ACTIVATE DIALOG oDlg CENTERED ;
      ON INIT AddDialog( oFld )
 

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Tue Jul 18, 2023 6:19 pm
by El Loco
Antonio Linares wrote:Estimado Miguel Angel,

Podrias proporcionar tu EXE ó una versión demo de él ?

Antonio hoy cuando vuelva a casa veo como proporcionar un demo, ya que que las bases son enormes y para que funcione tienen que estar. Veo como achicarlas un poco.
Abrazo

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Tue Jul 18, 2023 6:21 pm
by El Loco
cnavarro wrote:Me ha sido imposible construir el ejemplo que has puesto en mega
No tiene Main, variables sin definir y las bases de datos
En cualquier caso, te doy un consejo: crea los dialogos y controles en el on init del dialog, prueba y nos vas contando como va
Code: Select all  Expand view


   DEFINE DIALOG oDlg RESOURCE "test"

   REDEFINE FOLDEREX oFld ID 110 OF oDlg ;
      DIALOGS "dlg1", "dlg2" PROMPTS "One", "Two"

   ACTIVATE DIALOG oDlg CENTERED ;
      ON INIT AddDialog( oFld )
 

Hola Cristobal , en mega tambien proporcione el exe
Abrazo

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Tue Jul 18, 2023 7:55 pm
by JoseAlvarez
No has probado poniendo un BRUSH al dialogo?

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Wed Jul 19, 2023 3:26 pm
by El Loco
Antonio Linares wrote:Estimado Miguel Angel,

Podrias proporcionar tu EXE ó una versión demo de él ?


Antonio mil disculpas pero ayer llegué a casa 23.30hs y no lo puede hacer.
En el link te envío una copia funcional con la bases , además te envío los prg, .rc
y mi configuración de Fivewin.
Espero que te sirva
Abrazo
https://mega.nz/file/5WwTRSDR#nsncwHE8R ... PipGwEmSEs

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Wed Jul 19, 2023 4:45 pm
by Antonio Linares
Parece estar todo bien:

Que versión de Windows usas ? Probado en Windows 11

Image

Re: Desaparecen controles en Folder - Ayuda por favor

PostPosted: Wed Jul 19, 2023 6:11 pm
by El Loco
Antonio esta probado en Windows 7 y 10.
Y compilado tanto en windows 7 y en el 10
Abrazo