Pouvoir couper / copier / coller dans le TWebBrowser

En utilisant le composant TWebBrowser avec Delphi, vous rencontrerez certainement un problème avec les combinaisons de touches Ctrl + X (Couper), Ctrl + C (Copier) et Ctrl + V (Coller)... voici la solution ! Commencez bien sûr par ajouter un composant TWebBrowser à la fiche.

Ajoutez la classe ActiveX

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ActiveX;

Il suffit ensuite d'ajouter ce code juste avant le end. final :

// [...]

initialization OleInitialize(nil);
finalization OleUninitialize;

end.

Des questions ? Rejoignez nous sur le forum...