FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Consulta RoundBox en FOLDEREX *SOLUCIONADO
Posts: 719
Joined: Fri May 12, 2017 02:50 PM

Consulta RoundBox en FOLDEREX *SOLUCIONADO

Posted: Sat Aug 20, 2022 08:23 PM
Hola Amigos


Tengo un problema dentro en FOLDEREX, tengo 2 RoundBox, pero solo se muestra 1, no logro hacer funcionar ambos.

Siempre se muestra el ultimo.

Muchos Saludos

Antonio

Code (fw): Select all Collapse
         oFld:aDialogs[2]:bPainted := < |hDC|
      RoundBox( hDC, 600      ,086     ,598   ,  598     ,02,02,CLR_BLUE,2 )              // Para Poner la linea para dividir las 2 columnas
            **             Col-Ini  Alto     Ancho  Fil-Abajo
      Return nil
            >

     // Separa a Profesional que Atiende
         oFld:aDialogs[2]:bPainted := < |hDC|
      RoundBox( hDC, 843      ,27     ,1200   ,  90     ,02,02,CLR_BLUE,2 )              // Para Poner la linea para dividir las 2 columnas
            **             Col-Ini  Alto     Ancho  Fil-Abajo
      Return nil
      >
FWH 22.10 - HARBOUR - PELLES C
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM

Re: Consulta RoundBox en FOLDEREX

Posted: Sat Aug 20, 2022 11:01 PM
La segunda asignación al evento anula el primero evidentemente. Prueba así
Code (fw): Select all Collapse
         oFld:aDialogs[2]:bPainted := < |hDC|
      RoundBox( hDC, 600      ,086     ,598   ,  598     ,02,02,CLR_BLUE,2 )              // Para Poner la linea para dividir las 2 columnas
      RoundBox( hDC, 843      ,27     ,1200   ,  90     ,02,02,CLR_BLUE,2 )              // Para Poner la linea para dividir las 2 columnas
      Return nil
            >
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
Posts: 719
Joined: Fri May 12, 2017 02:50 PM

Re: Consulta RoundBox en FOLDEREX

Posted: Sat Aug 20, 2022 11:10 PM
cnavarro wrote:La segunda asignación al evento anula el primero evidentemente. Prueba así
Code (fw): Select all Collapse
         oFld:aDialogs[2]:bPainted := < |hDC|
      RoundBox( hDC, 600      ,086     ,598   ,  598     ,02,02,CLR_BLUE,2 )              // Para Poner la linea para dividir las 2 columnas
      RoundBox( hDC, 843      ,27     ,1200   ,  90     ,02,02,CLR_BLUE,2 )              // Para Poner la linea para dividir las 2 columnas
      Return nil
            >


Hola Cristobal.

Muchas gracias como siempre por tu ayuda y tiempo dedicado.

Funciono Perfecto.

Muchas gracias y muchos saludos.

Antonio
FWH 22.10 - HARBOUR - PELLES C

Continue the discussion