Ein herzliches Hallo in die Runde,

nach einem Unfall bin ich Rentner und Dragon erleichtert mir den alltäglichen Umgang mit dem Computer. Ich verwende die Version 11.0 in der Profi-Version.

In der Script-Sprache bin ich nicht ganz so fit, vielleicht weiß der eine oder andere von Ihnen Rat zu den beiden Fragen.


Frage 1:

Ich möchte ein Wort bzw. einen Satz diktieren, der dann automatisch in die Zwischenablage gelegt wird.

Vielleicht wäre es möglich, dass man ein Befehlswort (Start Zwischenablage) sagt und alles, was danach kommt, wird in die Zwischenablage gelegt, bis man ein weiteres Befehlswort (Stop Zwischenablage) sagt.

Bestimmt ist auch ein ganz anderer Ansatz möglich - ich fand leider bisher keine Lösung.

Frage 2:

Mit einem Script möchte ich ein Suchfenster öffnen.
Taste strg+F

Ich sage einen Begriff, der in das Suchfeld eingetragen wird und automatisch wird die Enter-Taste gedrückt.

Leider geht der Weg über Script mit einer Variablenliste nicht, da es zu viele unterschiedliche Suchbegriffe gibt.

Es müsste statt der Variablenliste ein Platzhalter sein.

Sagt man z.B.

"Befehl Suche Montag"

so sollte sich das Suchfenster öffnen, "Montag" eintragen und den Dialog mit Enter schließen.

Auch hier wäre ich sehr glücklich, wenn Sie mir bei der Umsetzung helfen können.

Alois Schaffner

Hallo Alois,

Zitat von Alois

---

Frage 1:

Ich möchte ein Wort bzw. einen Satz diktieren, der dann automatisch in die Zwischenablage gelegt wird.

Vielleicht wäre es möglich, dass man ein Befehlswort (Start Zwischenablage) sagt und alles, was danach kommt, wird in die Zwischenablage gelegt, bis man ein weiteres Befehlswort (Stop Zwischenablage) sagt.

Bestimmt ist auch ein ganz anderer Ansatz möglich - ich fand leider bisher keine Lösung.

---

Ich würde einen anderen Ansatz verfolgen. Diktiere zuerst den kompletten Satz. Dann markiere den entsprechenden Satz bzw. das entsprechende Wort. Hilfreich ist hier zum Beispiel markiere von Wort1 bis Wort2. Dann kannst Du ein Skript „Markierung in die Zwischenablage“ schreiben.

Zitat von Alois

---

Frage 2:

Mit einem Script möchte ich ein Suchfenster öffnen.
Taste strg+F

---

In welchem Programm möchtest Du dieses Suchfenster öffnen?
Könntest Du das Thema mit dem Suchfenster noch etwas detaillierter beschreiben?

Mit freundlichen Grüßen

Jörg

Ein herzliches Hallo in die Runde,

danke für den interessanten Ansatz zur Zwischenablage.

Zu meiner zweiten Frage. Ich würde das gerne in unterschiedlichen Programmen nutzen.

Die Grundidee funktioniert bereits in Notepad.

Der Ablauf ohne Dragon bei Notpad wäre folgender:

Fenster Notepad aktivieren
Taste strg+F
"Suchbegriff eintippen"
Button Weitersuchen
Button Abbrechen (um Dialog zu schließen)

Meine Kenntnisse bei Dragon reicht nur so weit, dass bei einer Skripterstellung mit Listen gearbeitet werden kann.

Beispiel:

Sub Main
MsgBox "Die Telefonnummer von " & Mid(ListVar1,InStr(ListVar1, "")+1,Len(ListVar1)-InStr(ListVar1, "")) & _
" lautet " & Left(ListVar1, InStr(ListVar1, "")-1),,"Telefonnummer anzeigen"
End Sub

Der Befehl funktioniert nur, weil eine Telefonliste hinterlegt ist. Letztendlich ist der Befehl eine Zusammensetzung zwischen dem Befehlswort und einem weiteren Wort, welches in der Liste hinterlegt ist.

Da man – um beim Beispiel zu bleiben – in Notpad nach sehr vielen Begriffen suchen kann, wäre eine Liste recht unpraktisch.

Daher die Überlegung, ob es eine Möglichkeit gibt, ein Skript zu schreiben, dass jedes Wort welches nach dem Befehlswort genannt wird, dem Skript so übergeben werden kann, dass das Skript dieses Wort in Notepad in den Suchen-Dialog eintragen kann.

Mit freundlichen Grüßen

Alois Schaffner

