Pregunta xHarbour TONE()

[Bingen Ugaldebere]

Es una tonterí­a pero estoy pasando fuentes que tenia en FW y de repente
me doy cuenta de que usaba algunas veces el comando TONE(4000,1) u otros
tonos y no oigo nada de nada.
En 16 bits si lo oigo así­ que no esta mal el altavoz, pero con Xailer +
xHarbour nada de nada.
Alguna idea, salu2 y gracias a todos.

[jose.luis]

Bingen,
No estoy muy seguro de lo que te voy a decir pero creo que la implementación
de xharbour de la función Tone() no acaba de ir bien. No obstante, no me
hagas mucho caso.
Saludos,
José Luis Capel
"Bingen Ugaldebere" <bingen@muninser.com> escribió en el mensaje
news:[email=44cf9d59@news.xailer.com...]44cf9d59@news.xailer.com...[/email]
> Es una tontería pero estoy pasando fuentes que tenia en FW y de repente
> me doy cuenta de que usaba algunas veces el comando TONE(4000,1) u otros
> tonos y no oigo nada de nada.
>
> En 16 bits si lo oigo así que no esta mal el altavoz, pero con Xailer +
> xHarbour nada de nada.
>
> Alguna idea, salu2 y gracias a todos.

[jfgimenez]

Bingen,
> Es una tontería pero estoy pasando fuentes que tenia en FW y de repente me
> doy cuenta de que usaba algunas veces el comando TONE(4000,1) u otros
> tonos y no oigo nada de nada.
>
> En 16 bits si lo oigo así que no esta mal el altavoz, pero con Xailer +
> xHarbour nada de nada.
Por ahora pon en tu programa algo así:
PROCEDURE Tone()
MsgBeep()
RETURN
Más adelante veremos este tema. Por lo que yo sé, se ha creado una nueva
librería (GTGUI) que soporta la función Tone() al tiempo que se puede usar
en modo GUI en windows, como es el caso.
--
Un saludo,
José F. Giménez
http://www.xailer.com

[Bingen Ugaldebere]

MsgBeep() si que va pero Tone misteriosamente no, aunque esta en la
ayuda de xHarbour, pero MsgBeep() ya no permite hacer tonos diferentes,
que le vamos a hacer, que le suene lo mismo al cliente si lo hace bien o
mal.
Gracias.

[jfgimenez]

Bingen,
> MsgBeep() si que va pero Tone misteriosamente no, aunque esta en la ayuda
> de xHarbour,
Sí, lo sé. El problema es que Tone() es dependiente de la plataforma, y por
lo tanto está en las librerías GT. Y precísamente por sus características,
Xailer enlaza la librería GTNUL, donde esta función está vacía. Si
hubieramos usado GTWIN, Tone() funcionaría, pero había otros problemas.
Por eso te decía que lo vamos a revisar, ya que han añadido una nueva
librería GTGUI que sí contiene esa función, y al mismo tiempo se supone que
no debe dar problemas con los GUIs como Xailer.
> pero MsgBeep() ya no permite hacer tonos diferentes, que le vamos a hacer,
> que le suene lo mismo al cliente si lo hace bien o mal.
Es sólo provisional. Mi consejo es que sigas usando Tone(), y añadiendo la
función que te dije puedes seguir programando hasta que actualicemos
xHarbour, que seguramente será dentro de muy poco. Después, sólo tienes que
eliminar esa función y listo.
--
Un saludo,
José F. Giménez
http://www.xailer.com

[Bingen Ugaldebere]

Gracias, no hay problema, solo era una curiosidad. Lo dejo como está y
listo.