关于activeForm的断点调试的另一种方法。{送分} (300分)

  • 主题发起人 主题发起人 hfghfghfg
  • 开始时间 开始时间
H

hfghfghfg

Unregistered / Unconfirmed
GUEST, unregistred user!
关于activeForm的断点调试的另一种方法。
昨天在家写一个activeForm,发现
activeForm的断点调试很好用。
//原来是用IE调试,不爽!!!


步骤:

1。创建一个test程序。E:/active_lis/test/Project1.exe
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, OleCtrls, SHDocVw;
type
TForm1 = class(TForm)
WebBrowser1: TWebBrowser;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
WebBrowser1.Navigate('E:/active_lis/test.htm');
end;
end.


2。在你的activeForm的工程中的run下的parameters中的local中填写 E:/active_lis/test/Project1.exe

3。设断点 ,调试。

4。找一只 肥的 猪脚

5。hfghfghfg开始啃猪脚。

{以上两步可以不做}

ps:{感慨}
此activeForm的写的怪怪的。主要是完成报告的打印。
其实报告的打印不需要写activeForm的。可是,报告
的要求很多,自定义纸张,控制走纸,行打。这些还
好办。可是报告的样式很多。存放在几十个delphi写
的dll中,而且还经常改动。另外数据还是加密压缩的
{如某些bmp,不能用jpg压缩因为要无损}。结果就写成
了怪怪的样子。还好是局域网。否则,我要吐血了。

用webservices + activeForm 还能应付过去。
 
试试看哦
 
创意很好啊!学习!
 
换汤不换药
还是IE的内核
不过创意还是很好的,学习学习啊!!!!!!!!!!!
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部