Refresco del Mouse

[Xevi]

En un Browse... si nos ponemos en el Header en separación de columnas, el
mouse cambia de aspecto al de redimensionar o cambiar tamaño de columnas.
Bien, si NO clicamos para no cambiar de tamaño las columnas, y nos
desplazamos por el Header, SI vuelve el aspecto del mouse al aspecto
anterior, PERO si nos desplazamos con el mouse cuando el aspecto es el de
redimensionar columnas, para el interior del Browse, VERTICALMENTE,
siguiendo la línea de separación de columnas, el aspecto por mas que nos
movamos dentro del área del Browse ya NO VUELVE a su aspecto normal.
Un Saludo,
Xevi.

[ignacio]

Xevi,
No consigo reproducirlo. Nos puedes mandar un ejemplo. Gracias.
Un saludo,
"Xevi" <xevicomas@terra.es> escribió en el mensaje
news:438c0c5b$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> En un Browse... si nos ponemos en el Header en separación de columnas, el
> mouse cambia de aspecto al de redimensionar o cambiar tamaño de columnas.
> Bien, si NO clicamos para no cambiar de tamaño las columnas, y nos
> desplazamos por el Header, SI vuelve el aspecto del mouse al aspecto
> anterior, PERO si nos desplazamos con el mouse cuando el aspecto es el de
> redimensionar columnas, para el interior del Browse, VERTICALMENTE,
> siguiendo la línea de separación de columnas, el aspecto por mas que nos
> movamos dentro del área del Browse ya NO VUELVE a su aspecto normal.
>
> Un Saludo,
> Xevi.
>
>

[Xevi]

Estoy en ello...
En un proyecto NUEVO no ocurre el efecto que describo...
Ahora bien, te puedo asegurar que en mi aplicación... ocurre en TODOS los
Browses.
He añadido un nuevo Form a mi proyecto, con solo un ArrayBrowse de 100
elementos y obtengo ese "detalle".
Este mismo Form lo pongo en un Proyecto nuevo y ya no ocurre ese efecto.
Te podría enviar la aplicación, el exe, para que vieras que efectivamente
ocurre, ahora bien, seguiré investigando la causa, intentaré sacarle Libs y
formularios... a ver que sale.
¿Sabrías alguna causa ajena a un proyecto nuevo, que pudiera ocasionar ese
efecto???
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
news:438c16a3$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Xevi,
>
> No consigo reproducirlo. Nos puedes mandar un ejemplo. Gracias.
>
> Un saludo,
>
> "Xevi" <xevicomas@terra.es> escribió en el mensaje
> news:438c0c5b$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>> En un Browse... si nos ponemos en el Header en separación de columnas, el
>> mouse cambia de aspecto al de redimensionar o cambiar tamaño de columnas.
>> Bien, si NO clicamos para no cambiar de tamaño las columnas, y nos
>> desplazamos por el Header, SI vuelve el aspecto del mouse al aspecto
>> anterior, PERO si nos desplazamos con el mouse cuando el aspecto es el de
>> redimensionar columnas, para el interior del Browse, VERTICALMENTE,
>> siguiendo la línea de separación de columnas, el aspecto por mas que nos
>> movamos dentro del área del Browse ya NO VUELVE a su aspecto normal.
>>
>> Un Saludo,
>> Xevi.
>>
>>
>
>
>

[ignacio]

