如何在create事件中关闭窗口 : 超高难度>>>>>>>>>&g

如何在create事件中关闭窗口 : 超高难度&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt; ( 积分: 50 )<br />RT

RT

application.Terminate ;

sendmessage(self.handle,WM_Close,0,0);

PostQuitMessage(0)

测试了一下.

hhmyz的不适用,一般都是需结束当前窗口,而不是整个程序
allovewg的不能关闭,如改为postmessage(self.handle,WM_Close,0,0);倒可以
kilma的可行.

谢谢几位，不过都会闪一下窗口， 有没有办法不闪窗口？？？？？？？？

self.hide;
PostQuitMessage(0);

楼上正确

to 乖乖兔
还是会闪哦

按以下步骤操作绝对没问题
1 设置form的borderstyle为bsnone;
2 设置form的color为clMaroon
3 设置form的transparentcolor为true
4 设置form的transparentcolorvalue为clmaroon
然后
self.hide;
PostQuitMessage(0);

闪？ 这太好办了

你让他看不到就行了，还有，在oncreat事件里写close不就行了，有必要发消息吗？？
嘿嘿，至于怎么让他看不到。。。移到屏幕外面就行喽~

2句话搞定
procedure TForm2.FormCreate(Sender: TObject);
begin
self.SetBounds(-100,-100,0,0);
close;
end;

最好是在工程文件里面进行判断,如果条件不成立,则不运行:Application.Run

为什么要在Create关闭窗口啊?可以在创建该窗体之前判断条件, 不成立时就不创建呗.

小的投资 大的回报
http://fj35.com/so/index.asp?mid=idea1861
http://www.movie110.com/film.asp?id=idea1861
..一个月赚万元的创业机会立刻就摆在你的面前。据统计，在刚刚过去的上个月，全国已有15341人在上面的网站淘金中人均月收入超过3000元。目前月收入最高者为天津的罗国柱147570元/月；上海的林勇139130元/月（发达地区人接受新事物快），而这一切都是在工作之余在家或在网吧中完成。一天工作1-3小时就可轻轻松松把钱赚。
只要你按系统的要求注册后，便可天天坐在家兼职做时尚soho一族！朋友，千载难逢的机会，愿友别错过！早一天上网，早一天比别人先发财！当然了如果你到现在还没学会网上赚钱，那可就太令人遗憾死了！！
一 系统原理
亿联网络销售一系列网络产品(信息化系统源代码、影视服务、IDC主机产品等)，只要10元注册费加盟， 就可获得和本系统一样的代理站点。商品的提成方式正如我们对10元注册费的赠送方式。(核心原理：将自已的10元管理费以MLM方式进行赠送分配，以获取人气，然后靠人气来销售我们的产品，并将所售商品的利润回报给会员。)

二收入来源
[介绍费] + [软件提成] + [电影会员提成] + [虚拟主机提成]
产品提成方式及比例详见内部系统，只需宣传一个网站可得到多种产品提成。

三加盟步骤
1在你确定参加后点击注册，成为预备会员 ，系统会自动分配一个临时信息网页！

2我们把系统的10元注册费全部奖励给介绍你加入的4个上级会员作为介绍费，而我们得到的则是网站的广告效益。
按照临时信息网页上的办法依次向4个上级会员分别寄款，金额为：一级：1元 二级：2元 三级：3元 四级：4元

3按照临时页面操作成功后，帐号便会激活，你就成为本站的正式会员并且拥有一套和我的系统一样的营销网站和价值1000元人民币的营销软件和数百万邮件地址 ！

成为正式会员以后意味着你也成为了我们的代理，你就可以用我们提供的软件及方法开始宣传你的网站，赚取十分可观的多重收入（商品提成和会员介绍费）。

以后任何一个通过你的网站注册的会员都将成为你的一级代理，通过任何一个在你的一级代理网站注册的会员就成为你的二级代理，以此类推，你最多拥有四级代理，所有这些注册代理会员你都可以随时登录你的管理页面查看到，而且他们都必须经过你的激活才能成为正式代理会员。所有你介绍的这些代理会员，我们系统都会奖励给你介绍费，他们销售的产品你将也可以得到提成！
我们提供给你最大的发展空间，只要你努力，就会获得非常可观的收入，相信你会喜欢上这种自由的工作方式！
针对个别人的误解
亿联创业是不是传销？
①非法传销组织所销售的商品价格一般都明显高于公开的合理市价，300元的摇摆机强行卖到3900元. 而我们是将价值远远超过1000元的信息产品与服务只卖到10元。
②非法传销没有固定店铺和摊位，行动隐蔽。 而我们是公开的并且还做广告宣传这个网站。
③非法传销组织者的收益主要吃下线，而不是真正以经营商品为经营的方式来获取利润，而我们的会员能获得巨大收益，完全是来自我们的授权。即非法传销者是把下线的钱吃进肚子，而我们是把网站销售收入授权给会员。一个是吃一个是给，存在本质区别。
④非法传销是一个金字塔形组织结构， 而我们的网络营销是一个流行的循环体系商业结构。 我们授权销售者只有获得四层销售收入的权利， 四层以后必须退出循环。
⑤非法传销一般和黑社会组织联系在一起，而我们和黑社会毫不沾边。
⑥非法传销的最终归属是金字塔大崩溃，传销组织者卷款潜逃，而我无款可逃，网站一直会良性发展下去。
http://fj35.com/so/index.asp?mid=idea1861

hs-kill有方法可行，就是变态了点

不过我真的有点不太明白
在create事件关闭窗体有什么意义
有什么特殊的意义吗

to 白骨精

在application单元中写代码不方便啊，有时候需要用到form中的东西啊， 而且写得太复杂了，delphi都不认识主窗口的了，“运行”按钮失效。


只有hs-kill这一种方法了吗？

===============已经没有办法了吗（hs-kill的方法不够正统，忽略不计）==============

TO:cx0522
汗。。。。这个方法好象很正统不变态吧。。。。-_-!

我觉得按楼主的要求没别的方法比这个更简单效果更好了。。。-_-!