向各位大侠们求救！(100分)

近日我碰到一个问题：如果界面是htm文件，如何让delphi程序去响应在上边操作？

ASP啊！
Delphi Web Service啊！

但是我要做的是一个应用程序，如果不是很明白的话，大家可以参看http://www.aiolia.com/bluefate/index.htm上的程序。

procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
const pDisp: IDispatch
var URL, Flags, TargetFrameName, PostData,
Headers: OleVariant
var Cancel: WordBool);
begin
if(Pos('FORM2',UpperCase(URL))<>0) then
begin
Form2:=TForm2.Create(Self);
Form2.ShowModal;
Form2.Free;
cancel:=true;
end;
end;