导航:
论坛 -> DELPHI技术
斑竹:liumazi,sephil
作者:
2004/2/12 9:43:15
标题:
菜鸟问题,谢谢!!!!!!!研究好几天了,就是没办法拉,求助!!!
浏览:1171
加入我的收藏
楼主:
请教各位: 如何让我做出来的form上的各项button,label,edit……可是随着form大小的改变而一起改变呢,就象windows的普通form一样,因为现在我只要把form缩小之后,就会有一部分的控件看不到了,我该上哪里去设呀?谢谢 还有,怎样让form在最小化时任务栏里,而不是在任务栏之上呀?
----------------------------------------------
-
作者:
2004/2/12 10:26:46
2楼:
能否详细点吗,谢谢
----------------------------------------------
-
作者:
bios (阿贡)
★☆☆☆☆
-
盒子中级会员
2004/2/12 11:23:13
3楼:
偶知道 这种问题每隔几天就有菜鸟来问一次 所以 给你们准备好了!
----------------------------------------------
作者:
bios (阿贡)
★☆☆☆☆
-
盒子中级会员
2004/2/12 11:25:15
4楼:
怎样让form在最小化时任务栏里,而不是在任务栏之上呀? procedure TMainForm.myHideTaskLan;//隐藏任务栏 begin ShowWindow(Handle, SW_HIDE); ShowWindow(Application.Handle, SW_HIDE); SetWindowLong(Application.Handle, GWL_EXSTYLE, GetWindowLong(Application.handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW AND NOT WS_EX_APPWINDOW); end;
----------------------------------------------
作者:
2004/2/12 11:47:56
5楼:
呵呵,感谢bios
----------------------------------------------
-
作者:
2004/2/12 12:57:38
6楼:
bios?最小化的时候不是在任务栏了么?你的意思是隐藏任务拦???小弟迷惑ing 还有啊,大哥你换签名档拉?你的问题解决了吗???
----------------------------------------------
-
作者:
bios (阿贡)
★☆☆☆☆
-
盒子中级会员
2004/2/12 13:17:11
7楼:
你试试就知道啦
----------------------------------------------
作者:
2004/2/12 13:46:10
8楼:
procedure TForm1.Button1Click(Sender: TObject); begin Application.Minimize; end; procedure TForm1.FormCanResize(Sender: TObject; var NewWidth, NewHeight: Integer; var Resize: Boolean); begin Panel1.Left := 0; Panel1.Width := form1.Width - 10; end;
----------------------------------------------
-
作者:
d_z_x (歆歆)
★☆☆☆☆
-
盒子活跃会员
2004/2/12 22:32:18
9楼:
在没有打开BIOS兄的文件之前,斗胆猜想:是否可把各控件的位置设为窗口的width和hight的比例关系。以保证当窗口改变时各控件的位置按同一比例变化。当然,如控件较多,也是较麻烦的。
----------------------------------------------
-
作者:
2004/2/12 23:31:33
10楼:
顶一下: d_z_x (歆歆) ★ 普通会员 bios兄,我也觉得这样做稍微麻烦点 ^_^
----------------------------------------------
-