Error E2009 en evento de TWebBrowser : Parameter lists differ

[ecfisa]

Hola Agustín.

Yo me refería a que dá igual el nombre dado al parametro en la declaración, siempre que se corresponda con el de su definición.

Coincido con vos en que, si genera el evento en tiempo de diseño, el nombre del parámetro en la definición del método deberá ser Sender y no otro. Ya que es el nombre que Delphi le asignará por defecto al parámetro en la declaración.

Sin embargo este código,

Código Delphi [-]
..
type
  TForm1 = class(TForm)
   ...
  private
    procedure webbrowser1_completo(UngaBunga: TObject;
      const Maranga: IDispatch; var Turongo: OleVariant);
  public
    ...
  end;
...
implementation 

uses SHDocVw;

procedure TForm1.webbrowser1_completo(UngaBunga: TObject;
      const Maranga: IDispatch; var Turongo: OleVariant);
begin
  ShowMessage('Documento completo');
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  WB: TWebBrowser;
begin
  WB := TWebBrowser.Create(Self);
  WB.OnDocumentComplete := webbrowser1_completo;
  WB.ParentWindow := Handle;
  WB.Navigate('www.ClubDelphi.com');
  ...
end;

funciona correctamente por que respeta la igualdad de los nombres.

Saludos