Beiträge von Ilse

Hallo Death,

dachte auch schon daran,
hatte auch das Beispiel gesehen, es aber leider nicht geschafft
daß wenn eine Taste gedrückt wird
die Stimme zu hören ist.

Ilse

Hallo name22,

Klasse Beispiel...
das muß ich mir nun in aller Ruhe ansehen.

Sage vorerst 1000 Dank

Liebe Grüße
Ilse

Hallo name22,

ich glaube ich hab's.

Eine Frage noch zu meinen Array-Freunden...
Hab ich das richtig verstanden,
ich muß jede Taste dem Array zuordnen? Die 105 Arrays ...

Spoiler anzeigen

Local $Taste[105][3] ;erster Index = Anzahl der Tasten
$Taste[0][0] = "1" ;Name der Taste ("e", "1", "Escape", "Return" etc.)
$Taste[0][1] = "31" ;_IsPressed ID
$Taste[0][1] = "31" ;_IsPressed ID
$Taste[0][2] = "32" ;_IsPressed ID
$Taste[0][3] = "33" ;_IsPressed ID
$Taste[0][4] = "34" ;_IsPressed ID
$Taste[0][5] = "35" ;_IsPressed ID
$Taste[0][6] = 2 ;Tastengruppe zu der die Taste gehört.

Hier mal mein Code:

[autoit]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <Misc.au3>
#include <array.au3>
#include <Misc.au3>

[/autoit][autoit][/autoit][autoit]

$dll = DllOpen("user32.dll")

[/autoit][autoit][/autoit][autoit]

Local $Taste[105][3] ;erster Index = Anzahl der Tasten
$Taste[0][0] = "1" ;Name der Taste ("e", "1", "Escape", "Return" etc.)
$Taste[0][1] = "31" ;_IsPressed ID
$Taste[0][2] = 2 ;Tastengruppe zu der die Taste gehört.

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

While 1
Sleep ( 250 )
For $i = 0 To 104
If _IsPressed($Taste[$i][1]) Then
MsgBox(4096,"","OK")
EndIf
Next

[/autoit][autoit][/autoit][autoit]

WEnd

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

DllClose($dll)

[/autoit]

Liebe Grüße
Ilse

Hallo name22,

bekomme leider direkt eine Fehlermeldung.
Meinst du irgendwie so?

[autoit]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <Misc.au3>
#include <array.au3>
#include <Misc.au3>

[/autoit][autoit][/autoit][autoit]

$dll = DllOpen("user32.dll")

[/autoit][autoit][/autoit][autoit]

$Taste[105][3] ;erster Index = Anzahl der Tasten
$Taste[0][0] = "1" ;Name der Taste ("e", "1", "Escape", "Return" etc.)
$Taste[0][1] = "31" ;_IsPressed ID
$Taste[0][2] = 2 ;Tastengruppe zu der die Taste gehört.

[/autoit][autoit][/autoit][autoit]

$Zahl[10][3] ;erster Index = Anzahl der Tasten
$Zahl[0][0] = "1" ;Name der Taste ("e", "1", "Escape", "Return" etc.)
$Zahl[0][1] = "38" ;_IsPressed ID
$Zahl[0][2] = 3 ;Tastengruppe zu der die Taste gehört.

[/autoit][autoit][/autoit][autoit]

For $i = 0 To 104
If _IsPressed($Taste[$i][1]) Then
MsgBox(0,"","OK")
ELSE
MsgBox(4096,"Nochmal...","Leider fasch")
EndIf
Next

[/autoit][autoit][/autoit][autoit]

DllClose($dll)

[/autoit]

uff..Kannst du vielleicht mal ein Beipiel machen?
Sagen wir, ich will daß er die Tasten F5 - F10 drückt.
Der _Ispressed Code wäre zwischen 74 bis 79
Wie die Arrays da aufgebaut werden weiß ich nicht!

Ilse

Hallo name22,

huh...ich kann zwar noch nicht so 100% folgen
aber ich habe mal versucht die Bereiche aufzubauen:

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <Misc.au3>
#include <array.au3>

[/autoit] [autoit][/autoit] [autoit]

Local $Bereich[5][2]

[/autoit] [autoit][/autoit] [autoit]

$Bereich[0][0] = "Standardtasten"
$Bereich[0][1] = "Taste A-Z und 1-10"
$Bereich[1][0] = "Funktionstasten"
$Bereich[1][1] = "F1-F12"
$Bereich[2][0] = "Navigationsbereich"
$Bereich[2][1] = "Pfeiltasten-POS..."
$Bereich[3][0] = "Nummernblock"
$Bereich[3][1] = "Rechner-Tastatur"
$Bereich[4][0] = "Andere"
$Bereich[4][1] = "Windows-Tasten TAB..."