Xevi,
Sólo se me ocurre que el Browse propiamente pierda su objeto oCursor.
Comprueba que no esté a NIL por favor.
Un saludo,
"Xevi" <xevicomas@terra.es> escribió en el mensaje
news:438c22b5$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Estoy en ello...
>
> En un proyecto NUEVO no ocurre el efecto que describo...
> Ahora bien, te puedo asegurar que en mi aplicación... ocurre en TODOS los
> Browses.
>
> He añadido un nuevo Form a mi proyecto, con solo un ArrayBrowse de 100
> elementos y obtengo ese "detalle".
> Este mismo Form lo pongo en un Proyecto nuevo y ya no ocurre ese efecto.
>
> Te podría enviar la aplicación, el exe, para que vieras que efectivamente
> ocurre, ahora bien, seguiré investigando la causa, intentaré sacarle Libs
> y formularios... a ver que sale.
>
> ¿Sabrías alguna causa ajena a un proyecto nuevo, que pudiera ocasionar ese
> efecto???
>
> Un Saludo,
> Xevi.
>
>
> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
> news:438c16a3$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>> Xevi,
>>
>> No consigo reproducirlo. Nos puedes mandar un ejemplo. Gracias.
>>
>> Un saludo,
>>
>> "Xevi" <xevicomas@terra.es> escribió en el mensaje
>> news:438c0c5b$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>>
>>> En un Browse... si nos ponemos en el Header en separación de columnas,
>>> el mouse cambia de aspecto al de redimensionar o cambiar tamaño de
>>> columnas.
>>> Bien, si NO clicamos para no cambiar de tamaño las columnas, y nos
>>> desplazamos por el Header, SI vuelve el aspecto del mouse al aspecto
>>> anterior, PERO si nos desplazamos con el mouse cuando el aspecto es el
>>> de redimensionar columnas, para el interior del Browse, VERTICALMENTE,
>>> siguiendo la línea de separación de columnas, el aspecto por mas que nos
>>> movamos dentro del área del Browse ya NO VUELVE a su aspecto normal.
>>>
>>> Un Saludo,
>>> Xevi.
>>>
>>>
>>
>>
>>
>
>
>

[Xevi]

Ignacio,
En el Form añadido, le he puesto como propiedad oCursor IDC_ARROW
Pero sigue haciendo lo mismo...
Ya intentaré "sacar" Formularios y libs... y veremos por donde sale !!!
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
news:438c2673$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Xevi,
>
> Sólo se me ocurre que el Browse propiamente pierda su objeto oCursor.
> Comprueba que no esté a NIL por favor.
>
> Un saludo,
>
> "Xevi" <xevicomas@terra.es> escribió en el mensaje
> news:438c22b5$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>> Estoy en ello...
>>
>> En un proyecto NUEVO no ocurre el efecto que describo...
>> Ahora bien, te puedo asegurar que en mi aplicación... ocurre en TODOS los
>> Browses.
>>
>> He añadido un nuevo Form a mi proyecto, con solo un ArrayBrowse de 100
>> elementos y obtengo ese "detalle".
>> Este mismo Form lo pongo en un Proyecto nuevo y ya no ocurre ese efecto.
>>
>> Te podría enviar la aplicación, el exe, para que vieras que efectivamente
>> ocurre, ahora bien, seguiré investigando la causa, intentaré sacarle Libs
>> y formularios... a ver que sale.
>>
>> ¿Sabrías alguna causa ajena a un proyecto nuevo, que pudiera ocasionar
>> ese efecto???
>>
>> Un Saludo,
>> Xevi.
>>
>>
>> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
>> news:438c16a3$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>>
>>> Xevi,
>>>
>>> No consigo reproducirlo. Nos puedes mandar un ejemplo. Gracias.
>>>
>>> Un saludo,
>>>
>>> "Xevi" <xevicomas@terra.es> escribió en el mensaje
>>> news:438c0c5b$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>>>
>>>> En un Browse... si nos ponemos en el Header en separación de columnas,
>>>> el mouse cambia de aspecto al de redimensionar o cambiar tamaño de
>>>> columnas.
>>>> Bien, si NO clicamos para no cambiar de tamaño las columnas, y nos
>>>> desplazamos por el Header, SI vuelve el aspecto del mouse al aspecto
>>>> anterior, PERO si nos desplazamos con el mouse cuando el aspecto es el
>>>> de redimensionar columnas, para el interior del Browse, VERTICALMENTE,
>>>> siguiendo la línea de separación de columnas, el aspecto por mas que
>>>> nos movamos dentro del área del Browse ya NO VUELVE a su aspecto
>>>> normal.
>>>>
>>>> Un Saludo,
>>>> Xevi.
>>>>
>>>>
>>>
>>>
>>>
>>
>>
>>
>
>
>

