W7/64bit: osk.exe mit ShellExecute starten

[ULIK]

Hallo iphi,

unter W7 schau Dir mal das ITextInputPanel interface an. Dazu mußt Du das Microsoft PenInputPanel als Typbibliothek importieren und Dir so die Interface-Unit erstellen lassen.
Damit funktioniert das eigentlich ganz gut.

Hier mal etwas Code:

Delphi-Quellcode:

    try
      FTextInputPanel := CoTextInputPanel.Create;
      if FTextInputPanel <> nil then
      begin
        SiUnit.LogDebug('Interface created');
        FTextInputPanel.Set_AttachedEditWindow(AEditorHandle);
        FTextInputPanel.Set_DefaultInPlaceState(InPlaceState_Expanded);
        FTextInputPanel.Set_DefaultInputArea(PanelInputArea_Keyboard);
        FTextInputPanel.Set_InPlaceVisibleOnFocus(Integer(true));
        FTextInputPanel.Set_PreferredInPlaceDirection(InPlaceDirection_Top);
      end;
    except
      on E: Exception do
      begin
        if SiUnit.IsOn(lvDebug) then
          SiUnit.LogException(E, 'Creating TextInputPanel Interface failed');
      end;
    end;

Damit springt das Keyboard an, sobald Du in ein Editfeld gehst.


Grüße,
Uli