Bonjour,
J'utilise vb express 2008 (mais je sais que mon prg fonctionne aussi avec vb
express 2005 )
J' ai fait un tout petit prg qui me permet de lire tout ce qui est dans le
presse-papier.
Tout fonctionne bien, sauf que j' aimerais pouvoir arrêter une lecture en
cours et ne pas la reprendre, mais lire autre chose
qui aura été mis dans le presse-papier, par exemple à la place de
application.exit() dans Form1_DoubleClick
pour mieux me faire comprendre, voici mon code :
Public Class Form1
Dim Parle As New SpeechSynthesizer
Private Sub Form1_DoubleClick(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.DoubleClick
Parle.Dispose()
Application.Exit()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Parle.Volume = 100
End Sub
Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick
TextBox1.Text = ""
If My.Computer.Clipboard.ContainsText = True Then
TextBox1.Paste()
Parle.SpeakAsync(TextBox1.Text)
My.Computer.Clipboard.Clear()
Else
End If
End Sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Ferprod
"Ferprod" a écrit dans le message de news:%
Bonjour, J'utilise vb express 2008 (mais je sais que mon prg fonctionne aussi avec vb express 2005 ) J' ai fait un tout petit prg qui me permet de lire tout ce qui est dans le presse-papier. Tout fonctionne bien, sauf que j' aimerais pouvoir arrêter une lecture en cours et ne pas la reprendre, mais lire autre chose qui aura été mis dans le presse-papier, par exemple à la place de application.exit() dans Form1_DoubleClick pour mieux me faire comprendre, voici mon code :
Public Class Form1 Dim Parle As New SpeechSynthesizer
Private Sub Form1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.DoubleClick Parle.Dispose() Application.Exit() End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Parle.Volume = 100 End Sub
Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick TextBox1.Text = "" If My.Computer.Clipboard.ContainsText = True Then TextBox1.Paste() Parle.SpeakAsync(TextBox1.Text) My.Computer.Clipboard.Clear() Else End If End Sub
End Class
J' espère ne pas avoir été trop confus.
Merci.
Re Bonjour.
J' ai fini par trouver.
il suffit d' écrire SpeechSynthesizer.SpeakAsyncCancelAll() ou SpeechSynthesizer.SpeakAsyncCancel()
Ferprod.
"Ferprod" <f.eric@wanadoo.fr> a écrit dans le message de
news:%234c3jHAYIHA.2000@TK2MSFTNGP05.phx.gbl...
Bonjour,
J'utilise vb express 2008 (mais je sais que mon prg fonctionne aussi avec
vb express 2005 )
J' ai fait un tout petit prg qui me permet de lire tout ce qui est dans le
presse-papier.
Tout fonctionne bien, sauf que j' aimerais pouvoir arrêter une lecture en
cours et ne pas la reprendre, mais lire autre chose
qui aura été mis dans le presse-papier, par exemple à la place de
application.exit() dans Form1_DoubleClick
pour mieux me faire comprendre, voici mon code :
Public Class Form1
Dim Parle As New SpeechSynthesizer
Private Sub Form1_DoubleClick(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.DoubleClick
Parle.Dispose()
Application.Exit()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Parle.Volume = 100
End Sub
Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick
TextBox1.Text = ""
If My.Computer.Clipboard.ContainsText = True Then
TextBox1.Paste()
Parle.SpeakAsync(TextBox1.Text)
My.Computer.Clipboard.Clear()
Else
End If
End Sub
End Class
J' espère ne pas avoir été trop confus.
Merci.
Re Bonjour.
J' ai fini par trouver.
il suffit d' écrire SpeechSynthesizer.SpeakAsyncCancelAll() ou
SpeechSynthesizer.SpeakAsyncCancel()
Bonjour, J'utilise vb express 2008 (mais je sais que mon prg fonctionne aussi avec vb express 2005 ) J' ai fait un tout petit prg qui me permet de lire tout ce qui est dans le presse-papier. Tout fonctionne bien, sauf que j' aimerais pouvoir arrêter une lecture en cours et ne pas la reprendre, mais lire autre chose qui aura été mis dans le presse-papier, par exemple à la place de application.exit() dans Form1_DoubleClick pour mieux me faire comprendre, voici mon code :
Public Class Form1 Dim Parle As New SpeechSynthesizer
Private Sub Form1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.DoubleClick Parle.Dispose() Application.Exit() End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Parle.Volume = 100 End Sub
Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick TextBox1.Text = "" If My.Computer.Clipboard.ContainsText = True Then TextBox1.Paste() Parle.SpeakAsync(TextBox1.Text) My.Computer.Clipboard.Clear() Else End If End Sub
End Class
J' espère ne pas avoir été trop confus.
Merci.
Re Bonjour.
J' ai fini par trouver.
il suffit d' écrire SpeechSynthesizer.SpeakAsyncCancelAll() ou SpeechSynthesizer.SpeakAsyncCancel()
Ferprod.
Gilles TOURREAU [MVP]
"Ferprod" a écrit dans le message de news:%
Bonjour, J'utilise vb express 2008 (mais je sais que mon prg fonctionne aussi avec vb express 2005 ) J' ai fait un tout petit prg qui me permet de lire tout ce qui est dans le presse-papier. Tout fonctionne bien, sauf que j' aimerais pouvoir arrêter une lecture en cours et ne pas la reprendre, mais lire autre chose qui aura été mis dans le presse-papier, par exemple à la place de application.exit() dans Form1_DoubleClick pour mieux me faire comprendre, voici mon code :
Public Class Form1 Dim Parle As New SpeechSynthesizer
Private Sub Form1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.DoubleClick Parle.Dispose() Application.Exit() End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Parle.Volume = 100 End Sub
Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick TextBox1.Text = "" If My.Computer.Clipboard.ContainsText = True Then TextBox1.Paste() Parle.SpeakAsync(TextBox1.Text) My.Computer.Clipboard.Clear() Else End If End Sub
End Class
J' espère ne pas avoir été trop confus.
Merci.
Bonjour,
Si vous souhaitez interrompre tout simplement la synthèse vocales, appelez tout simplement la méthode SpeakAsyncCancelAll() dans votre cas.
Cordialement
-- Gilles TOURREAU - MVP C#
S.A.R.L. P.O.S Le spécialiste en motoculture depuis + de 30 ans ! http://www.pos.fr
"Ferprod" <f.eric@wanadoo.fr> a écrit dans le message de
news:%234c3jHAYIHA.2000@TK2MSFTNGP05.phx.gbl...
Bonjour,
J'utilise vb express 2008 (mais je sais que mon prg fonctionne aussi avec
vb express 2005 )
J' ai fait un tout petit prg qui me permet de lire tout ce qui est dans le
presse-papier.
Tout fonctionne bien, sauf que j' aimerais pouvoir arrêter une lecture en
cours et ne pas la reprendre, mais lire autre chose
qui aura été mis dans le presse-papier, par exemple à la place de
application.exit() dans Form1_DoubleClick
pour mieux me faire comprendre, voici mon code :
Public Class Form1
Dim Parle As New SpeechSynthesizer
Private Sub Form1_DoubleClick(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.DoubleClick
Parle.Dispose()
Application.Exit()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Parle.Volume = 100
End Sub
Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick
TextBox1.Text = ""
If My.Computer.Clipboard.ContainsText = True Then
TextBox1.Paste()
Parle.SpeakAsync(TextBox1.Text)
My.Computer.Clipboard.Clear()
Else
End If
End Sub
End Class
J' espère ne pas avoir été trop confus.
Merci.
Bonjour,
Si vous souhaitez interrompre tout simplement la synthèse vocales, appelez
tout simplement la méthode SpeakAsyncCancelAll() dans votre cas.
Bonjour, J'utilise vb express 2008 (mais je sais que mon prg fonctionne aussi avec vb express 2005 ) J' ai fait un tout petit prg qui me permet de lire tout ce qui est dans le presse-papier. Tout fonctionne bien, sauf que j' aimerais pouvoir arrêter une lecture en cours et ne pas la reprendre, mais lire autre chose qui aura été mis dans le presse-papier, par exemple à la place de application.exit() dans Form1_DoubleClick pour mieux me faire comprendre, voici mon code :
Public Class Form1 Dim Parle As New SpeechSynthesizer
Private Sub Form1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.DoubleClick Parle.Dispose() Application.Exit() End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Parle.Volume = 100 End Sub
Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick TextBox1.Text = "" If My.Computer.Clipboard.ContainsText = True Then TextBox1.Paste() Parle.SpeakAsync(TextBox1.Text) My.Computer.Clipboard.Clear() Else End If End Sub
End Class
J' espère ne pas avoir été trop confus.
Merci.
Bonjour,
Si vous souhaitez interrompre tout simplement la synthèse vocales, appelez tout simplement la méthode SpeakAsyncCancelAll() dans votre cas.
Cordialement
-- Gilles TOURREAU - MVP C#
S.A.R.L. P.O.S Le spécialiste en motoculture depuis + de 30 ans ! http://www.pos.fr
Ferprod
"Gilles TOURREAU [MVP]" a écrit dans le message de news:
"Ferprod" a écrit dans le message de news:%
Bonjour, J'utilise vb express 2008 (mais je sais que mon prg fonctionne aussi avec vb express 2005 ) J' ai fait un tout petit prg qui me permet de lire tout ce qui est dans le presse-papier. Tout fonctionne bien, sauf que j' aimerais pouvoir arrêter une lecture en cours et ne pas la reprendre, mais lire autre chose qui aura été mis dans le presse-papier, par exemple à la place de application.exit() dans Form1_DoubleClick pour mieux me faire comprendre, voici mon code :
Public Class Form1 Dim Parle As New SpeechSynthesizer
Private Sub Form1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.DoubleClick Parle.Dispose() Application.Exit() End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Parle.Volume = 100 End Sub
Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick TextBox1.Text = "" If My.Computer.Clipboard.ContainsText = True Then TextBox1.Paste() Parle.SpeakAsync(TextBox1.Text) My.Computer.Clipboard.Clear() Else End If End Sub
End Class
J' espère ne pas avoir été trop confus.
Merci.
Bonjour,
Si vous souhaitez interrompre tout simplement la synthèse vocales, appelez tout simplement la méthode SpeakAsyncCancelAll() dans votre cas.
Cordialement
-- Gilles TOURREAU - MVP C#
S.A.R.L. P.O.S Le spécialiste en motoculture depuis + de 30 ans ! http://www.pos.fr
Merci M. Tourreau.
Cela fonctionne maintenant parfaitement.
Ferprod.
"Gilles TOURREAU [MVP]" <gilles.tourreau@pos.fr> a écrit dans le message de
news:72E344B9-B625-418E-ABE6-62FB16DA70EF@microsoft.com...
"Ferprod" <f.eric@wanadoo.fr> a écrit dans le message de
news:%234c3jHAYIHA.2000@TK2MSFTNGP05.phx.gbl...
Bonjour,
J'utilise vb express 2008 (mais je sais que mon prg fonctionne aussi avec
vb express 2005 )
J' ai fait un tout petit prg qui me permet de lire tout ce qui est dans
le presse-papier.
Tout fonctionne bien, sauf que j' aimerais pouvoir arrêter une lecture en
cours et ne pas la reprendre, mais lire autre chose
qui aura été mis dans le presse-papier, par exemple à la place de
application.exit() dans Form1_DoubleClick
pour mieux me faire comprendre, voici mon code :
Public Class Form1
Dim Parle As New SpeechSynthesizer
Private Sub Form1_DoubleClick(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.DoubleClick
Parle.Dispose()
Application.Exit()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Parle.Volume = 100
End Sub
Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick
TextBox1.Text = ""
If My.Computer.Clipboard.ContainsText = True Then
TextBox1.Paste()
Parle.SpeakAsync(TextBox1.Text)
My.Computer.Clipboard.Clear()
Else
End If
End Sub
End Class
J' espère ne pas avoir été trop confus.
Merci.
Bonjour,
Si vous souhaitez interrompre tout simplement la synthèse vocales, appelez
tout simplement la méthode SpeakAsyncCancelAll() dans votre cas.
"Gilles TOURREAU [MVP]" a écrit dans le message de news:
"Ferprod" a écrit dans le message de news:%
Bonjour, J'utilise vb express 2008 (mais je sais que mon prg fonctionne aussi avec vb express 2005 ) J' ai fait un tout petit prg qui me permet de lire tout ce qui est dans le presse-papier. Tout fonctionne bien, sauf que j' aimerais pouvoir arrêter une lecture en cours et ne pas la reprendre, mais lire autre chose qui aura été mis dans le presse-papier, par exemple à la place de application.exit() dans Form1_DoubleClick pour mieux me faire comprendre, voici mon code :
Public Class Form1 Dim Parle As New SpeechSynthesizer
Private Sub Form1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.DoubleClick Parle.Dispose() Application.Exit() End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Parle.Volume = 100 End Sub
Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick TextBox1.Text = "" If My.Computer.Clipboard.ContainsText = True Then TextBox1.Paste() Parle.SpeakAsync(TextBox1.Text) My.Computer.Clipboard.Clear() Else End If End Sub
End Class
J' espère ne pas avoir été trop confus.
Merci.
Bonjour,
Si vous souhaitez interrompre tout simplement la synthèse vocales, appelez tout simplement la méthode SpeakAsyncCancelAll() dans votre cas.
Cordialement
-- Gilles TOURREAU - MVP C#
S.A.R.L. P.O.S Le spécialiste en motoculture depuis + de 30 ans ! http://www.pos.fr