Einzelnen Beitrag anzeigen

Y.Elm

Registriert seit: 19. Sep 2011
Ort: Berlin
21 Beiträge
 
Delphi 2010 Professional
 
#3

AW: Verwenden des TextInputPanels / der PenInputPanelLib_TLB

  Alt 16. Jan 2012, 13:50
Zitat:
Nimm einfach das Fensterhandle des Edit-Felds her.
Genau das versteh ich ja nicht. Dieses ominöse _RemotableHandle sieht folgendermaßen aus:
Delphi-Quellcode:
  _RemotableHandle = record
    fContext: Integer;
    u: __MIDL_IWinTypes_0009;
  end;
Diesem Record kann ich natürlich kein Handle mit der Deklaration HWND = type LongWord; zuweisen.
In meinem Test hab ich es mal so probiert:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
  TIP: TextInputPanel;
  hnd: _RemotableHandle;
  res: HResult;
begin
  TIP := CoTextInputPanel.Create;
  hnd.fContext := Edit1.Handle;
  res := TIP.Set_AttachedEditWindow(hnd);
  Form1.Caption := inttostr(res);
  res := TIP.Set_InPlaceVisibleOnFocus(Integer(FALSE));
  Form1.Caption := Form1.Caption + ' - ' + inttostr(res);
end;
Als Ergebnis davon steht in der Caption " -2147024809 - 1", woraus ich schließe, dass TIP.Set_AttachedEditWindow(hnd); nicht funktioniert hat.
Edit: Und natürlich poppt dieses Tastatur-Icon wieder auf, was ich deaktivieren wollte.

Geändert von Y.Elm (16. Jan 2012 um 13:52 Uhr)
  Mit Zitat antworten Zitat