Desaparecen controles en Folder - SOLUCIONADO

Re: Desaparecen controles en Folder - Ayuda por favor

Postby El Loco » Sat Jul 15, 2023 6:37 pm

Ya lo hice Karinha, es mas, es parte del ejemplo que me recomendo Antonio
FWH 32/64 14.04
Harbour 3.2.0 (r1306211258)
PellesC
El Loco
 
Posts: 328
Joined: Fri May 19, 2006 4:08 pm
Location: Buenos Aires - Argentina

Re: Desaparecen controles en Folder - Ayuda por favor

Postby El Loco » Sat Jul 15, 2023 6:43 pm

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
FWH 32/64 14.04
Harbour 3.2.0 (r1306211258)
PellesC
El Loco
 
Posts: 328
Joined: Fri May 19, 2006 4:08 pm
Location: Buenos Aires - Argentina

Re: Desaparecen controles en Folder - Ayuda por favor

Postby JESUS MARIN » Tue Jul 18, 2023 5:53 am

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
Jesús Marín
JESUS MARIN
 
Posts: 176
Joined: Wed Jan 02, 2019 8:36 am

Re: Desaparecen controles en Folder - Ayuda por favor

Postby karinha » Tue Jul 18, 2023 2:51 pm

Jesús, no creo. El más probable sea el PELLESC.exe No me gusta de ninguna forma este editor de recursos.

Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7822
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: Desaparecen controles en Folder - Ayuda por favor

Postby JoseAlvarez » Tue Jul 18, 2023 3:28 pm

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
"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.
User avatar
JoseAlvarez
 
Posts: 795
Joined: Sun Nov 09, 2014 5:01 pm

Re: Desaparecen controles en Folder - Ayuda por favor

Postby El Loco » Tue Jul 18, 2023 4:29 pm

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
FWH 32/64 14.04
Harbour 3.2.0 (r1306211258)
PellesC
El Loco
 
Posts: 328
Joined: Fri May 19, 2006 4:08 pm
Location: Buenos Aires - Argentina

Re: Desaparecen controles en Folder - Ayuda por favor

Postby karinha » Tue Jul 18, 2023 4:37 pm

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.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7822
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: Desaparecen controles en Folder - Ayuda por favor

Postby Antonio Linares » Tue Jul 18, 2023 4:44 pm

Estimado Miguel Angel,

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

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42099
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Desaparecen controles en Folder - Ayuda por favor

Postby cnavarro » Tue Jul 18, 2023 5:49 pm

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 )
 
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
User avatar
cnavarro
 
Posts: 6542
Joined: Wed Feb 15, 2012 8:25 pm
Location: España

Re: Desaparecen controles en Folder - Ayuda por favor

Postby El Loco » Tue Jul 18, 2023 6:19 pm

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
FWH 32/64 14.04
Harbour 3.2.0 (r1306211258)
PellesC
El Loco
 
Posts: 328
Joined: Fri May 19, 2006 4:08 pm
Location: Buenos Aires - Argentina

Re: Desaparecen controles en Folder - Ayuda por favor

Postby El Loco » Tue Jul 18, 2023 6:21 pm

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
FWH 32/64 14.04
Harbour 3.2.0 (r1306211258)
PellesC
El Loco
 
Posts: 328
Joined: Fri May 19, 2006 4:08 pm
Location: Buenos Aires - Argentina

Re: Desaparecen controles en Folder - Ayuda por favor

Postby JoseAlvarez » Tue Jul 18, 2023 7:55 pm

No has probado poniendo un BRUSH al dialogo?
"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.
User avatar
JoseAlvarez
 
Posts: 795
Joined: Sun Nov 09, 2014 5:01 pm

Re: Desaparecen controles en Folder - Ayuda por favor

Postby El Loco » Wed Jul 19, 2023 3:26 pm

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
FWH 32/64 14.04
Harbour 3.2.0 (r1306211258)
PellesC
El Loco
 
Posts: 328
Joined: Fri May 19, 2006 4:08 pm
Location: Buenos Aires - Argentina

Re: Desaparecen controles en Folder - Ayuda por favor

Postby Antonio Linares » Wed Jul 19, 2023 4:45 pm

Parece estar todo bien:

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

Image
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42099
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Desaparecen controles en Folder - Ayuda por favor

Postby El Loco » Wed Jul 19, 2023 6:11 pm

Antonio esta probado en Windows 7 y 10.
Y compilado tanto en windows 7 y en el 10
Abrazo
FWH 32/64 14.04
Harbour 3.2.0 (r1306211258)
PellesC
El Loco
 
Posts: 328
Joined: Fri May 19, 2006 4:08 pm
Location: Buenos Aires - Argentina

PreviousNext

Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 57 guests