ActiveXForm调试问题 up有分

Question

我在Run Parameters设置好ie和发布后的htm文件的路径  可以按F9运行了 但不能设断点  程序出错也不会在代码中显示位置  怎样才能像不同程序那样调试？

Answer 1

你可以把你的Activexform放到一个应用程序中运行才能调试

Answer 2

两个窗体的代码：
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    procedure Button2Click(Sender: TObject);
    procedure FormShow(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementationuses Unit2;{$R *.dfm}procedure TForm1.Button2Click(Sender: TObject);
begin
  Form2.Edit2.Text := button2.Caption;
end;procedure TForm1.FormShow(Sender: TObject);
begin
  Form2.Show;
end;procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2.Edit1.Text := button1.Caption;
end;end.
unit Unit2;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm2 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form2: TForm2;implementation{$R *.dfm}end.

Answer 3

不过这个问题
可以用Showmessage
也相当于设断点哟

Answer 4

就是把你在ActiveXForm里自己写的代码复制到另一个
应用程序里面，如果运行无错的话，那么再贴回来。

Answer 5

这样将你的ActiveX Form作成一个ActiveX组件，放在你的应用程序中调试就可以了。
只要进行了注册，就可以作为一个ActiveX组件来使用。

Answer 6

=================================================================================
 回复人： liaoqingpeng(棋快一步) ( ) 信誉：101  2003-04-04 09:31:00  得分:0 
 
 
  就是把你在ActiveXForm里自己写的代码复制到另一个
应用程序里面，如果运行无错的话，那么再贴回来。
==================================================================================
这样做基本没有什么意义。
将你的ActiveX Form就看作是一个控件的来用。要有属性、方法、字段就不用了。
 

Answer 7

==================================================================
 回复人： zhptj(北狼) ( ) 信誉：100  2003-4-3 9:34:00  得分:0  
  
你可以把你的Activexform放到一个应用程序中运行才能调试
=================================================================
即使在设计期阶段，这个ActiveX也是运行状态。

Answer 8

我的可以调试啊!你是怎么发布的?你是不是没有正确的发布? project->web Deployments Options
=========根本不需要把代码复制到另一个程序的.也可以设置断点,单步调试也可以.
所有delphi能做的程序,基本上都可以利用delphi调试的!COM+, Dll,Application service ........

Answer 9

用showmessage，或者先把代码移植到一般得application
不过要注意一些问题，因为我觉得ActiveForm本身有一些bug
比如TOpendialog，在activeform里面不能用opendialog1.filename获得文件名，而要用opendialog1.Files.Strings[0]

Answer 10

： shadou(乷乧) 能说清楚点吗？ 怎么调试？

Answer 11

只设RUN的参数是不够的.
在Run参数设置页面:HOST Applications:IE所在的地址
Parameters:发布用来调试的网页所在地址再选Project->Web Deployment Options->project
将Target dir:你编译后生成的ocx所在位置
Target URL:同上
HTML dir:发布用来调试的网页所在地址这三个参数一般是一样的.在运行之前还要做一件事:发布:
Project->Web Deploy
delphi就会自动生成调试用的网页.选RUN->register AcitveX Server注册你的ocx然后就可以点击运行按钮正常调试了.

Answer 12

用ShowMessage（）最有效快捷哦