[/autoit] [autoit][/autoit] [autoit]

For $i = 0 To UBound($Bereich) -1
For $k = 0 To UBound($Bereich,2) -1
$Test = ($Bereich[$i][$k] & @CRLF)

[/autoit] [autoit][/autoit] [autoit]

MsgBox(0,"",$Test)
Next
Next

[/autoit]

das mit den Zeitabständen (z.B. 30-50ms) mithilfe von 2 For Schleifen ...
und den ganzen Tasten??? _ispressed...das hab ich nicht verstanden.

Kannst du mir da vielleicht ein Beispiel machen?

Liebe Grüße
Ilse

Hallo,
merci, daß du dich meldest.
Daß man einfach die F5 Taste drücken kann ist schon klar, aber nicht Zweck der Sache.
Also, dieser Mann ist etwas älter, und hat mit der Tastatur erhebliche Probleme (zittert...)
Ich habe versprochen daß ich da vielleicht helfen kann.
Er würde so gerne, kann aber leider nicht...

Aber "Trainingsspiel" ist vielleicht doch eine nette Idee!!! Würde sich bestimmt freuen

Kannst du mir da etwas unter die Arme greifen? Vielleicht ein paar Ansätze, damit ich irgendwie ans Ziel komme?

Liebe Grüße
Ilse

Hallo,

ich habe ein Problem mit einer Tastatur-Abfrage.
(Anwender hat starke Sehprobleme) Es ist etwas schwierig
zu erlären. Weiß irgendwie nicht so richtig wie man da rangehen kann.
Ich versuch's mal:

Das Problem:

Spoiler anzeigen

Ziel: Anwender soll auf die F5 Taste drücken!

Anwender-Versuch: er drückt z.B. auf die Taste K, weil es es nicht sieht....
Meldung: z.B. FALSCH das ist der Tastaturbereich, bitte etwas höher...
Anwender-Versuch: er drückt z.B. auf die Taste F7
Meldung: z.B. FAST das sind die Funktionstasten, hier bist du richtig, bitte etwas nach links....

Kann man z.B. Bereiche eingrenzen?

Spoiler anzeigen

Drückt er im numerischen Block...
Msgbox...Falsch
Drückt er im Navigationsblock ...
Msgbox...OK

[autoit]

#include <Misc.au3>

[/autoit][autoit][/autoit][autoit]

$dll = DllOpen("user32.dll")

[/autoit][autoit][/autoit][autoit]

While 1
Sleep ( 250 )
IF _ISPRESSED("71", $DLL) THEN ;F9
MsgBox(0,"Prima","Das ist die richtige Taste")

[/autoit][autoit][/autoit][autoit]

SLEEP(10)
ELSEIF _ISPRESSED("72",$DLL) THEN ; hier bin ich nicht weiter gekommen <>...
MsgBox(0,"Nochmal...","Leider fasch"); hier habe ich probiert, komme aber nicht weiter...
EndIf

[/autoit][autoit][/autoit][autoit]

WEnd
DllClose($dll)

[/autoit]

Das Problem ist, ich möchte ihn mit Hilfe von Beep oder anderen Ereignissen
bis zum Ziel steuern.

Würde mich über eure Hilfe sehr freuen.

Liebe Grüße
Ilse

@alle

herzlichen Dank!

Ilse

Ich kämpfe gerade mit den send Befehlen...
Trotz Windows Hilfe...CHIP (nachträglich Glückwunsch zum Geburtstag...)

Wie kann ich Strg + alt + F aufrufen?

so geht's leider nicht:

[autoit]

;Send("{CTRLDOWN}{ALTDOWN}{F}{CTRLUP}{ALTUP}")

[/autoit][autoit][/autoit][autoit]

;so auch nicht

[/autoit][autoit][/autoit][autoit]

Send("+{ALT}{f}")

[/autoit][autoit][/autoit][autoit][/autoit]

Liebe Grüße
Ilse

...ok, hab's gefunden.
Dank Dir.

Heißt das dass Controlclick bei bestimmten Systemen nicht funktioniert?
Oder habe ich da was falsch gemacht?

Ilse

Guten Morgen Funkey,

freue mich daß du dich wieder gemeldet hast.
Einiges ist mir noch nicht klar:

