当前位置:主页>仓库管理软件> 列表

MDI中怎样去掉子窗体的边框? 找销售软件的技巧

库存管理软件版1楼: [b][red]MDI中怎样去掉子窗体的边框?

我想做导航界面,使界面看起来就象一幅图片,为了美观想去掉边框,看哪位高手能帮忙!

另:在网上搜到一些例子都不能真正去掉边框,希望您的代码真的能解决问题!分不够可以再开帖![/red][/b]

2楼: 没人会吗? 如销售软件的技巧

3楼: BorderStyle设为bsNone

4楼: 来自:阿九, 时间:2006-2-9 11:06:10, ID:3348379

我的是MDI窗口,这个方法只能对普通窗口

5楼: 重载MDI子窗口的CreateParams函数即可:
//声明
protected
procedure CreateParams(var Params: TCreateParams); override;
//实现
procedure TEditForm.CreateParams(var Params: TCreateParams);
begin
Self.BorderStyle := bsSingle;
inherited;
with Params do begin
Style := Style and not WS_CAPTION;
end;
end;

6楼: 更简单的:
procedure TEditForm.CreateParams(var Params: TCreateParams);
begin
inherited;
with Params do begin
Style := Style and not (WS_CAPTION or WS_THICKFRAME);
end;
end;

库存管理软件版7楼: 更简单的
把子窗体做成一个Frame

8楼: to: 来自:dreamisx, 时间:2006-2-10 8:57:26, ID:3349101
你的回答解决了我的问题,非常感谢你的回答!
我花了一年的时间做了一个 如企业管理软件,包括 如进销存和车间管理,现在基本成功,正在做导航界面和加密狗程序,有几个软件代理商想代理,不知你是做哪方面的软件的,想跟你交个朋友,[red]我的QQ:34580856 邮箱:cb8u8@163.com[/red][red]不知能否告知你的QQ号或邮箱?[/red]

9楼: 接受答案了.

10楼: to: 来自:dreamisx, 时间:2006-2-10 8:57:26, ID:3349101
我把分都加给你了,非常感谢!