FiveTech Software tech support forums

www.FiveTechSoft.com
https://forums.fivetechsupport.com/

Pérdida de botón inferior de vscroll

https://forums.fivetechsupport.com/viewtopic.php?f=6&t=27520

Page 2 of 3

Re: Pérdida de botón inferior de vscroll

PostPosted: Mon Oct 28, 2013 6:00 pm
by Francisco Horta
Horacio,

No he podido dar en como ocultar la barra horizontal,, :(
saludos
paco

Re: Pérdida de botón inferior de vscroll

PostPosted: Mon Oct 28, 2013 7:01 pm
by MarioG
Ratifico, lo inicialmente expuesto por Horacio.
En W7, inicialmente el botón inferior no se visualiza, la pasar el puntero del mouse por la zona aparece; aunque al hacerle clic, no hace nada.
Si la aplicación se ejecuta en XP el botón funciona como corresponde

Uso FWH 12.04

Re: Pérdida de botón inferior de vscroll

PostPosted: Mon Oct 28, 2013 7:06 pm
by Antonio Linares
Aqui funciona bien asi:

horacio.prg
Code: Select all  Expand view
#include "FiveWin.ch"

function Main()

   local oDlg, oBrw, aData := { "one", "two", "three" }

   DEFINE DIALOG oDlg RESOURCE 1001

   REDEFINE XBROWSE oBrw ID 4001 ARRAY aData OF oDlg

   ACTIVATE DIALOG oDlg CENTERED
   
return nil


horacio.rc
Code: Select all  Expand view
#include <windows.h>

1001 DIALOGEX DISCARDABLE 6, 18, 314, 174
STYLE DS_SHELLFONT|WS_POPUP|DS_MODALFRAME|DS_CONTEXTHELP|DS_3DLOOK|WS_CAPTION|WS_SYSMENU|WS_VISIBLE
CAPTION "Dialog"
FONT 8, "Tahoma", 0, 0
{
  CONTROL "OK", IDOK, "Button", WS_TABSTOP, 264, 8, 45, 15
  CONTROL "Cancel", IDCANCEL, "Button", WS_TABSTOP, 264, 28, 45, 15
  CONTROL "Custom control", 4001, "TXBrowse", WS_VSCROLL, 8, 8, 248, 156
}


La flecha inferior del browse se ve al situar el raton encima de la barra de scroll.

Re: Pérdida de botón inferior de vscroll

PostPosted: Mon Oct 28, 2013 7:13 pm
by MarioG
Uso WorkShop, mi .rc este el siguiente:
Code: Select all  Expand view
brw_Capturas DIALOG 263, 100, 224, 248
STYLE DS_MODALFRAME | 0x4L | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | WS_THICKFRAME
FONT 8, "MS Sans Serif"
{
 CONTROL "TBitMap", 205, "TBitMap", WS_CHILD | WS_VISIBLE, 11, 222, 25, 25
 CTEXT "Text", 10, 36, 226, 176, 12
 CONTROL "", 300, "TxBrowse", 0 | WS_CHILD | WS_VSCROLL | WS_TABSTOP, 2, 2, 219, 218
}
No se corrige quitando WS_VISIBLE

Re: Pérdida de botón inferior de vscroll

PostPosted: Tue Oct 29, 2013 3:26 pm
by Patricio Avalos Aguirre
Estimados

No me habia dado cuenta, pero con la version 13.02 pasa igual el problema
con la clase TSBROWSE, no funciona el botton de la flecha hacia abajo, pero si uno presiona el boton derecho del mouse y le da
la opcion de desplazar hacia abajo funciona

el boton hacia arriba - teclas y rueda del mouse funciona correctamente
boton hacia abajo no fiunciona se queda sin hacer nada

Re: Pérdida de botón inferior de vscroll

PostPosted: Tue Oct 29, 2013 3:44 pm
by Patricio Avalos Aguirre
Revisando, el problema se produce con el style del dialogo

si se coloca el style 0x50B00000 //barra vertical y horizontal funciona normal

si se coloca el style 0x50A00000 //barra vertical solamente falla

Re: Pérdida de botón inferior de vscroll

PostPosted: Tue Oct 29, 2013 6:49 pm
by Antonio Linares
Patricio,

Puedes mostrar el RC completo del diálogo ? gracias

Re: Pérdida de botón inferior de vscroll

PostPosted: Tue Oct 29, 2013 10:20 pm
by Francisco Horta
Mario,

El boton vertical inferior no se ve, al pasr el raton por encima aparece, pero si das click no recorre hacia abajo, no funciona
saludos
paco

Re: Pérdida de botón inferior de vscroll

PostPosted: Wed Oct 30, 2013 9:30 am
by Patricio Avalos Aguirre
Hola Antonio

adjunto lo solicitado

// RESOURCE SCRIPT generated by "Pelles C for Windows, version 7.00".

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

LANGUAGE LANG_SPANISH,SUBLANG_SPANISH_CHILE

SALIDAS DIALOG FIXED IMPURE 0, 0, 515, 297
STYLE WS_POPUP|DS_MODALFRAME|WS_CAPTION|WS_SYSMENU
CAPTION "Salidas de productos Facturas"
FONT 8, "MS Sans Serif"
{
CONTROL "Datos documento", 301, "Button", BS_GROUPBOX, 4, 4, 508, 84
CONTROL "Total documento", 302, "Button", BS_GROUPBOX, 224, 236, 285, 56
CONTROL "", 21, "ComboBox", WS_BORDER|CBS_DROPDOWNLIST|WS_TABSTOP, 8, 16, 60, 12
CONTROL "Nº", 501, "Static", SS_CENTERIMAGE|WS_GROUP, 72, 16, 11, 12
CONTROL "", 22, "Edit", WS_BORDER|WS_TABSTOP, 84, 16, 44, 12
CONTROL "Bod.", 522, "Static", SS_CENTERIMAGE|WS_GROUP, 132, 16, 20, 12
CONTROL "", 48, "ComboBox", WS_BORDER|CBS_DROPDOWNLIST|WS_VSCROLL|WS_TABSTOP, 152, 16, 79, 68
CONTROL "Cotiza", 502, "Static", SS_RIGHT|SS_CENTERIMAGE|WS_GROUP, 232, 16, 24, 12
CONTROL "", 45, "Edit", WS_BORDER|WS_TABSTOP, 260, 16, 42, 12
CONTROL "Cliente", 503, "Static", SS_RIGHT|SS_CENTERIMAGE|WS_GROUP, 304, 16, 26, 12
CONTROL "", 23, "Edit", WS_BORDER|WS_TABSTOP, 332, 16, 59, 12
CONTROL "", 24, "Edit", WS_BORDER|WS_TABSTOP, 396, 16, 108, 12
CONTROL "Fec.Emi", 504, "Static", SS_RIGHT|SS_CENTERIMAGE|WS_GROUP, 16, 36, 36, 12
CONTROL "", 25, "Edit", WS_VSCROLL|WS_BORDER|WS_TABSTOP, 60, 36, 58, 12
CONTROL "Condición", 505, "Static", SS_RIGHT|SS_CENTERIMAGE|WS_GROUP, 132, 36, 37, 12
CONTROL "", 27, "ComboBox", WS_BORDER|CBS_DROPDOWNLIST|WS_TABSTOP, 176, 36, 80, 49
CONTROL "Fec.vto.", 506, "Static", SS_RIGHT|SS_CENTERIMAGE|WS_GROUP, 264, 36, 33, 12
CONTROL "", 26, "Edit", WS_VSCROLL|WS_BORDER|WS_TABSTOP, 304, 36, 58, 12
CONTROL "O.Compra", 507, "Static", SS_RIGHT|SS_CENTERIMAGE|WS_GROUP, 372, 36, 37, 12
CONTROL "", 28, "Edit", WS_BORDER|WS_TABSTOP, 416, 36, 88, 12
CONTROL "Vendedor", 508, "Static", SS_CENTERIMAGE|WS_GROUP, 16, 56, 35, 12
CONTROL "", 29, "Edit", WS_BORDER|WS_TABSTOP, 52, 56, 34, 12
CONTROL "", 30, "Edit", WS_BORDER|WS_TABSTOP, 88, 56, 80, 12
CONTROL "Depto", 509, "Static", SS_CENTERIMAGE|WS_GROUP, 172, 56, 24, 12
CONTROL "", 31, "Edit", WS_BORDER|WS_TABSTOP, 196, 56, 64, 12
CONTROL "Retirado por", 510, "Static", SS_CENTERIMAGE|WS_GROUP, 264, 56, 44, 12
CONTROL "", 32, "Edit", WS_BORDER|WS_TABSTOP, 308, 56, 196, 12
CONTROL "Observación ", 511, "Static", SS_CENTERIMAGE|WS_GROUP, 16, 72, 47, 12
CONTROL "", 46, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 68, 72, 352, 12
CONTROL "Crédito", 512, "Static", SS_CENTERIMAGE|WS_GROUP, 428, 72, 29, 12
CONTROL "", 47, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 460, 72, 44, 12
CONTROL "Código", 513, "Static", SS_CENTER|WS_GROUP, 32, 92, 30, 8
CONTROL "Descripción", 514, "Static", SS_CENTER|WS_GROUP, 88, 92, 172, 8
CONTROL "Cant.", 515, "Static", SS_CENTER|WS_GROUP, 272, 92, 25, 8
CONTROL "P.Unitario", 516, "Static", SS_CENTER|WS_GROUP, 308, 92, 37, 8
CONTROL "% Desc.", 517, "Static", SS_CENTER|WS_GROUP, 352, 92, 30, 8
CONTROL "P.Unitario", 518, "Static", SS_CENTER|WS_GROUP, 392, 92, 40, 8
CONTROL "", 33, "Edit", WS_BORDER|WS_TABSTOP, 4, 104, 77, 11
CONTROL "", 34, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 88, 104, 176, 11
CONTROL "", 35, "Edit", WS_BORDER|WS_TABSTOP, 272, 104, 30, 11
CONTROL "", 36, "Edit", WS_BORDER|WS_TABSTOP, 308, 104, 40, 11
CONTROL "", 37, "Edit", WS_VSCROLL|WS_BORDER|WS_TABSTOP, 352, 104, 35, 11
CONTROL "", 38, "Edit", WS_BORDER|WS_TABSTOP, 392, 104, 48, 11
CONTROL "&Agregar", 220, "Button", WS_TABSTOP, 452, 92, 53, 20
CONTROL "", 103, "TSBrowse", 0x00a00000, 4, 120, 504, 112
CONTROL "A N U L A D A ", 200, "Static", SS_CENTER|SS_CENTERIMAGE, 142, 264, 74, 12
CONTROL "&Limpiar", 221, "Button", WS_TABSTOP, 4, 246, 59, 20
CONTROL "&Grabar", 222, "Button", WS_TABSTOP, 4, 274, 59, 20
CONTROL "&Salir", 223, "Button", WS_TABSTOP, 72, 274, 59, 20
CONTROL "Total General:", 519, "Static", WS_GROUP, 252, 244, 28, 16
CONTROL "", 39, "Edit", WS_BORDER|WS_TABSTOP, 284, 244, 42, 12
CONTROL "Total Neto:", 520, "Static", WS_GROUP, 332, 248, 39, 8
CONTROL "", 41, "Edit", WS_BORDER|WS_TABSTOP, 372, 244, 44, 12
CONTROL "tot iva", 202, "Static", WS_GROUP, 420, 248, 34, 9
CONTROL "", 43, "Edit", WS_BORDER|WS_TABSTOP, 460, 244, 44, 12
CONTROL "Text", 100, "Static", WS_GROUP, 228, 264, 100, 8
CONTROL "", 40, "Edit", WS_VSCROLL|WS_BORDER|WS_TABSTOP, 284, 264, 28, 12
CONTROL "ajuste", 203, "Static", SS_RIGHT|SS_CENTERIMAGE|WS_GROUP, 332, 260, 36, 12
CONTROL "", 42, "Edit", WS_BORDER|WS_TABSTOP, 372, 260, 32, 12
CONTROL "T O T A L:", 521, "Static", SS_CENTERIMAGE|WS_GROUP, 420, 260, 35, 12
CONTROL "", 44, "Edit", WS_BORDER|WS_TABSTOP, 460, 260, 44, 12
CONTROL "Text", 102, "Static", SS_CENTERIMAGE|WS_GROUP, 228, 276, 275, 8
CONTROL "% Desc.:", 201, "Static", WS_GROUP, 248, 264, 30, 8
CONTROL "&Actualizar", 224, "Button", WS_TABSTOP, 72, 246, 59, 20
CONTROL "Text", 104, "Static", SS_CENTERIMAGE|WS_GROUP, 4, 234, 217, 8
}


cambiando a

CONTROL "", 103, "TSBrowse", 0x50B00000, 4, 120, 504, 112
cambiando a este style funciona

styles posibles
0x50000000 //-> desta forma ele fica por default com as barras Hor/Vert Ativas, ai sim, basta vc inserir no seu codigo :
0x50D00000 //-> Barra Horizontal
0x50A00000 //-> Barra Vertical
0x50B00000 //-> Barra Horizontal e Vertical

0x50010000 // sin barra


Image

Uploaded with ImageShack.us

Re: Pérdida de botón inferior de vscroll

PostPosted: Wed Oct 30, 2013 1:51 pm
by Blessed
Antonio
Enlace un proyecto en XP, corre sin problemas.
Al copiar ese mismo ejecutable a una PC con Windows 8. ya no funciona el boton de abajo del scrollbar.

Saludos

Re: Pérdida de botón inferior de vscroll

PostPosted: Wed Oct 30, 2013 3:21 pm
by MarioG
Francisco: efectivamente, es lo que ocurre
Blessed: digamos que para W7 y superiores, se presenta el problema

Re: Pérdida de botón inferior de vscroll

PostPosted: Wed Oct 30, 2013 5:54 pm
by Antonio Linares
Oscar,

Pero es lo que hemos comentado aqui ? Que la barra de scroll muestra el botón de abajo al pasar el ratón por encima de él ?

En el ejemplo que je proporcionado, occure eso, y una vez mostrado, funciona bien.

Re: Pérdida de botón inferior de vscroll

PostPosted: Wed Oct 30, 2013 10:11 pm
by Francisco Horta
Mario,

efectivamente el boton scroll con el style 0x50B10000 no funciona, con el style 0x50A10000 si funciona, desde windows 7
saludos
paco

Re: Pérdida de botón inferior de vscroll

PostPosted: Sat Nov 02, 2013 10:05 pm
by MarioG
Paco;
supongo que quisiste decir lo contrario :wink:
Francisco Horta wrote:Mario,
efectivamente el boton scroll con el style 0x50B10000 no funciona, con el style 0x50A10000 si funciona, desde windows 7
paco

Uso WS. En el recurso pongo: 0 | WS_CHILD | WS_VISIBLE | 0x50B00000 | WS_TABSTOP
Y en el código:
Code: Select all  Expand view
  WITH OBJECT ::oLstLoc
      ...
      :lHScroll  := FALSE
   END
 
Entonces, funciona Ok (en W7)

Re: Pérdida de botón inferior de vscroll

PostPosted: Tue Nov 05, 2013 3:10 pm
by Francisco Horta
Mario,

Fe de erratas, tiene razón es a la inversa...
Pero confirmando tengo en el recurso 0x50B10000 y funciona, pero le agreo a mi codigo oBrw:lHScroll := .F. y la barra horizontal no se esconde, en lo personal me interesa que no se vea y funcione la vertical correctamente, pero no doy como hacerlo, estoy con win7.
Saludos
Paco
All times are UTC
Page 2 of 3
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/