请问，厕所在哪里?
hi,all：
我一程序，在三台机子上编译运行都没问题，不巧的是，偏偏栽在第四台机器的手上,一按F9运行,老是给我弹出“external exception c00000029”错误，和一个CPU调试窗口,这下子可把我急了，到处找厕所仍无获，万般无奈之下，只能来老窝请求诸位高手鼎力相助,如果问题解决了，以身相许并无不可，不过前提你必须是个美女 :)
谢谢！
工程代码如下：TMain是MID主窗口，
program DrinkerySystem;
uses
Forms,
Controls,
uLogon in 'SourceCode\uLogon.pas ' {Logon},
uMain in 'SourceCode\uMain.pas ' {Main},
uOpenHourse in 'SourceCode\uOpenHourse.pas ' {OpenHourse},
uBackHourse in 'SourceCode\uBackHourse.pas ' {BackHourse},
uLodging in 'SourceCode\uLodging.pas ' {Lodging},
uAssociator in 'SourceCode\uAssociator.pas ' {Associator},
uAssociatorInfo in 'SourceCode\uAssociatorInfo.pas ' {AssociatorInfo},
uInStorage in 'SourceCode\uInStorage.pas ' {InStorage},
uCheckBillOfDoc in 'SourceCode\uCheckBillOfDoc.pas ' {CheckBillOfDoc},
uOutStorage in 'SourceCode\uOutStorage.pas ' {OutStorage},
uDataBak in 'SourceCode\uDataBak.pas ' {DataBak},
uDataRevivification in 'SourceCode\uDataRevivification.pas ' {DataRevivification},
uBelongingsReport in 'SourceCode\ReportCode\uBelongingsReport.pas ' {BelongingsReport},
uHourseReport in 'SourceCode\ReportCode\uHourseReport.pas ' {HourseReport},
uGuestReport in 'SourceCode\ReportCode\uGuestReport.pas ' {GuestReport},
uIncomeReport in 'SourceCode\ReportCode\uIncomeReport.pas ' {IncomeReport},
uPayoutReport in 'SourceCode\ReportCode\uPayoutReport.pas ' {PayoutReport},
uBillOfDocReport in 'SourceCode\ReportCode\uBillOfDocReport.pas ' {BillOfDocReport},
uTodayReport in 'SourceCode\ReportCode\uTodayReport.pas ' {TodayReport},
uMerchandiseReport in 'SourceCode\ReportCode\uMerchandiseReport.pas ' {MerchandiseReport},
uDB_Operator in 'SourceCode\Unit\uDB_Operator.pas ',
uCardDlg in 'SourceCode\Dialog\uCardDlg.pas ' {CardDlg},
uHourseDB in 'SourceCode\Unit\uHourseDB.pas ',
uGuestDB in 'SourceCode\Unit\uGuestDB.pas ',
uCommon in 'SourceCode\Unit\uCommon.pas ',
uGuestHourseDB in 'SourceCode\Unit\uGuestHourseDB.pas ',
uCheckGoods in 'SourceCode\uCheckGoods.pas ' {CheckGoods},
uGoodsDB in 'SourceCode\Unit\uGoodsDB.pas ',
uGoodsKeepingDB in 'SourceCode\Unit\uGoodsKeepingDB.pas ',
uRetakeGoods in 'SourceCode\uRetakeGoods.pas ' {RetakeGoods},
uCardDB in 'SourceCode\Unit\uCardDB.pas ';
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TMain, Main);
Application.CreateForm(TLogon, logon);
if( logon.ShowModal = mrOk ) then
begin
Application.Run;
end;
end.
[解决办法]
我不是美女,也不知道厕所在哪里
[解决办法]
1）可以问环卫工人
2）可以问交警或者协警或者城管
3）可以到处找WC的牌子
4）可以去商场，紧急时也可以去超市
5）可以去机关的办事场所
6）楼下的补充......
[解决办法]
我是女的。。。
但不是美女。。。
我不知道厕所在哪。。。
[解决办法]
看来这里美女很少，这问题也难有答案了......
[解决办法]
Application.Initialize;
Application.CreateForm(TLogon, logon);
if( logon.ShowModal = mrOk ) then
begin
Application.CreateForm(TMain, Main);
Application.Run;
end;
[解决办法]
这个与环境有关吧!
你在每一,二,三个机子上没问题,第四个机子有问题,就说明什么啊
[解决办法]
7）可以去医院
8）可以去酒店
9）可以去没人的地方……
10）可以找些爷们帮你挡一下
11）楼下继续补充
[解决办法]
以身相许并无不可，不过前提你必须是个美女
[解决办法]
可以去没人的地方，哈哈
[解决办法]
Application.Initialize;
Application.CreateForm(TLogon, logon);
if( logon.ShowModal = mrOk ) then
Application.CreateForm(TMain, Main)
else
logon.Close;
Application.Run;
[解决办法]
Application.Initialize;
Application.CreateForm(TLogon, logon); //第一个做CreateForm做为主窗体
if( logon.ShowModal = mrOk ) then //就算mrOK了
Application.CreateForm(TMain, Main)
else
logon.Close;
Application.Run; //RUN之后显示的窗体还是logon而不是Main
所以这样反倒是改得更错了!
[解决办法]
以身相许并无不可，不过前提你必须是个美女
Application.Initialize;
logon:=TLogon.create;
try
if( logon.ShowModal = mrOk ) then
begin
Application.CreateForm(TMain, Main);
Application.Run;
end
else
Application.Terminate;
finally
Logon.free;
end;
最好是单步调试一下出问题的pc，看看那里出错
[解决办法]
通常答案是：出了门往右。。。
[解决办法]
ctrl+F8 说说你的系统分别是什么系统
[解决办法]
12）可以去一個電線竿下。
13）還可以找一個樹下。
14）可以去草叢裡。
15）可以找個礦泉水瓶子裝一下。
16）楼下继续补充
[解决办法]
17)找个橡皮巾
18)找个热水瓶塞
19)找部A片
20)下面的接
[解决办法]
顶lihuimin622的 18) 找个热水瓶塞
你太淫荡了
[解决办法]
21)在你家厨房里
22)下楼接
[解决办法]
主从窗体设计的程序用这种方法有这种情况出现
[解决办法]
22)你张开嘴巴就行了
23)楼下补充
[解决办法]
25)尼龙袋装一下
底下继续补充
[解决办法]
28)if 你=男的 then
厕所:=女厕旁边
else if 你=女的 then
厕所:=男厕旁边;
楼下继续...
[解决办法]
和delphi有关？会不会是和你的编译环境有关啊
[解决办法]
和delphi环境有关？呵呵。
拉一泡走人
[解决办法]
什么跟什么啊真是，好好问问题不就得了，！·#￥#￥%#￥%……%*%—（#￥%#￥%·！·#·！#
[解决办法]
强烈建议回归自然
[解决办法]
在麦当劳
[解决办法]
出门左拐100米
[解决办法]
男厕在左
女厕在右
[解决办法]
什么意思啊?到底是问程序还是问厕所?晕!
[解决办法]
男厕在左
女厕在右
出门右拐100米
[解决办法]
写个循环问全世界的人。。。。。
[解决办法]
while 厕所.notFound do
begin
lz.问下一个;
end;
[解决办法]
打劫,都举起手来,男的站左边,女的站右边;
你,说你呢,别看了,就是你,你站中间;
[解决办法]
厕所在一楼, 路过拉屎!!!!!!!
[解决办法]
楼主不厚道...大家都在找厕所了...
直接抬腿吧~~
-_-
不好意思,俺也没看下你的程序
[解决办法]
while 厕所.notFound do
begin
lz.问下一个;
end;
[解决办法]
begin
Application.Initialize;
with TLogon.Create(nil) do
begin
if ShowModal=mrOK then
begin
Free;
Application.CreateForm(TMain);
end
else
begin
Free;
Application.Termiter; //?? 似乎是这样写吧,哎~
end;
end;
Application.Run;
end;
[解决办法]
乱套了，把分给我好了。
[解决办法]
Begin
Application.Initialize;
Login:=TLogin.Create(Application);
IF Not(Login.ShowModal=1) THEN Exit; //没有登录则不运行程序
Application.CreateForm(TMAIN, MAIN);
Application.Run;
End;
[解决办法]
我的delphi7遇到问题一样，四处找解决办法未果，后彻底卸载重新安装，问题搞定：（
[解决办法]
另，这毛病跟程序代码好像根本没关系，大家都还在厕所呢吧;-0
------解决方案--------------------
跟着KFC大哥的广告走，＂哪里有鱼＂，所以有鱼的地方就有你要的厕所
估计和你的ide有关系，甚至机器．我同事碰上过delphi按f9就出cpu窗口，重装系统都没搞定，最后还是把机器换了．
[解决办法]
终于找到了
[解决办法]
是不是装了最新的杀毒软件呀
可能存在与DELPHI相冲突的软件呢
比如说:瑞星升级之后会出现这样的问题
比如说:不相识的男女不能同时共用一个厕所
[解决办法]
餐馆，饭店，商场，洗浴中心，ktv，快餐店，公共厕所，家里卫生间。。。。。。。
[解决办法]
找个没人的地方...
[解决办法]
我的家里有一个厕所,你走进我家的大门直走,大约走35米看见一个红绿灯路口向左拐,再直走50米,TURN RIGHT,GO 100米,想左看,你会看见有两个大门,一个是女厕,一个是男厕..不过你最好是晚上12点过来才来,因为之前的话那里都是排满了长龙
[解决办法]
啊，厕所里这么热闹啊！
[解决办法]
操作系统是厕所，你可以用了。
