T tuoniao055 Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-18 #1 现在在做一个多媒体的东东,我想让主界面别致一些。让form显示时从中间一点一点渐出显示,直到整个完全显示。关闭时按相反的一点一点缩小,直到关闭。
W wanghuafengbuaa Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-18 #2 在本次比赛的作品中有个原码类似,自己到相关网上下载吧。
W wanbb Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-18 #4 如果你是使用win2k以上的系统,那么有个api函数可以实现:AnimateWindow, 你可以在form1的show事件加上: AnimateWindow(form1.Handle,3000, AW_CENTER); form1.SetFocus;
如果你是使用win2k以上的系统,那么有个api函数可以实现:AnimateWindow, 你可以在form1的show事件加上: AnimateWindow(form1.Handle,3000, AW_CENTER); form1.SetFocus;
T tuoniao055 Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-18 #5 我先是是,不行再统治你.分等成功后在给,毫巴.
扬 扬扬 Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-18 #6 wanbb的说得不对: window98第二版(4.10.2222 A)也有AnimateWindow函数。 另外添上如下事件: procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin AnimateWindow(self.Handle,2000, AW_CENTER+AW_HIDE); end; //获得垮塌效果!
wanbb的说得不对: window98第二版(4.10.2222 A)也有AnimateWindow函数。 另外添上如下事件: procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin AnimateWindow(self.Handle,2000, AW_CENTER+AW_HIDE); end; //获得垮塌效果!
P pgjeffrey Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-18 #7 procedure TForm1.FormShow(Sender: TObject); begin AnimateWindow(self.Handle,1000, AW_CENTER); form1.SetFocus; Form1.Repaint; end;
procedure TForm1.FormShow(Sender: TObject); begin AnimateWindow(self.Handle,1000, AW_CENTER); form1.SetFocus; Form1.Repaint; end;
T tuoniao055 Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-20 #8 你们的方法有缺点,就是当显示出来后,大小都一样,比如我向用此放发显示一个小一点的窗体,可出来后还是那么大,你们也可以事实,我的要求是当显示出来后窗体的大小不便。关闭时我要的效果和显示时一样,只是由大变小,逐渐消失,而不是跨塌,还请各位想象办法
你们的方法有缺点,就是当显示出来后,大小都一样,比如我向用此放发显示一个小一点的窗体,可出来后还是那么大,你们也可以事实,我的要求是当显示出来后窗体的大小不便。关闭时我要的效果和显示时一样,只是由大变小,逐渐消失,而不是跨塌,还请各位想象办法
扬 扬扬 Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-21 #9 跨塌就是由大到小逐渐消失呀! 还是没听懂你上面所说的意思! 另外提醒的是:要上述语句后要添加上:form1.refresh; 让所有控件重绘,防止有的控件得不到显示.
T tuoniao055 Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-28 #10 xie xie nimen wo zhi dao le