[Xevi]

METHOD ArrayBrowse1MouseMove( oSender, nKeyFlags, nPosX, nPosY ) CLASS TForm1
LogDebug( oSender:oCursor:cName )
RETURN Nil
SIEMPRE Devuelve 32512
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje news:438c2673$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Xevi,
>
> Sólo se me ocurre que el Browse propiamente pierda su objeto oCursor.
> Comprueba que no esté a NIL por favor.
>
> Un saludo,
>
> "Xevi" <xevicomas@terra.es> escribió en el mensaje
> news:438c22b5$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>> Estoy en ello...
>>
>> En un proyecto NUEVO no ocurre el efecto que describo...
>> Ahora bien, te puedo asegurar que en mi aplicación... ocurre en TODOS los
>> Browses.
>>
>> He añadido un nuevo Form a mi proyecto, con solo un ArrayBrowse de 100
>> elementos y obtengo ese "detalle".
>> Este mismo Form lo pongo en un Proyecto nuevo y ya no ocurre ese efecto.
>>
>> Te podrí­a enviar la aplicación, el exe, para que vieras que efectivamente
>> ocurre, ahora bien, seguiré investigando la causa, intentaré sacarle Libs
>> y formularios... a ver que sale.
>>
>> ¿Sabrí­as alguna causa ajena a un proyecto nuevo, que pudiera ocasionar ese
>> efecto???
>>
>> Un Saludo,
>> Xevi.
>>
>>
>> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
>> news:438c16a3$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>>
>>> Xevi,
>>>
>>> No consigo reproducirlo. Nos puedes mandar un ejemplo. Gracias.
>>>
>>> Un saludo,
>>>
>>> "Xevi" <xevicomas@terra.es> escribió en el mensaje
>>> news:438c0c5b$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>>>
>>>> En un Browse... si nos ponemos en el Header en separación de columnas,
>>>> el mouse cambia de aspecto al de redimensionar o cambiar tamaño de
>>>> columnas.
>>>> Bien, si NO clicamos para no cambiar de tamaño las columnas, y nos
>>>> desplazamos por el Header, SI vuelve el aspecto del mouse al aspecto
>>>> anterior, PERO si nos desplazamos con el mouse cuando el aspecto es el
>>>> de redimensionar columnas, para el interior del Browse, VERTICALMENTE,
>>>> siguiendo la lí­nea de separación de columnas, el aspecto por mas que nos
>>>> movamos dentro del área del Browse ya NO VUELVE a su aspecto normal.
>>>>
>>>> Un Saludo,
>>>> Xevi.
>>>>
>>>>
>>>
>>>
>>>
>>
>>
>>
>
>
>
--

[Xevi]

Ignacio,
El causante de este efecto es rtl.lib
La añadí­ por casualidad, para probar Tone(), y voalí !!!
Por cierto, no consigo reproducir el Tone()...¿?
¿No funciona igualmente que en Clipper???? Tone( 850, 8 ) por ej.
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje news:438c16a3$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Xevi,
>
> No consigo reproducirlo. Nos puedes mandar un ejemplo. Gracias.
>
> Un saludo,
>
> "Xevi" <xevicomas@terra.es> escribió en el mensaje
> news:438c0c5b$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>> En un Browse... si nos ponemos en el Header en separación de columnas, el
>> mouse cambia de aspecto al de redimensionar o cambiar tamaño de columnas.
>> Bien, si NO clicamos para no cambiar de tamaño las columnas, y nos
>> desplazamos por el Header, SI vuelve el aspecto del mouse al aspecto
>> anterior, PERO si nos desplazamos con el mouse cuando el aspecto es el de
>> redimensionar columnas, para el interior del Browse, VERTICALMENTE,
>> siguiendo la lí­nea de separación de columnas, el aspecto por mas que nos
>> movamos dentro del área del Browse ya NO VUELVE a su aspecto normal.
>>
>> Un Saludo,
>> Xevi.
>>
>>
>
>
>
--

[ignacio]

