S SoftBoy Unregistered / Unconfirmed GUEST, unregistred user! 2001-12-26 #2 if MessageDlg('Welcome to my Object Pascal application. ;Exit now?', ; ; mtConfirmation, [mbYes, mbNo], 0) = mrYes 这是按下“确定”, ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; =mrNO ;这是按下“取消” 。 根据返回值判断啊
if MessageDlg('Welcome to my Object Pascal application. ;Exit now?', ; ; mtConfirmation, [mbYes, mbNo], 0) = mrYes 这是按下“确定”, ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; =mrNO ;这是按下“取消” 。 根据返回值判断啊