Search found 199 matches

by JESUS MARIN
Tue May 05, 2026 11:55 am
Forum: FiveWin para Harbour/xHarbour
Topic: Enviar Texto a otra ventana
Replies: 12
Views: 1514

Re: Enviar Texto a otra ventana


FUNCTION New4(oApp,oWndPrincipal)

LOCAL oWnd
LOCAL oBar, oFont, oFont2

LOCAL oGet1, cVar1:=SPACE(100)
LOCAL oDlg, oSay, cSay:="texto"


DEFINE WINDOW MDICHILDFOLDER oWnd OF oWndPrincipal TITLE "Text -> Win"
DEFINE FONT oFont NAME "Segoe UI Light" SIZE 0,-16
DEFINE FONT oFont2 NAME "Segoe UI ...
by JESUS MARIN
Fri Dec 12, 2025 11:18 am
Forum: FiveWin para Harbour/xHarbour
Topic: ¿Cómo crear un Diálogo haciendo clic fuera del mismo para que se cierre?
Replies: 10
Views: 1465

Re: ¿Cómo crear un Diálogo haciendo clic fuera del mismo para que se cierre?

Normal. Solo oCal:bLDblClick NO FUNCIONA.

Si, si funciona.
Ver el mensaje sobre uso de tCalendar
https://fivetechsupport.com/forums/view ... hp?t=46192
Saludos

by JESUS MARIN
Fri Dec 12, 2025 11:17 am
Forum: FiveWin para Harbour/xHarbour
Topic: Usando la Clase Calendar
Replies: 9
Views: 1313

Re: Usando la Clase Calendar

Buenas Jose
Nos puedes contar si has solucionado lo que necesitabas y si has podido modificar el comportamiento (menu desplegable de los meses) de la clase tCalendar?

Gracias

by JESUS MARIN
Wed Dec 10, 2025 8:23 am
Forum: FiveWin para Harbour/xHarbour
Topic: Usando la Clase Calendar
Replies: 9
Views: 1313

Re: Usando la Clase Calendar

Buenos dias Jose.
He podido revisar lo que me has pedido. Lo publico aquí por si ayuda a mas personas.

1) Ya puedes cerrar el dialogo al pulsar fuera del propio diálogo. Con dialogo y no con ventanas, como pedias.

2) Para que solo te aparezca un mes, dimensiona el tamaño de oCal. El methodo ...
by JESUS MARIN
Tue Dec 09, 2025 7:19 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Usando la Clase Calendar
Replies: 9
Views: 1313

Re: Usando la Clase Calendar

Buenas tardes
Si lo pones en una ventana en vez de en un dialogo te sale solo uno.
Pruébalo y me cuentas.
Saludos

by JESUS MARIN
Fri Dec 05, 2025 6:26 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ¿Cómo crear un Diálogo haciendo clic fuera del mismo para que se cierre?
Replies: 10
Views: 1465

Re: ¿Cómo crear un Diálogo haciendo clic fuera del mismo para que se cierre?

Buenas de nuevo.
Prueba esto. A mi si me funciona.
Lo que desconozco es como funciona la clase tCalendar. Nunca la he utilizado.
#include "fivewin.ch"
#include "calendar.ch"


STATIC oDlg

function Main()

LOCAL oWnd

DEFINE WINDOW oWnd TITLE "ISOVER.PRG - Si hacemos click fuera del diálogo"

@2 ...
by JESUS MARIN
Fri Dec 05, 2025 9:46 am
Forum: FiveWin para Harbour/xHarbour
Topic: ¿Cómo crear un Diálogo haciendo clic fuera del mismo para que se cierre?
Replies: 10
Views: 1465

Re: ¿Cómo crear un Diálogo haciendo clic fuera del mismo para que se cierre?

Buenos dias

Prueba esto. No es perfecto, pero a lo mejor te puede inspirar una solución.
Saludos

#include "fivewin.ch"

function Main()

LOCAL oWnd

DEFINE WINDOW oWnd TITLE "ISOVER.PRG"

@2,2 BUTTON "Crear Diálogo" OF oWnd SIZE 150,40 ACTION MiDialogo()

ACTIVATE WINDOW oWnd MAXIMIZED