Xevi,
Ese era el problema entonces, pues seguro que rtl.lib tiene una función SetCursor().
No obstante no tiene sentido que incluyas esa librerí­a ya que la incluye el propio IDE, pero logicamente después de las librerí­as de Xailer.
Has de tener en cuenta que cualquier librerí­a que indiques en un proyecto se enlaza antes que ninguna otra librerí­a y por lo tanto sus funciones tienen preferencia incluso a las del propio Xailer.
En definitiva, no hace falta incluir RTL.LIB, ya lo hace el propio IDE.
Si TONE() no funciona igual que en Clipper es un problema de xHarbour. Te recomiendo que utilices la función MsgBeep() de Xailer. En otro mensaje del foro he puesto un link a las ayudas de funciones.
Un saludo,
"Xevi" <xevicomas@terra.es> escribió en el mensaje news:438c2b54$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Ignacio,
El causante de este efecto es rtl.lib
La añadí­ por casualidad, para probar Tone(), y voalí !!!
Por cierto, no consigo reproducir el Tone()...¿?
¿No funciona igualmente que en Clipper???? Tone( 850, 8 ) por ej.
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje news:438c16a3$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Xevi,
>
> No consigo reproducirlo. Nos puedes mandar un ejemplo. Gracias.
>
> Un saludo,
>
> "Xevi" <xevicomas@terra.es> escribió en el mensaje
> news:438c0c5b$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>> En un Browse... si nos ponemos en el Header en separación de columnas, el
>> mouse cambia de aspecto al de redimensionar o cambiar tamaño de columnas.
>> Bien, si NO clicamos para no cambiar de tamaño las columnas, y nos
>> desplazamos por el Header, SI vuelve el aspecto del mouse al aspecto
>> anterior, PERO si nos desplazamos con el mouse cuando el aspecto es el de
>> redimensionar columnas, para el interior del Browse, VERTICALMENTE,
>> siguiendo la lí­nea de separación de columnas, el aspecto por mas que nos
>> movamos dentro del área del Browse ya NO VUELVE a su aspecto normal.
>>
>> Un Saludo,
>> Xevi.
>>
>>
>
>
>
--

[Xevi]

Ignacio,
Serí­a bueno/útil, saber que librerí­as de xHarbour están ya incluidas al compilar desde el IDE de Xailer.
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje news:438c2fdd$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Xevi,
Ese era el problema entonces, pues seguro que rtl.lib tiene una función SetCursor().
No obstante no tiene sentido que incluyas esa librerí­a ya que la incluye el propio IDE, pero logicamente después de las librerí­as de Xailer.
Has de tener en cuenta que cualquier librerí­a que indiques en un proyecto se enlaza antes que ninguna otra librerí­a y por lo tanto sus funciones tienen preferencia incluso a las del propio Xailer.
En definitiva, no hace falta incluir RTL.LIB, ya lo hace el propio IDE.
Si TONE() no funciona igual que en Clipper es un problema de xHarbour. Te recomiendo que utilices la función MsgBeep() de Xailer. En otro mensaje del foro he puesto un link a las ayudas de funciones.
Un saludo,
"Xevi" <xevicomas@terra.es> escribió en el mensaje news:438c2b54$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Ignacio,
El causante de este efecto es rtl.lib
La añadí­ por casualidad, para probar Tone(), y voalí !!!
Por cierto, no consigo reproducir el Tone()...¿?
¿No funciona igualmente que en Clipper???? Tone( 850, 8 ) por ej.
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje news:438c16a3$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Xevi,
>
> No consigo reproducirlo. Nos puedes mandar un ejemplo. Gracias.
>
> Un saludo,
>
> "Xevi" <xevicomas@terra.es> escribió en el mensaje
> news:438c0c5b$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>> En un Browse... si nos ponemos en el Header en separación de columnas, el
>> mouse cambia de aspecto al de redimensionar o cambiar tamaño de columnas.
>> Bien, si NO clicamos para no cambiar de tamaño las columnas, y nos
>> desplazamos por el Header, SI vuelve el aspecto del mouse al aspecto
>> anterior, PERO si nos desplazamos con el mouse cuando el aspecto es el de
>> redimensionar columnas, para el interior del Browse, VERTICALMENTE,
>> siguiendo la lí­nea de separación de columnas, el aspecto por mas que nos
>> movamos dentro del área del Browse ya NO VUELVE a su aspecto normal.
>>
>> Un Saludo,
>> Xevi.
>>
>>
>
>
>
--

