首页 > 代码库 > uniGUI试用笔记(三)
uniGUI试用笔记(三)
uniGUI下的MessageDlg使用发生了变化,最大的特点是:
1、成为了uniGUIForm的成员函数;
2、变成过程(procedure)了,也就是没有返回值了,使得程序不再具有线程阻塞性。
3、增加了一个传入回调函数的参数:callBack : TuniDialogCallbackAnonProc,该类型定义在uniGUIDialogs单元中:
TuniDialogCallbackAnonProc = procedure (Sender : TComponent; Res : Integer);
其中Res等同于返回的结果,其对应关系是:
mrYES = IDYES
mrNo = IDNO
以此类推
由于MessageDlg不再具有线程阻塞性,所以必须在回调函数中对返回结果进行处理,这样一来处理流程就相对麻烦多了。原来的语句是:
if MessageDlg(...) = IDYES then
...
现在必须先定义回调函数
procedure MsgDlgCallBack(Sender: TComponent; Res: Integer);
begin
....
end;
再进行调用:
MessageDlg( ..., btnCancelDlgCallBack);
总之,处理思路和流程不一样了,要小心。
uniGUI试用笔记(三)
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。