[GROL]

У TWebBrowser есть событие onBeforeNavigate. Делаешь проверку урла и если это твои команды делаешь их обработку.

В html

<a href="blabla"><object ... твой_флешик ></a>

В Delphi

procedure TMForm.WebBrowser1BeforeNavigate2(Sender: TObject;
    const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
    Headers: OleVariant; var Cancel: WordBool);
begin
 if ExtractFileName(URL) = 'blabla' then
  begin
    //  что хош
    Cancel := true;
    Close;
  end;
end;