delphi中cannot find implementation of method2010

delphi中cannot find implementation of method WebBrowser1DocumentComplete

使用一个自定义的函数之前，要在代码中的implementation区域给函数做一个声明

例如：
type中：
procedure WebBrowser1DocumentComplete(Sender: TObject;
      const pDisp: IDispatch; var URL: OleVariant);这样就声明了一个方法

您可以把光标定位到这上面声明语句上，然后按下Ctrl+Shift+C，编译器会自动在implementation区域为您生成这个过程活函数的代码块如下：
implementation中：
procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin

end;
 
 

一般出现这种情况是因为直接复制其他窗口到新窗口