51CTO技术论坛_中国领先的IT技术社区's Archiver

黑夜 发表于 2006-8-29 01:16

做一个DreamWeaver风格的程序

---- 用过DreamWeaver的人都会发现DreamWeaver将每一个编辑的文件显示在任务栏上,并且用户任意关闭一窗口而不影响其他窗口,好象每一个窗口间没有关联,没有主窗口似的。但我们也能发现其实这些窗口间也有数据是共享的,如存盘的路径。
9b!o@4y Vp n $[#j'qV3opd f
---- 经过研究我发现其实这些窗口其实是属于同一程序的,并且实现方法也非常的简单。下面我用Inprise公司的C++ Builder为大家举一个简单的例子。 .L(`K/A&u%L8aAo

.bM;Q/u| ---- 首先我们创建一个普通的应用程序。在这个程序中包含两个Form,其中Form1为主窗口,我们将Form2设为不由应用程序自动创建。 %y/I,i$G{6a Zu[)d

oMe%lV+X x'y iT;M ---- 在Form1中加入一新的Public的属性: PLbX-x+E `
)h3p3Sjae/H6pN
---- int FormCount; 2ZO(kd!KV C a
`R,iy u1fR
---- 此属性用于记录系统建立的From2的实例的个数,在Form1的OnCreate事件中加入如下代码:
gY#t)_ y,heI:z(O H;E(QU0o{
        int i=GetWindowLong(this- >Handle,GWL_STYLE);3[[;X}h*|U?
        TForm2 *F,*G;
r`*ZKr         F=new TForm2(NULL);s jgdI'a"a| p
        G=new TForm2(NULL);B@J&b |R
        F- >ParentWindow=GetDesktopWindow();;C5Mvtk7xK-x/^]
        F- >Caption="F";
@7nfdkW         G- >ParentWindow=GetDesktopWindow();
k e{@3K!|         G- >Caption="G";/D|i6u7p5qB
        this- >FormCount=2;
A llB-t         SetWindowLong(G- >Handle,GWL_STYLE,i);zYg_Y3{?Pl
        SetWindowLong(F- >Handle,GWL_STYLE,i);M4Y r [C+J
        F- >Show();
)fRM1II)T7xj"G1VW ^         G- >Show();
;S8`x Sv]1Of *h{D-}Y-R4t
---- 其中GetWindowLong,SetWindowLong为获取/设置Window属性的API函数,具体请看C++ Builder带的Win32帮助。然后运行程序,我们就能发现程序在任务栏上显示了属于此程序的三个任务条。
e5Llw] j3@B ---- 接下来我们要做的事情有两个:
%[%X`6^}[ h-`
2c0\*i'lDQr5M9@-X ---- 1、 隐藏Form1及Application UiT.k2n

j+@$[ R;P7a%^G ---- 2、 让Form2的实例关闭应用程序
a$Q.B3vow8e]a
:`5Y ~+g6Lq ---- 实现第一件事情的方法在网上很多地方都提到了,即修改WinMain函数下面是具体的代码(粗斜体为加入的代码):
.s{7Tq J8li.c "\? w&A;]cW
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)_0wj4x~$n
{
J*yQ(Ml }$O*eNM         try
$K,Rv)Kfrh B         {JTki.R"G$[
Application- >Initialize();
*H U E`6p%a Application- >CreateForm({K l(F)v FA/H4?s
__classid(TForm1), &Form1);9{'W0y7k^9u6b$[cr
Application- >ShowMainForm=false;M{4tZ%MG5pZ
ShowWindow(Application- >Handle, SW_HIDE);f {,]X9b&J'N
Application- >Run();Rd%o!\zd z
}
6B]+r4U4\!YK'jy#h catch (Exception &exception)
&|u~g$bc#r9w.[ {ss*S4r IM'_*z6r2r
Application- >ShowException(&exception);lf @wOXM)f
}O.^-i!wH JR,bh
return 0;
G:\"Oj*x2et"g3M }+Di Y ` Mb+}

"L9to,I!e tKoR ---- 在这个地方要注意的是光用“Application->ShowMainForm=false;”是不能隐藏主Form(Form1)的,必须将Form1的Visibled属性变为false。 ;[J(^&t"gcmk]
---- 实现第二件事情需要用到Application的Terminate方法(结束应用程序)。我们只要在TForm2的OnClose事件中简单加入以下几句程序:
#`9A$yko1k+K Kg%V.v:k|
   if (Form1- >FormCount>1)
H!mC.WL @@ N3d$A|          Form1- >FormCount--;
f o;w9b gP    else4m_"R$H*z7A\
        Application- >Terminate();
X/Z(GdD
2Yl.g-P S ---- 运行程序,你就能发现程序在有任务拦上有两个提示,窗口F及窗口G,而且这两个窗口看起来就象独立的应用程序。
9W&Gvpsc0ot7t&L ---- 至此,一个DreamWeaver风格的程序就做完了,是不是很简单呢。

页: [1]

Powered by Discuz! Archiver 6.1.0  © 2001-2007 Comsenz Inc.