[Delphi] Alternatief toets naar Webbrowser sturen

[Icelus]

Ik wil een toetsaanslag naar de webbrowser component sturen, ik gebruik daarvoor onderstaande code:

Delphi:

procedure SendKey(const Key:WideChar);
var  hIE:THandle;
begin
     hIE := FindWindowEx( webBrowser.Handle, 0, 'Shell DocObject View', nil );
     hIE := FindWindowEx( hIE, 0, 'Internet Explorer_Server', nil );
     if ( hIE <> 0 ) then begin
       SendMessageW( hIE, WM_CHAR, WPARAM( Key ), 1 );
     end;
end;

Is dit een veilige manier en/of zijn er alternatieven hiervoor?

[FendtVario]

Waarom zou je dit anders willen doen? Heb je een reden waarom je denkt dat dit niet veilig is?

[LordLarry]

Als ik me niet vergis beschermd IE zichzelf daar ook in latere versies tegen.

[Icelus]

FendtVario schreef op vrijdag 18 maart 2005 @ 16:59:
Waarom zou je dit anders willen doen? Heb je een reden waarom je denkt dat dit niet veilig is?

Enige lijkt me dat de namen (de strings) mogelijk zouden kunnen wijzigen in een latere versie (?)

[FendtVario]

Als dat zo is dan kun je de namen veranderen in variabelen en misschien ergens in het systeem opzoeken wat de juiste naam is van het component of op een andere manier de naam achterhalen.

[Icelus]

Iemand nog een suggestie?

[Tomatoman]

Kies voor de pragmatische oplossing: kijk hoe de namen in de betaversie van IE7 luiden. Zijn de namen daar hetzelfde, dan zul je de komende jaren geen probleem hebben, want IE8 laat nog wel even op zich wachten.