Gracias Omar ! Pense que tal vez podria haber algun control ya desarrollado. Muchas gracias, voy a encararlo por el lado casero como me sugerias.
Sebastian. De: [email protected] [mailto:[email protected]] En nombre de Omar Bellio Enviado el: jueves, 15 de junio de 2017 16:37 Para: GUFA List Member Asunto: [GUFA] scrollbars en simil-containers Sí claro, para que quede lindo hay que ponerle mucha onda, eso fue una fritata hecha así medio a lo guaso :) De: [email protected] [mailto:[email protected]] En nombre de Ricardo Aidelman Enviado el: jueves, 15 de junio de 2017 11:59 Para: GUFA List Member Asunto: [GUFA] scrollbars en simil-containers Excelente idea, Omar. Se podría jugar con Thisform.LockScreen para mejorar visualmente las transiciones, y propiedades que controlen el tope superior e inferior. Mis 2 centavos J ricardo aidelman De: [email protected] [mailto:[email protected]] En nombre de Omar Bellio Enviado el: jueves, 15 de junio de 2017 11:26 Para: GUFA List Member <[email protected]> Asunto: [GUFA] scrollbars en simil-containers Yo no conozco ningún componente armado, pero se podría armar uno (no lo probé, se me ocurre que tendría que andar) con un container que tenga 2 botones ARRIBA y ABAJO que se pueden hacer chiquitos con alguna flechita que manejen un código parecido a esto _screen.AddObject('ScrollCont', 'Container') With _screen.ScrollCont as Container .Top = 10 .Left = 10 .Width = 500 .Height = 200 .AddObject('Boton', 'cdoAbajo') .AddObject('Rotulo', 'Label') With .Rotulo as Label .Top = 180 .Caption = 'Sube sube' .Visible = .T. EndWith .Boton.Visible = .T. .Visible = .T. EndWith Read events _screen.RemoveObject('ScrollCont') Define Class cdoAbajo as CommandButton Left = 400 Top = 180 Procedure Click() For Each loControl in This.Parent.Controls If loControl # This loControl.Top = loControl.top - 5 EndIf EndFor This.Top = 180 This.Parent.Refresh() EndProc EndDefine Saludos! De: [email protected] [mailto:[email protected]] En nombre de Sebastian Massetti Enviado el: jueves, 15 de junio de 2017 08:36 Para: GUFA List Member Asunto: [GUFA] scrollbars en simil-containers Hola Gente ! Alguno sabe como puedo implementar un scrollbar vertical en algun objeto container o similar? Actualmente tengo un conteiner en un form , que contiene varios objetos y necesito agregar más objetos hacia abajo, lo cual me obliga a poner un scrollbar en el mismo. Alguien conoce algun otro componente similar al container que me lo permita ? Desde ya muchas gracias. Sebastián. <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campai gn=sig-email&utm_content=emailclient> Imagen quitada por el remitente. Virus-free. <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campai gn=sig-email&utm_content=emailclient> www.avast.com