[jfgimenez]

Xevi,
Serí­a bueno/útil, saber que librerí­as de xHarbour están ya incluidas al compilar desde el IDE de Xailer.
Actualmente se están incluyendo estas librerí­as, y en este orden:
de Xailer:
xailer.lib
de xHarbour:
rtl.lib
vm.lib
gtnul.lib
lang.lib
macro.lib
rdd.lib
dbfntx.lib
dbfcdx.lib
dbfdbt.lib
dbfdbt.lib
dbffpt.lib
codepage.lib // Se ha añadido despues de la PR6
common.lib
pp.lib
de BCC:
psdkodbc32.lib
cw32.lib
import32.lib
wininet.lib
y como te ha comentado Ignacio, si tú añades alguna librerí­a al proyecto, se enlazará por delante de todas estas.
--
Un saludo,
José F. Giménez
--

[jfgimenez]

Xevi,
Por cierto, no consigo reproducir el Tone()...¿?
¿No funciona igualmente que en Clipper???? Tone( 850, 8 ) por ej.
No la he mirado, pero es muy posible que Tone() sólo funcione en modo consola, y no en aplicaciones GUI. Utiliza MsgBeep()
--
Un saludo,
José F. Giménez
--

[Xevi]

Jose,
Gracias. Me lo anoto bien anotado.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje news:438c35b8$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Xevi,
Serí­a bueno/útil, saber que librerí­as de xHarbour están ya incluidas al compilar desde el IDE de Xailer.
Actualmente se están incluyendo estas librerí­as, y en este orden:
de Xailer:
xailer.lib
de xHarbour:
rtl.lib
vm.lib
gtnul.lib
lang.lib
macro.lib
rdd.lib
dbfntx.lib
dbfcdx.lib
dbfdbt.lib
dbfdbt.lib
dbffpt.lib
codepage.lib // Se ha añadido despues de la PR6
common.lib
pp.lib
de BCC:
psdkodbc32.lib
cw32.lib
import32.lib
wininet.lib
y como te ha comentado Ignacio, si tú añades alguna librerí­a al proyecto, se enlazará por delante de todas estas.
--
Un saludo,
José F. Giménez
--

[jlalin]

Xevi,
si necesitas hacer sonar algún tipo de aviso puedes buscar archivos WAV
en la Red o usar los WAV que incluye windowsmedia y windowssystem con
estas funciones.
//---
#pragma BEGINDUMP
#include <windows.h>
#include <xailer.h>
XA_FUNC( PLAYSOUNDASYNC )
{
char * szSound = hb_parc( 1 );
BOOL bLoop = ISLOG( 2 ) ? hb_parl( 2 ) : FALSE;
if( szSound )
hb_retl( PlaySound( szSound, NULL, SND_ASYNC | SND_FILENAME |
SND_NODEFAULT | ( bLoop ? SND_LOOP : 0 ) ) );
}
XA_FUNC( PLAYSOUNDSYNC )
{
char * szSound = hb_parc( 1 );
if( szSound )
hb_retl( PlaySound( szSound, NULL, SND_SYNC | SND_FILENAME |
SND_NODEFAULT ) );
}
XA_FUNC( STOPSOUNDS )
{
PlaySound( NULL, NULL, SND_PURGE );
}
#pragma ENDDUMP
//---
Para usarlas:
PlaySoundAsync( GetSystemDirectory() + "click.wav" )
PlaySoundSync( GetSystemDirectory() + "click.wav" )
La primera suena en modo así­ncrono y la segunda "detiene" la ejecución
del programa hasta que termina de sonar.
Las escribí­ hace tiempo para el Tetris y están perfectamente probadas,
así­ que puedes usarlas cuando quieras.
Saludos,
José Lalí­n