messagebox问题,急救!!!!!! if MessageBox('确实要删除吗?', '管统系统',MB_OKCANCEL) = mrOK then ...... 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 with Application do begin NormalizeTopMosts; if MessageBox('确实要删除吗?', '管统系统',MB_OKCANCEL)=MB_OK then RestoreTopMosts; sorry!应该是:if MessageBox('确实要删除吗?', '管统系统',MB_OKCANCEL)=IDOK then with Application do begin NormalizeTopMosts; if MessageBox('确实要删除吗?', '管统系统',MB_OKCANCEL)=1 then RestoreTopMosts;end; 你去试试看吧 with Application do begin NormalizeTopMosts; if MessageBox('确实要删除吗?', '管统系统',MB_OKCANCEL)=mrok then RestoreTopMosts;end; 就用api原生的messageboxif messagebox(handle,'确实要删除吗?','管理系统',mb_okcancel)=mrok then RestoreTopMosts;绝对OK,我经常用的 刚学习delphi,遇到一个DBGridEh显示和保存信息的问题,请各位帮忙解决。。。 图片存入数据库的问题!高分求教!UP有分! DBGrid数据显示问题,在钱等急急 关于Tobject的参数 再送100! Formula one6.0汉化问题? 用了多年VB的人用Delphi写的程序,欢迎测试 散分贴 关于制作密码form问题,大家帮帮忙 各位高手,ADOQUERY控件的COMMANDTIMEOUT如何设置?????此属性不可用普通方法改变。 三个小问题,涉及几个方面。有难的也有简单的。来看看吧, 有几个的确是很简单的。 今天下午不能交出来程序,我就走人了 隐藏程序的方法
begin
NormalizeTopMosts;
if MessageBox('确实要删除吗?', '管统系统',MB_OKCANCEL)=MB_OK then
RestoreTopMosts;
应该是:
if MessageBox('确实要删除吗?', '管统系统',MB_OKCANCEL)=IDOK then
NormalizeTopMosts;
if MessageBox('确实要删除吗?', '管统系统',MB_OKCANCEL)=1 then
RestoreTopMosts;
end; 你去试试看吧
NormalizeTopMosts;
if MessageBox('确实要删除吗?', '管统系统',MB_OKCANCEL)=mrok then
RestoreTopMosts;
end;
if messagebox(handle,'确实要删除吗?','管理系统',mb_okcancel)=mrok then
RestoreTopMosts;
绝对OK,我经常用的