Foros Club Delphi - Función ExecWb del TWebBrowser?

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)

- - Función ExecWb del TWebBrowser? (https://www.clubdelphi.com/foros/showthread.php?t=1858)

Función ExecWb del TWebBrowser?

Hola a todos. Alguien conoce esta función del TWebBrowser, me gustaria conocer sus argumentos o parametros. Hasta ahora se que se puede impprimir el contenido de un webbrowser con ella pero quiero realizar mas cosas como:

guardar, copiar, etc..

Muchas gracias por su atención.

Extraido del MSDN de Microsoft:

Código:

 

ExecWB Method  



Executes a command on an OLE object and returns the status of the command execution using the IOleCommandTarget interface.



Syntax



object.ExecWB( _

    cmdID As OLECMDID, _

    cmdexecopt As OLECMDEXECOPT, _

    [pvaIn As Variant,] _

    [pvaOut As Variant])



Parameters



cmdID

Long that represents the identifier of the command to execute. For more information on command identifiers, see MSHTML Command Identifiers. 

cmdexecopt

OLECMDEXECOPT value that specifies the command options. 

pvaIn

Optional. A Variant used for specifying command input arguments. 

pvaOut

Optional. A Variant used for specifying command output arguments.

Entonces, entendemos que es una especie de interfaz para ejecutar comandos sobre un objeto OLE (en este caso, un WebBrowser)

Una lista de parametros para cmdID la obtienes en:

http://msdn.microsoft.com/library/de...ods/execwb.asp

Para los parametros de OLECMDEXECOPT, consultas:

http://msdn.microsoft.com/library/de...n_a2z_5k38.asp

Y, este es un pequeño ejemplo de una implementacion que yo le di para imprimir:

Código:

 

procedure TForm1.RefreshBtnClick(Sender: TObject);

const

  OLECMDID_PRINT               = $00000006;

  OLECMDEXECOPT_PROMPTUSER     = $00000001;

begin

  Browser.ExecWB(OLECMDID_PRINT, OLECMDEXECOPT_PROMPTUSER);

end;

Hola hector como puedo hacer para que funcione. Ya he conseguido las constantes de los dos argumentos pero delphi 7.0 no lo renoconoce.

Gracias Hector

Que quieres decir con que no lo reconoce? Te salta un error, o simplemente no hace nada?

Que pretendes hacer con el metodo, cuales son los parametros que le pasas?

Me dice el tipico error de que no se puede compilar la unidad y quiero utilizarlo para copiar texto de una página

Gracias Hector

Me das un poco de codigo?

Es con el codigo que tu me diste. Si te sirve de algo utilizo delphi 7.0

No me reconoce el segundo parametro
OLECMDEXECOPT_DONTPROMPTUSER

Y los de mas parametros secundarios no los reconoce