XProfan

- Página 3 -

Penguin
Tux

Gracias para el Tipp.

OS: Win XP/Debian
XProfan 10

Frank
Abbing

Yo habe nun beobachtet, dass en beiden Feldern después de cada Tastendruck el Eingabegebietsschema geändert se.

Probier veces esta Code, como debería el no mehr passieren:
Kompilieren Marca Separación

Def ActivateKeyboardLayout(2)!"USER32","ActivateKeyboardLayout"
Def IsFocus(0)!"USER32","GetFocus"
Def &VK_FLAGSR 1 Tastenlayout Russisch
Def &VK_FLAGSD 0 Tastenlayout Deutsch
Declare edit1&,edit2&,text$,x&,y&
WINDOWSTYLE 31+512
Window 0,0-0,1024
Windowtitle "Deutsch - Russisch"
Window 0,0-%maxx,%maxy
UseIcon "Gesicht"
Usefont "Arial",20,0,0,0,0
SetDialogFont 1
edit1& = @Create("MultiEdit",%hWnd,"Russisch",10,10,1000,320)
edit2&=Create("MultiEdit", %hWnd, "Deutsch", 10, 370, 1000, 320)
x&=IsFocus()
y&=0

While 1

    WaitInput
    Case %key=2:Break
    Inc y&

    If x&<>IsFocus()

        x&=IsFocus()
        y&=0

    EndIf

    If ((%GetFocus=edit1&) and (y&=0))

        ActivateKeyboardLayout(0, &VK_FLAGSR)

    ElseIf ((%GetFocus=edit2&) and (y&=0))

        ActivateKeyboardLayout(0, &VK_FLAGSD)

    EndIf

Endwhile

End

Dieter
Zornow

Das funktioniert aber sólo, si uno sólo 2 Idiomas eingestellt ha, como lo sí una Rotation es. Wenn uno Yo 3 Idiomas installiert ha es torcido, porque entonces con 3 Layouts rotiert se

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

Frank
Abbing

Aber ActivateKeyboardLayout() esperado doch el Parámetro des Tastaturlayouts, como rotiert eigentlich nichts...
Un bessere Concepto tener Yo actualmente auch no y kann lo auch no wirklich testen.

Dieter
Zornow

@Franco

HKL_NEXT
Selects the next locale identifier en the circular list of loaded locale identifiers maintained by the system.
HKL_PREV
Selects the previous locale identifier en the circular list of loaded locale identifiers maintained by the system.

El Función esperado 0 oder 1 y va entonces para entonces para nächsten Layout. Wenn Yo deinen Code teste kommt Alemán, Inglés y Thai aber kein russisch. Deshalb klappt lo sí sólo 2 Idiomas

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

Frank
Abbing

Richtig. In el Fall musst du auch todavía con LoadKeyboardLayout() oder GetKeyboardLayoutList() trabajo. Desde que no testen kann, erstelle Yo no Code, aber el beiden API scheinen me muy simpel anzuwenden a ser.

Stephan
Sonneborn

Yo häng mich hier veces dran:

Kann uno con ActivateKeyboardLayout(hKeyboardlayout&, Flag&) auch una bastante bestimmtes Layout aktivieren (ggf. auch todavía vorher invitar, si no geladen wurde)?

Irgendwie podría el wohl con KLF_SETFORPROCESS ir como Flag para ActivateKeyboardLayout() ir.

Mit 1 oder 0 como Flag stellt uno offenbar sólo en el Liste aller installierten Layouts el nächste o. vorherige Layout en.

Schöne Grüße aus Wittgenstein
von Stephan

Programmierumgebung:| XProfan X4 | WIN10 | AMD FX6100 3,3 GHz

XProfan X2
WinXP, SP3 v.3244, P4 3.06GHz

¡Hola Stephan!

Laden va wohl por LoadKeyboardLayout aber ¿qué es exactamente hast porque antes o.

Yo glaube Yo verstehe el Cuestión no así correcto. ^ ^

Stephan
Sonneborn

Hola si,

lo va en el Principio siempre todavía a russischen Textos o. deren Darstellung.
Yo habe una alten Freeware Schriftsatz gefunden, el kyrillische Signo en el ersten 255 Signo (also no en el avanzado Zeichensatz) abbildet.
Dazu muss pero en el Eingabe el englische Tastaturlayout aktiviert voluntad.

Wenn al installiert ha, puede ser con ActivateKeyboardLayout(0,1) o. ActivateKeyboardLayout(0,0) zirkular antes o zurück una después de el otro Zeichensatz aktivieren. Es para una alphabetisch (si uno vorher sortiert ha) oder en el Reihenfolge des Anlegens.

Yo muss also gezielt el englische Tastaturlayout einschalten y vorher prüfen, si installiert es.

Schöne Grüße aus Wittgenstein
von Stephan

Programmierumgebung:| XProfan X4 | WIN10 | AMD FX6100 3,3 GHz

XProfan X2
WinXP, SP3 v.3244, P4 3.06GHz

Ah!

Schau veces dies hier funktionierte en me en Anhieb:

Tuve äöü eingetippt y typisch para una us-Tastatur wurde dies en ';[ umgesetzt.

zwischenablage01.png	5 kB

Hochgeladen:	18.07.2012

Ladeanzahl:
		Descargar

Stephan
Sonneborn

IF (18.07.12)

Ah!

Schau veces dies hier funktionierte en me en Anhieb:https://XProfan.com/files/ueeoi.png

Tuve äöü eingetippt y typisch para una us-Tastatur wurde dies en ';< umgesetzt.

Super!
Das scheint entonces el Solución a ser.

Como lugar Yo el originale Layout otra vez una?
Kann uno como vorher una Handle auslesen y darauf otra vez zurücksetzen?

Aunque meckert Profano a, el Función sei no en el dll disponible. Ist el no en el USER32.dll deklariert?
Kompilieren Marca Separación

DEF LoadKeyboardLayout(2) !"USER32","LoadKeyboardLayout"

Schöne Grüße aus Wittgenstein
von Stephan

Programmierumgebung:| XProfan X4 | WIN10 | AMD FX6100 3,3 GHz

19.07.2012 ▲

Dieter
Zornow

Lo son LoadKeyboardLayoutA oder LoadKeyboardLayoutW

XProfan X2
Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

19.07.2012 ▲