TWebBrowser if then Problem

[klaus9]

Wie meinst du das ?

unit Unit1versuch;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
OleCtrls, SHDocVw, StdCtrls, mshtml, ExtCtrls, Buttons, ActnList,
Variants;

so heißt Sie Unit1versuch