1. Wie hast du die Sendbefehle herausgefunden?
2. MouseClick und ControlClick funktioniren nicht

...und, wie kann man das mit Hotkeys machen?

[autoit]

Global $Paused
HotKeySet("{ESC}", "lupe")

[/autoit][autoit][/autoit][autoit]

ShellExecute(@SystemDir & "\magnify.exe")
WinWait("Bildschirmlupe")
;~ Send("#{+}")
;~ Sleep(1000)
;~ Send("#{-}")

[/autoit][autoit][/autoit][autoit]

Func lupe()
While $Paused
sleep(100)
Send("#{+}")
WEnd

[/autoit][autoit][/autoit][autoit]

EndFunc

[/autoit]

Hallo,

ich habe Windows 7

Grüße
Ilse

Hallo,

habe ein Problem mit Controlclick!
1. Die Bildschirmlupe wird gestartet
2. Ich möchte das auf vergrößern geklickt wird

geht leider nicht!

Hier mein Code

[autoit]

$Lupe = "Bildschirmlupe"

[/autoit][autoit][/autoit][autoit]

ShellExecute("C:\Windows\System32\magnify.exe")
Sleep(1000)

[/autoit][autoit][/autoit][autoit]

;WinActivate($Lupe)

[/autoit][autoit][/autoit][autoit]

ControlClick ($Lupe, "", "[CLASS:DirectUIHWND; INSTANCE:1]" ,"left","", 43 , 16 )

[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit]

Hoffe Ihr habt eine Idee

Liebe Grüße
Ilse

...auch mit etwas Verspätung

Alles Liebe zum Geburtstag

und die besten Grüße

Ilse

@Alle

im Prinzip genau so wie oispnr
Nur mit Stringreplace müßte jedes Ergebnis
erneut bearbeitet werden. Und das wollte ich nur mit RegEx lösen.
Also im Prinzip kommen da mehrere Seiten hinzu (http...)
RegEx sollte soviel wie möglich ohne Handarbeit lösen.

Sage mal herzlichen Dank an alle Helfer

Liebe Grüße
Ilse

(Schliesse mal den Thread)
und probiere mit den Seiten

Liebe Grüße
Ilse

Hallo,

ne, die habe ich als Beispiel eingetragen.

Aber es klappt doch.(Man sollte nicht so schnell aufgeben)
Eine Array-Frage
Wie kann ich im Array alles schön untereinander anzeigen

[autoit]

#include <Array.au3>

[/autoit][autoit][/autoit][autoit]

$sString = _
"http://tiere.de" & @CRLF & _
"http://www.tierisch.net" & @CRLF & _
"http://www.hunde.at/Kategorie/Tiere.html" & @CRLF & _
"http://com.kaninchen123.de.net" & @CRLF & _
"http://de.futter.de.net" & @CRLF & _
"http://katzen123.de.net" & @CRLF

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

$aArray = StringRegExp($sString, '//\w{1,3}\.(.*?)\.|//(\w+)', 3)

[/autoit][autoit][/autoit][autoit]

_ArrayDisplay($aArray, 'Übersicht')

[/autoit]

Arrays waren noch nie meine Freunde

Ilse

Hallo,

ich hab da was,
halt mit meinem Problem zeige nicht //

[autoit]

#include <Array.au3>

[/autoit][autoit][/autoit][autoit]

$sString = _
"http://tiere.de" & @CRLF & _
"http://www.tierisch.net" & @CRLF & _
"http://www.hunde.at/Kategorie/Tiere.html" & @CRLF & _
"http://com.kaninchen123.de.net" & @CRLF & _
"http://de.futter.de.net" & @CRLF & _
"http://katzen123.de.net" & @CRLF

[/autoit][autoit][/autoit][autoit]

$aArray = StringRegExp($sString, '//\w{1,3}\.(.*?)\.|//\w+', 3); wie kann ich diese // ausblenden?????
_ArrayDisplay($aArray, 'Übersicht')

[/autoit]

Ilse

Hallo Xenobiologist,

bin noch am probieren.
Mein Code ist etwas kürzer

[autoit]

#include <Array.au3>

[/autoit][autoit][/autoit][autoit]

$sString = _
"http://tiere.de" & @CRLF & _
"http://www.tierisch.net" & @CRLF & _
"http://www.hunde.at/Kategorie/Tiere.html" & @CRLF & _
"http://com.katzen123.de.net" & @CRLF & _
"http://katzen123.de.net" & @CRLF

[/autoit][autoit][/autoit][autoit]