Zunächst einmal Gratulation zum Rentnerdasein. Ich habe bis dahin noch mindestens 10 Jahre zu kämpfen, und der Kampf wird immer härter. Aber nun zu den schönen Dingen des Lebens ...

Erst einmal würde ich den Tipp von Jörg noch ein wenig optimieren wollen. Man diktiert einfach die Äußerung, die in die Zwischenablage kopiert werden soll, und sagt dann: kopier das, und das war's.

Was die zweite Frage angeht, der Ideenansatz ist bekannt, aber leider nicht umsetzbar. In Dragon-Skripten kann man keine freien Variablen übergeben. Um das Vorhaben umzusetzen, sind mindestens zwei Schritte notwendig. Man muss wenigstens zunächst eine Eingabebox aufrufen, wo der gewünschte Suchbegriff eingegeben wird, und dann kann alles Weitere automatisiert werden. Ein Beispiel.

Suchbegriff$ = InputBox( "Wonach soll gesucht werden?" )
If Suchbegriff$  "" Then
SendKeys "^f"
Wait 0.5
SendKeys Suchbegriff$
SendKeys "{Enter}"
Else
MessageBox( "Keine Eingabe. Vorgang wird abgebrochen." )
End If
 

Bitte testen, das habe ich aus dem Kopf heraus geschrieben. Fragen/Antworten zur Syntax dann ggf. später.

Gruß, RW

PS: noch eine Frage, verwenden Sie tatsächlich 11.0, oder 11.5?

Hallo Rüdiger, Hallo Alois

Zitat von R.Wilke

---

Was die zweite Frage angeht, der Ideenansatz ist bekannt, aber leider nicht umsetzbar. In Dragon-Skripten kann man keine freien Variablen übergeben. Um das Vorhaben umzusetzen, sind mindestens zwei Schritte notwendig. Man muss wenigstens zunächst eine Eingabebox aufrufen, wo der gewünschte Suchbegriff eingegeben wird, und dann kann alles Weitere automatisiert werden. Ein Beispiel.

1
2
3
4
5
6
7
8
9
 

Suchbegriff$ = InputBox( "Wonach soll gesucht werden? )
If Suchbegriff$  "" Then
SendKeys "^f"
Wait 0.5
SendKeys Suchbegriff$
SendKeys "{Enter}"
Else
MessageBox( "Keine Eingabe. Vorgang wird abgebrochen." )
End If
 

---

Rüdiger, Du warst mal wieder schneller. Den Ansatz hatte ich auch schon im Kopf. Ich wollte aber erst den Ansatz mithilfe eines Makros abtesten.

Mit freundlichen Grüßen

Jörg

Ja, und unterm Strich erhält man den selben Effekt mit:

Drück Steuerung f
Text eingeben
Drück Enter

Mir ging es nur darum zu zeigen, wie man das machen kann. In komplexeren Skripten kann es sehr wohl von Nutzen sein.

Gruß, RW

Ein herzliches Hallo in die Runde,

"Zunächst einmal Gratulation zum Rentnerdasein. Ich habe bis dahin noch mindestens 10 Jahre zu kämpfen, und der Kampf wird immer härter."

Ich wünsche mir nichts sehnlicher, als wieder gesund zu sein und zu arbeiten.

Ich drücke Ihnen die Daumen, dass Sie Ihren Kampf gewinnen!

"PS: noch eine Frage, verwenden Sie tatsächlich 11.0, oder 11.5?"

Ja, derzeit verwende ich noch die Version 11.0. Das Update hat leider nicht funktioniert, so dass ich das erst einmal vertagt habe. Dem widme ich mich später.

Eine sehr interessante Anregung - die hier von der Befehlsfolge zeitlich keinen Vorteil bringt, aber in umfangreichen Skripten sehr hilfreich ist.

(Nachtrag: oh - wir haben uns hier inhaltlich überschnitten

Mit freundlichen Grüßen

Alois Schaffner

Zitat von Alois

---

Ja, derzeit verwende ich noch die Version 11.0. Das Update hat leider nicht funktioniert, so dass ich das erst einmal vertagt habe. Dem widme ich mich später.

---

Warum? - Sollen wir dabei helfen?

Gruß, RW

Ein herzliches Hallo in die Runde,

Herr Wilke, das ist sehr freundlich von Ihnen. Mein PC ist teilweise fast so betagt wie ich. Zum Glück kann ich diesen aufrüsten, Windows 8 neu installieren und dann wird es auch mit dem Update klappen.

Mit freundlichen Grüßen

Alois Schaffner