delphi7 & delphi56的区别，最后的105分(50分)

linuxlover · 2003-04-19

运行：
Begin

with Application do
begin
NormalizeTopMosts;
MessageBox('This should be on top.', 'Look', [smbOK]);
RestoreTopMosts;
end;
end;

这是7中的帮助，你丫，能行吗？
这是为什么，好像大部分都这样子，那位介绍7、6、5的不同看看

linuxlover · 2003-04-19

能详细解说7中messagebox的用法吗,包括按钮的定义等？我想看看到底那儿不同，
你丫，痛苦几天啦

小笨苯 · 2003-04-19

MessageBox:
格式:
int MessageBox(
HWND hWnd, // handle of owner window
LPCTSTR lpText, // address of text in message box
LPCTSTR lpCaption, // address of title of message box
UINT uType // style of message box
);
参数:
hWnd 是父窗体的句柄,为NULL时,表示无父窗体
lpText 是警告的内容
lpCaption 是标题
uType 按钮及图标

按钮:
MB_ABORTRETRYIGNORE, MB_OK, MB_OKCANCEL, MB_RETRYCANCEL, MB_YESNO,
MB_YESNOCANCEL

图标:
MB_ICONEXCLAMATION, 黄底黑字 !
MB_ICONWARNING

MB_ICONINFORMATION, 白底蓝字 i
MB_ICONASTERISK

MB_ICONQUESTION 白底蓝字 ?

MB_ICONSTOP, 红底白字 x
MB_ICONERROR,
MB_ICONHAND

例:
MessageBox(Handle,PChar('打开或建立系统日志文件错误！'),PChar('电话监控'),MB_YESNOCANCEL or MB_ICONSTOP);

另外，NormalizeTopMosts，这是什么函数呀？我在新版的MSDN中都没找到！

linuxlover · 2003-04-19

我也不知道，照搬帮助！

linuxlover · 2003-04-19

messagebox用之前需要定义吗？

晴天太岁 · 2003-04-19

光是messagebox吗，好象不用定义，默认包扩windows单元，其的第一个参数不是本程序的
弹出的对话框关闭的图标不可用

linuxlover · 2003-04-19

通过检测，哈
var
ReturnBtn : TMessageButton;
begin
ReturnBtn :=Application.MessageBox('File has been modified.Save it?','Warning',[smbYes,
smbNo,smbCancel],smsWarning,smbYes,smbCancel)

这个错在哪儿？提示TMessageButton没有定义，begin后面语句参数过多

linuxlover · 2003-04-19

ReturnBtn := MessageBox(Handle,PChar('打开或建立系统日志文件错误！'),
PChar('电话监控'),MB_YESNOCANCEL or MB_ICONSTOP);

ReturnBtn := MessageDlg('File has been modified.Save it now?',
mtConfirmation, [mbYes, mbNo,mbCancel], 0);

一样！对了，本来可以结帐了，不过还想讨论这个：
var
ReturnBtn : TMessageButton;
begin
ReturnBtn :=Application.MessageBox('File has been modified.Save it?','Warning',[smbYes,
smbNo,smbCancel],smsWarning,smbYes,smbCancel)

这个错在哪儿？提示TMessageButton没有定义，begin后面语句参数过多

麻烦支持！马上给分拉

linuxlover · 2003-04-19

没办法啦，结账！

小笨苯 · 2003-04-19

什么没办法？？？
你不就是想要判断用户在提示窗口中到底按下了哪个按钮吗？比如：按下了“确定”按钮，
是这个意思吧？
我先不说，你自己好好想想,一会我再说[

]

linuxlover · 2003-04-19

其实，这是kylix3的一个语句，我搬过来，是想怎么修改，却发现有很多不同，所以想弄个明白
csdn有人说TMessageButton系统没有，如果要定义，我不知道定义为何种类型
昨天用ReturnBtn := MessageDlg('File has been modified.Save it now?',
mtConfirmation, [mbYes, mbNo,mbCancel], 0);替代成功，但是不知道区别在哪儿

linuxlover · 2003-04-19

定义为Integer可以

satanmonkey · 2003-04-19

7能写.net ide是xp风格的，换了一写包，加了些包。
就这么多

linuxlover · 2003-04-19

[mbYes,mbNo,mbCancel],smsWarning,smbYes,smbCancel
提示Integer 和 set矛盾！

delphi7 & delphi56的区别，最后的105分(50分)

linuxlover

Unregistered / Unconfirmed

linuxlover

Unregistered / Unconfirmed

小笨苯

Unregistered / Unconfirmed

linuxlover

Unregistered / Unconfirmed

linuxlover

Unregistered / Unconfirmed

晴天太岁

Unregistered / Unconfirmed

linuxlover

Unregistered / Unconfirmed

linuxlover

Unregistered / Unconfirmed

linuxlover

Unregistered / Unconfirmed

小笨苯

Unregistered / Unconfirmed

linuxlover

Unregistered / Unconfirmed

linuxlover

Unregistered / Unconfirmed

satanmonkey

Unregistered / Unconfirmed

linuxlover

Unregistered / Unconfirmed

Similar threads