关于消息的问题，请高手解答！

2004-05-08 09:36:42 137 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

现代密码学5.3--Hash and MAC 现代密码学5.3--Hash and MAC 博主正在学习INTRODUCTION TO MODERN CRYPTOGRAPHY (Second Edition) --Jonathan Katz, Yehuda Lindell，做一些笔记供自己回忆，如有错误请指正。整理成一个系列现代密码学，方便检索。第二章定义了完美安全及其对应的密码方案“一次一密”，第三章介绍了多种安全定义 3.1-3.3 计算安全，PRG和基于PRG构造的满足计算安全的密码方案； 3.4-3.5 CPA安全，PRF和基于PRF构阅读详情

一个窗体，我点叉叉键关闭和右键单击任务栏关闭，所触发的消息难道不一样吗？？
前一种情况我用WM_CLOSE能处理到，可是后一种就不知道了！而且我用一个消息处理方法来处理WM_CLOSE的时候，老是提示栈溢出，我搞不懂！我怎样才能把上述两个消息都处理到而不出错呢？

...全文

嵌入式SPI总线抽象设计：跨平台驱动与分层解耦实践 SPI（串行外设接口）是嵌入式系统中应用最广泛的同步串行通信协议，其核心价值在于高吞吐、低开销与硬件简洁性。其工作原理基于主从架构、全双工/半双工时序及片选（CS）控制，依赖CPOL/CPHA组合定义四种标准模式。在工程实践中，SPI常面临硬件资源受限、多外设共用总线、MCU平台迁移等挑战，导致驱动复用率低、维护成本高。通过结构体+函数指针实现的分层抽象——将物理总线、协议适配与设备驱动解耦，可显著提升代码可移植性与扩展性。该方法天然支持硬件SPI与GPIO模拟SPI双模式切换，并已在STM32等主流MCU 阅读详情

RosinXia

Delphi 5,944 成员 262,941 内容

+ 关注 + 加入社区

切换为时间正序

hydonlee 2004-05-08

打赏
举报

重要的是, 这样两个消息的处理过程是不一样的.
一个发送向Application, 而一个是发向Form...

可以通过对Application的消息处理实现 .

楚人无衣 2004-05-08

打赏
举报

private
{ Private declarations }
procedure WMSysCommanda(var Msg: TMsg; var Handled: Boolean);
...

procedure TfrmFir.FormCreate(Sender: TObject);
begin
Application.OnMessage := WMSysCommanda;
...
end;
...
procedure TfrmFir.WMSysCommanda(var Msg: TMsg; var Handled: Boolean);
begin
if Msg.wParam = SC_CLOSE then
begin
if Application.MessageBox('你要退出吗？', '确定', MB_OKCANCEL + MB_ICONERROR) = idok then
Inherited
else
Abort;
end;
end;

RosinXia 2004-05-08

打赏
举报

我是否应该在窗口过程里做这些工作，而不是在消息方法里？

yongxin800 2004-05-08

打赏
举报

procedure TForm1.WMSYSCOMMAND(var Msg: TWMSYSCOMMAND);
begin
if Msg.wParam = SC_CLOSE then
begin
if Application.MessageBox('你要退出吗？', '确定', MB_OKCANCEL + MB_ICONERROR) = idok then
Inherited
else
Abort;
end;
end;

RosinXia 2004-05-08

打赏
举报

怎么没有人了啊？？

RosinXia 2004-05-08

打赏
举报

我改成这样也不行啊！哪里错了？
procedure TForm1.WMSYSCOMMAND(var Msg: TWMSYSCOMMAND);
begin
if Msg.Msg = SC_CLOSE then
begin
if Application.MessageBox('你要退出吗？', '确定', MB_OKCANCEL + MB_ICONERROR) = idok then
Inherited
else
Abort;
end;
end;

RosinXia 2004-05-08

打赏
举报

hch_45(HCH ~ahong.net~)高手的意思我懂，但是由于某些特殊情况，我必须得用消息得方法来处理！

hch_45 2004-05-08

打赏
举报

你可以在FormCloseQuery事件中加入

if Application.MessageBox('你要退出吗？', '确定', MB_OKCANCEL + MB_ICONERROR) = IDOK then
CanClose := true
else
CanClose := false;

juliens 2004-05-08

打赏
举报

咦，我们两个的绰号相同么，哈哈，有缘有缘！

hch_45 2004-05-08

打赏
举报

应该是处理
WM_SYSCOMMAND

当wParam = SC_CLOSE

就是窗口关闭

juliens 2004-05-08

打赏
举报

帮你顶！

RosinXia 2004-05-08

打赏
举报

初步代码如下：
if Application.MessageBox('你要退出吗？', '确定', MB_OKCANCEL + MB_ICONERROR) = IDOK then
Inherited
else
Abort;

RosinXia 2004-05-08

打赏
举报

问题还是没有解决，关键怎么会发生栈溢出错误呢？？兄弟们，顶顶啊，分不够可以加的！

关于消息的问题，请高手解答！

相关推荐