设计了一个自己的主界面,怎样才能应用到程序中的其他窗体?--急求解答,在线等。。。 ( 积分: 50 )

  • 主题发起人 主题发起人 giszpp
  • 开始时间 开始时间
G

giszpp

Unregistered / Unconfirmed
GUEST, unregistred user!
设计了一个自己的主界面,怎样才能应用到程序中的其他窗体?比如说弹出的对话框等,让整个程序界面统一起来?
 
设计了一个自己的主界面,怎样才能应用到程序中的其他窗体?比如说弹出的对话框等,让整个程序界面统一起来?
 
在其它的程序中创建一个实例(Create)并显示(show或showmodal)
 
用模板呀,
先建一些模板窗板,用时,从模板继承就可以了
 
谢谢楼上的提示,创建其他窗体时确实可以达到目的
那再探讨一下对于MessageBox Open等对话框该怎么处理呢
 
继承系统MessageBox然后改写换成你要的图片等!定制个必化嘛,呵呵!
 
来一句最简单的:
form.show
 
1.创建模板不如用继承
2.你自己写一个MessageBox窗口
 
//****************************************************************************//
// 日期:20040909
// 事件:TFormSpecific.ActFormCompareShowExecute(Sender: TObject);
// 功能:显示处理效果对比区域模块
// 备注:
//****************************************************************************//

procedure TFormMain.ActFormCompareShowExecute(Sender: TObject);
begin
FormCompare := TFormCompare.Create(nil); // 动态创建窗体 TFormCompare
FormCompare.ShowModal; // 显示窗体 TFormCompare
FormCompare.Release; // 释放内存资源,否则回引起内存外泻
end;

//----------------------------------------------------------------------------//

//****************************************************************************//
// 日期:20041009
// 事件:TFormMain.ActFormSlideShowExecute(Sender: TObject);
// 功能:显示幻灯片演示区域模块
// 备注:
//****************************************************************************//

procedure TFormMain.ActFormSlideShowExecute(Sender: TObject);
begin
Formslide := TFormSlide.Create(nil); // 动态创建窗体 FormSilde
Formslide.ShowModal; // 显示窗体 FormSilde
FormSlide.Release; // 释放内存资源,否则回引起内存外泻
end;

//****************************************************************************//
// 日期:20041015
// 事件:TFormMain.ActFormImageViewShowExecute(Sender: TObject);
// 功能:显示图像浏览区域模块
// 备注:
//****************************************************************************//

procedure TFormMain.ActFormImageViewShowExecute(Sender: TObject);
begin
FormImageView := TFormImageView.Create(nil); // 动态创建窗体 FormImageView
FormImageView.ShowModal; // 显示窗体 FormImageView
FormImageView.Release; // 释放内存资源,否则回引起内存外泻
end;

这样可以了吧!

快给分
 
多人接受答案了。
 
后退
顶部