Ventana(window) avanzada

Ventana(window) avanzada

Postby karinha » Fri Oct 25, 2019 1:36 pm

¿Es posible crear una ventana así en fivewin?

https://i.imgur.com/kwTqJ6g.png

Image

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

Re: Ventana(window) avanzada

Postby cnavarro » Fri Oct 25, 2019 10:46 pm

Joao, por supuesto
Sin que sea exactamente eso, pero deberias ver esto
http://wiki.fivetechsoft.com/doku.php?id=windui14_guide
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: 6549
Joined: Wed Feb 15, 2012 8:25 pm
Location: España

Re: Ventana(window) avanzada

Postby nageswaragunupudi » Sat Oct 26, 2019 6:14 am

¿Es posible crear una ventana así en fivewin?


Everything and anything is possible with Fivewin.
Certain things may take time and effort.
If it is worth spending that time and effort, yes, it can be done.
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10682
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Ventana(window) avanzada

Postby Antonio Linares » Sat Oct 26, 2019 2:26 pm

regards, saludos

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

Re: Ventana(window) avanzada

Postby leandro » Sat Oct 26, 2019 3:49 pm

Aprovechando el desorden y queriendo de alguna manera lograr ese diseño dentro de un xbrowse, monte lo siguiente:

Code: Select all  Expand view  RUN

#include 'fivewin.ch'
#include 'xbrowse.ch'

function Main()

   local oDlg, oBrw, oFont

   USE CUSTOMER ALIAS CUST

   DEFINE FONT oFont NAME 'Calibri' SIZE 0, -14 BOLD

   DEFINE DIALOG oDlg SIZE 640,440 PIXEL ;
      FONT oFont TITLE 'XBrowse Gradient Rows'

   @ 10, 10 XBROWSE oBrw OF oDlg SIZE 300, 200 PIXEL ;
      AUTOCOLS ALIAS 'CUST'

   oBrw:CreateFromCode()
   oBrw:nMarqueeStyle           = MARQSTYLE_HIGHLROW
   oBrw:nRowDividerStyle        = LINESTYLE_LIGHTGRAY
   oBrw:bClrStd                 = {|| {nRGB(169,181,184),nRGB(19,22,59)} }
   oBrw:bClrSelFocus            = {|| { CLR_WHITE,nRGB(44,94,205) } }
   oBrw:nSizePen                = 2
   oBrw:nColorPen               = CLR_RED

   ACTIVATE DIALOG oDlg CENTERED

   RELEASE FONT oFont

return nil
 


El resultado es el siguiente:
Image

Pero hay varias cosas a las que no se como cambiarle los colores:
Las lineas de división de las columnas y los registros.
El fondo del indicador de selección de registro así como las lineas de división
Las lineas de división de la cabecera.

En el foro encontré una respuesta sobre como cambiar el color de las lineas de división de los datos, pero no funciona.
Code: Select all  Expand view  RUN

 oBrw:nColorPen                 = CLR_RED
 
Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Embarcadero C++ 7.60 for Win32 ] [ FiveWin 23.07 ] [ xHarbour 1.3.0 Intl. (SimpLex) (Build 20230914) ]
User avatar
leandro
 
Posts: 1682
Joined: Wed Oct 26, 2005 2:49 pm
Location: Colombia

Re: Ventana(window) avanzada

Postby FranciscoA » Sat Oct 26, 2019 8:23 pm

http://www.subirimagenes.com/imagen-sin ... 13766.html

Falta algunas cositas como : lineas divisoras, barras de deslizamiento.
Saludos.
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh-MySql-TMySql
User avatar
FranciscoA
 
Posts: 2159
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 53 guests