窗口中OK和CANCEL键的问题

Question

分别写这两个Button 的 OnClick 事件。在其中写上你要进行的处理。

Answer 1

在窗口类中设置一个private中的数据类型，存贮你用的信息，然后任何对象或者窗体本身就可以读取了，你是这个意思吗？

Answer 2

Result := mrOK; //OKResult := mrCancel; //Cancel

Answer 3

设置ModalResult，这样XXX:= ShowModal就可以取到了。附Delphi预定义的：
Constant Value
mrNone 0
mrOk idOK
mrCancel idCancel
mrAbort idAbort
mrRetry idRetry
mrIgnore idIgnore
mrYes idYes
mrNo idNo
mrAll mrNo + 1