$aArray = StringRegExp($sString, '\.(\w+)\.', 3)
_ArrayDisplay($aArray, 'Übersicht')

[/autoit]

Das mit dem negitieren hab ich noch nicht kapiert.
Mal ne Idee

[autoit]

#include <Array.au3>

[/autoit][autoit][/autoit][autoit]

$sString = _
"http://tiere.de" & @CRLF & _
"http://www.tierisch.net" & @CRLF & _
"http://www.hunde.at/Kategorie/Tiere.html" & @CRLF & _
"http://com.katzen123.de.net" & @CRLF & _
"http://de.futter.de.net" & @CRLF & _
"http://katzen123.de.net" & @CRLF

[/autoit][autoit][/autoit][autoit]

$aArray = StringRegExp($sString, '//\w{1,3}\.(.*?)\.', 3); alle //www. oder //de. oder //com.
_ArrayDisplay($aArray, 'Übersicht')

[/autoit]

so könnte man doch den ersten Teil filtern
um im zweiten Teil irgendwie all die andern!

Ich meine so könnte man zuerst alle //www. oder //de. auswerten
und dann das Ergebnis umdrehen...wenn man wüßte wie's geht!

Liebe Grüße
Ilse

Hallo,

sorry, konnte mich gestern nicht mehr melden.

@ Bastelfritze
merci für deinen Beitrag.
Bei anderen Seiten stimmt das leider nicht mehr.
Die Endungen z.B. .com, .de sollten weg sein. Quasi nur der erste Teil!

Das war dein Code

Spoiler anzeigen

[autoit]

Dim $aArray[3]
Dim $ret
Dim $c

[/autoit] [autoit][/autoit] [autoit]

$aArray[0] = "http://tiere.de"
$aArray[1] = "http://www.tierisch.net/Kategorie/Futter/33242.html"; es gibt auche diese Seiten
$aArray[2] = "http://com.katzen123.com"
For $i=0 to 2
$ret = StringSplit($aArray[$i], '/.')
$c = UBound($ret)
;ConsoleWrite($aArray[$i] & "-->" & $ret[$c-2] & '.' & $ret[$c-1] & @CRLF)
Msgbox(0,"",$ret[$c-2] & '.' & $ret[$c-1] & @CRLF)
Next

[/autoit]

K4z,
konnte dein RegEx nicht benutzen. Keine Anzeige...

Folgendes:

Ich habe mal das Beispiel erweitert.
Es ist besser zum probieren:

[autoit]

#include <Array.au3>
$sString = _
"http://tiere.de" & @CRLF & _
"http://www.tierisch.net" & @CRLF & _
"http://www.hunde.at/Kategorie/Tiere.html" & @CRLF & _
"http://com.katzen123.de.net" & @CRLF

[/autoit][autoit][/autoit][autoit]

$aArray = StringRegExp($sString, 'http://(.*?)\.', 3); hier liegt das RegEx-Problem
_ArrayDisplay($aArray, 'Übersicht')

[/autoit]

So sollte das Ergebnis aussehen!

Spoiler anzeigen

"http://tiere.de" = tiere
"http://www.tierisch.net" = tierisch
"http://www.hunde.at/Kategorie/Tiere.html" = hunde
"http://com.katzen123.de.net" & @CRLF = Katzen123

Ich hoffe Ihr habt da eine Idee?
Liebe Grüße
Ilse

@ Xenobiologist
dein Beitrag ist im falschen Thread gelandet.
Aber trotzdem Danke...

Hallo,
brauch euch mal wieder!
Ich muß ein String filtern.
Ich probiere schon ne ganze Weile ohne Erfolg.

Das ist mein String:

Spoiler anzeigen

http://tiere.de
http://www.tierisch.net
http://com.katzen123.com

Das sollte das Ergebnis sein:

tiere
tierisch
Katzen123

Mit Stringbetween .xxx. komme ich da nicht weiter
Könnt ihr mir mit RegEx weiterhelfen?

Hier mal mein Grundgerüst

[autoit]

; das kommt in die Zwischenablage
;http://tiere.de
;http://www.tierisch.net
;http://com.katzen123.com

[/autoit][autoit][/autoit][autoit]

$sSource= ClipGet()

[/autoit][autoit][/autoit][autoit]

$aResult = StringRegExp($sSource,' ',3)
MsgBox(0,"",$aResult )

[/autoit][autoit][/autoit][autoit][/autoit]

Wie kann ich genau das herausfiltern?

;http://tiere.de
;http://www.tierisch.net
;http://com.katzen123.com

Liebe Grüße
Ilse