如何让ActiveForm的另一个窗体也显示在IE内? (100分)

各位高手我原来用DELPHI做一个远程控制程序，现老板要我把它变成网页式的控制程序，我
原来没有写过网页不知道用DELPHI怎么写或者用DELPHI结合ASP之类的网页工具，是否是
Web服务器应用程序？希望有这方面经验的高手给我一个思路，不胜感激。
2:用ActiveForm做在网页调用，如果我这个主窗体有按钮SHOW出另一个窗体,哪这个窗体
就不在IE里,怎样把这个也窗体放进IE?

java

太难，非一人能解

有意思，将来DELPHI＋ASP混合编程有前途

我觉得应该不难我看VBSCRIPT和JAVASCRIPT应该可以做到而我相信用DELPHI加上别的工具
应该做到希望高手指教。

asp+com形式可以很容易的控制系统，包括杀进程。
主要功能用com来实现，asp只用来传递数据。

to iapollo;
你能具体讲一下思路吗?我先谢谢你。

用Active Form很简单就可以把你原来的程序搬到网页上。

关于asp的com的编写可以参考一下下面的文章，其实也就是把你要实现的逻辑
用com来完成，asp只是简单的调用。还有happylcq的方法也是一个很好的方法，
如何把你的程序封装成Active Form你可以参考一下我以前回答过的问题。
这种方法有个缺点就是不能通过防火墙，问题较多。
///////////////////////////////////////////////
用Delphi编写ASP的ActiveX
ASP中的ActiveX服务器组件为标准的Automation ActiveX组件，只要使用由ASP提供的接口和遵守ASP有关规则便可。Delphi 4.0作为一种高效、快速、强大的开发语言，为开发COM组件提供了很强的功能，但不知道什么原因，很少有人运用Delphi编写ASP中的ActiveX服务器组件。本文意在通过举例介绍如何运用Delphi编写ASP中的ActiveX 组件。

通过以下步骤创建ASP中的ActiveX 服务器组件：

1.创建一个ActiveX library工程

打开Delphi编辑器，选择选单中的File/New，在New Item中选择 the ActiveX 项中的ActiveX Library选项，Delphi将自动生成以下代码：

library Project1;

uses

ComServ;

exports

DllGetClassObject

DllCanUnloadNow

DllRegisterServer

DllUnregisterServer;

{＄R ＊.RES}

begin

end.

这是Delphi编译COM组件时必须的函数，DllGetClassObject函数负责将输入调用从COM库转换到相应的类工厂中；DllCanUnloadNow函数是通知OLE引擎如果没有程序引用将自动释放内存；DllRegisterServer与DllUnregisterServer函数用来登记COM服务器。总之Delphi已经为你做好了一切辅助工作，你只需用心编写主要功能模块便可。

2.在该工程中新增一个automation对象

选择Delphi编辑器选单中的File/New，在New Item中选择ActiveX 项中的Automation Object选项，系统将显示the Automation Object导向，在物件名称中输入TestObject和选择Multiple Instance选项
按OK键后系统将弹出类型编辑器，其实这时系统已经生成了两个单元（Project1—TLB.pas与unit1.pas），unit1.pas中有如下代码：

initialization

TAutoObjectFactory.Create(ComServer
TTestObject

Class—TestObject
ciMultiInstance);

end.

这是告诉类工厂物件执行的方式与位置。

3.增加组件中的属性与方法

在类型编辑器中单击工具栏中的方法按钮增加以下方法：

OnStartPage(unk:IUnknown)

OnEndPage.

Test.

注意在增加方法OnStartPage时，在Parameters项中增加参数unk，类型为Iunknown，增加三项方法后，在类型编辑器中按Refrash键，Unit1.pas中将会出现三个函数，在每个函数下写如下程序：

procedure Ttestobject.OnStartPage(unk: IUnknown);

begin

m_scriptContext := unk as IScriptingContext;

end;

procedure Ttestobject.OnEndPage;

begin

m_scriptContext := nil;

end;

procedure Ttestobject.test;

begin

m—scriptContext.Response.Write(′ActiveX Test For Delphi′);

end;

当IIS激活一个ActiveX组件时它会自动寻找组件中是否有OnStartPage与OnEndPage方法，如果存在，服务器将在开启本ASP页时自动执行OnStartPage方法和当本ASP页所有脚本执行完毕后自动执行OnEndPage方法。

其中mscriptContext 与IScriptingContext是ASP中负责将ASP转换成HTML格式必不可少的变量与类型，因此必须将Unit1.pas文件中的Uses加上ASPTypeLibrary—TLB变成

unit unit1;

interface

uses ComObj
ActiveX
Delphi_TLB
ASPTypeLibrary—TLB
SysUtils;

ASPTypeLibrary—TLB.Pas文件可以通过类型库引入取得，打开Delphi编辑器中的选单Project/import type library 项，选择the Microsoft Active Server Pages Type library，按OK，Delphi便会自动生成一个ASPTypeLibrary_TLB.Pas。

4.编译与注册

选择Delphi编辑器中的选单Project/Compile 项编译文件，然后选择Run/Register ActiveX Server对Project1.dll文件注册。

5.在ASP文件中运用Project1.dll

在ASP文件中加入以下文字：

Set TestASP = Server.CreateObject(Project1.TestObject)

TestASP.Test

通过上面的例子，我们可以发现用Delphi编写ASP中的ActiveX服务器组件是十分容易的，加上Delphi丰富的组件与强大的功能，使我们相信运用Delphi编写特殊的ASP服务器组件，如数据库、服务器上各种信息与资源访问等，都会十分方便。
//////////////////////////////////////////////////////////////

“远程控制”？？
我的理解是你在其他机器上有一个后门，然后用客户端访问，达到远程控制的目的。
是这样吗？
如果是这样，这个问题非常简单，在你的服务程序中增加一个Web服务控件，
然后你自己定义命令，然后.....
我的一个朋友的程序就是这样做的
我不同意使用ASP等，最后自己定义，防止安全漏洞

to happylcq:
用Active Form很简单就可以把你原来的程序搬到网页上，请你详细说一下好吗？

新建一个Active Form（会提示你新建一个Active Library工程），把你以前的窗体加进工程，
在新建的Active Form中引用那个单元，然后声名，新建一个实例。然后show出来就可以了。
example:
type
TActiveFormX = class(TActiveForm, IActiveFormX)
procedure ActiveFormCreate(Sender: TObject);
private
form1: TForm1;///////////
...
procedure TActiveFormX.ActiveFormCreate(Sender: TObject);
begin
form1 := TForm1.Create(self);
form1.show;
end;

to happylcq:
你这样做只是把主窗体放进了IE里,如果我这个主窗体有按钮SHOW出另一个窗体,哪这个窗体
就不在IE里,怎样把这个也窗体放进IE?希望继续指教!
回答完马上给你加分.

这个很简单呀，只要把要显示出来的窗体的parent指定为ActiveForm（也可以是ActiveForm中的
其它控件，如panel），这样就可以显示在ActiveForm内了呀。

只要把要显示出来的窗体的parent指定为ActiveForm，不行。
也可以是ActiveForm中的其它控件，如panel），可以。
我放分。

多人接受答案了。