RETURN ...
by JESUS MARIN
Sun Oct 19, 2025 7:16 am
Forum: FiveWin para Harbour/xHarbour
Topic: Saber si ventana MDI esta abierta - ( SOLUCIONADO )
Replies: 16
Views: 13527

Re: Saber si ventana MDI esta abierta - ( SOLUCIONADO )

sysctrl2 wrote: Fri Oct 17, 2025 4:51 pm Interesante funcíon
Activa_MDI(cTitle,oWndP)

para una DEFINE WINDOW que no sea MDI
se puede?
gracias !!!
Buenos dias. Te lo respondo en este hilo
viewtopic.php?t=46041
Saludos
Jesús
by JESUS MARIN
Sun Oct 19, 2025 6:47 am
Forum: FiveWin para Harbour/xHarbour
Topic: Saber si una ventana no MDI, esta abierta.
Replies: 1
Views: 6729

Saber si una ventana no MDI, esta abierta.

Hola a todos.

para una DEFINE WINDOW que no sea MDI
se puede?
gracias !!!
Cesar Cortes Cruz
SysCtrl Software
Mexico

Bueno, primero que todo explicar que en Harbour + FiveWin, cuando trabajas con ventanas (TWindow, TDialog, TMDIChild, etc.), cada ventana es realmente un objeto (instancia de una ...
by JESUS MARIN
Sat Oct 18, 2025 8:15 am
Forum: FiveWin para Harbour/xHarbour
Topic: Saber si ventana MDI esta abierta - ( SOLUCIONADO )
Replies: 16
Views: 13527

Re: Saber si ventana MDI esta abierta - ( SOLUCIONADO )

Buenos dias
solo una cosa de la funcion Activa_MDI()

Cuando escribí esa versión no contemplaba tener varias ventanas abiertas con el mismo nombre. En MdiFolder puedes tener : Clientes, Clientes [2], Clientes [3], .... Clientes [n]
Por tanto la función, si buscas (por ejemplo "Clientes [3 ...
by JESUS MARIN
Wed Aug 06, 2025 6:06 am
Forum: FiveWin para Harbour/xHarbour
Topic: MdiChildFolder beta.1
Replies: 14
Views: 1853

Re: MdiChildFolder beta.1

Leandro.
Será porque esta incluido el .exe ?
Dime si te lo mando a tu correo
by JESUS MARIN
Tue Aug 05, 2025 10:36 am
Forum: FiveWin para Harbour/xHarbour
Topic: MdiChildFolder beta.1
Replies: 14
Views: 1853

Re: MdiChildFolder beta.1

EJEMPLO 5 - MENU CONTEXTUAL

Aunque podemos poner todas las opciones en una buttonBar, siempre estará disponible, pulsando el boton derecho en el fondo de la ventana y/o donde se quiera implementar, un menú contextual que tiene :

a ) Todas las ventanas abiertas, Marcando con un "check" la ventana ...
by JESUS MARIN
Tue Aug 05, 2025 10:16 am
Forum: FiveWin para Harbour/xHarbour
Topic: MdiChildFolder beta.1
Replies: 14
Views: 1853

Re: MdiChildFolder beta.1

Ejemplo 4

Movimiento de las pestañas/solapas/ventanas
https://i.ibb.co/3YF7dWpH/recorte1.jpg

¿qué ocurre si tenemos mas ventanas abiertas que espacio en nuestro barra superior?
https://i.ibb.co/x82MMd42/recorte2.jpg


Al igual que en los Folders se van ocultando.

Pero podemos moverlas a ...
by JESUS MARIN
Tue Aug 05, 2025 10:00 am
Forum: FiveWin para Harbour/xHarbour
Topic: MdiChildFolder beta.1
Replies: 14
Views: 1853

Re: MdiChildFolder beta.1

Ejemplo 3

Movimiento. Minimizar, Maximizar, Restaurar.... y cambiar tamaño.

El frame principal ( y todas sus ventanas hijas ), pueden moverse haciendo click sobre la barra superior, arrastrando a la nueva posición. Igual que cualquier ventana.

Con los botones Minimizar, Restaurar / Maximizar y ...