我有这样的一个问题，我想在CPU想煎鸡蛋，但是又没有锅子，如果要没有锅子的情况下，让风扇吹者煎好一盘鸡蛋；
另外的一个问题就是如何做一个如厕管理软件，对来人进行分辨，男的就把马桶打开，女的就把马桶关上，不男不女的就把门反锁，还能提前辨别来人的大小便情况，包括只小便，只大便，又大便，又小便，本来想便却又不想便的情况，以及对来人的方便情况进行收费，对本想便结果没有便的只收半费；还可根据来人方便的分量进行收费，另外还要加入保险功能，如果来人在方便的途中受伤，受到意外的人身损害，将根据收费的保险情况进行赔偿；最重要的是财务功能，根据便便的收费情况、马桶的销售量进行成本核算，计算毛利润、除去利税的纯利润、自动进行税务、工资、工资税核算，以及便便量与收入量、税收量的比例关系， 并能够预测如厕人数的增涨、及升级接口。请大家集中精神，广泛思所，在下不胜感激，谢谢。
另外的一个问题就是如何做一个如厕管理软件，对来人进行分辨，男的就把马桶打开，女的就把马桶关上，不男不女的就把门反锁，还能提前辨别来人的大小便情况，包括只小便，只大便，又大便，又小便，本来想便却又不想便的情况，以及对来人的方便情况进行收费，对本想便结果没有便的只收半费；还可根据来人方便的分量进行收费，另外还要加入保险功能，如果来人在方便的途中受伤，受到意外的人身损害，将根据收费的保险情况进行赔偿；最重要的是财务功能，根据便便的收费情况、马桶的销售量进行成本核算，计算毛利润、除去利税的纯利润、自动进行税务、工资、工资税核算，以及便便量与收入量、税收量的比例关系， 并能够预测如厕人数的增涨、及升级接口。请大家集中精神，广泛思所，在下不胜感激，谢谢。
var
CPU: TCPU;
begin
Result := Assigned(Egg);
if not Result then
ShowMessage('Egg不是一个鸡蛋。' )
else if Egg.IsMature then
ShowMessage('Egg已经熟透。' )
else begin
Result := Assigned(GetCurrentFan); //API函数
if not Result then
ShowMessage('本机没有安装风扇。' )
else begin
CPU := GetCurrentCPU; //API函数
while not Egg.IsMature do
try
CPU.WorkHarder;
except
Result := False;
ShowMessage('CPU已经被烧坏。' )
end;
Result := True;
end;
end;
end;第二个问题太麻烦了，不作了。—————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
—————————————————————————————————