procedure TPosInput1.LMDAssistPage1NextPage(Sender: TObject;
var Cancel: Boolean);
begin
if (RadioButton1.Checked = true) then
ShowMessage('test1')
else if (RadioButton2.Checked = true) then
ShowMessage('test2')
else
ShowMessage('请选择你要的'); // 想办法不要进入下一个页面
end;如果没有选择RadioButton,那我就不想进入下一个页面,但是目前找不到相关方法,麻烦各位指点一下,谢谢!!
var Cancel: Boolean);
begin
if (RadioButton1.Checked = true) then
ShowMessage('test1')
else if (RadioButton2.Checked = true) then
ShowMessage('test2')
else
ShowMessage('请选择你要的'); // 想办法不要进入下一个页面
end;如果没有选择RadioButton,那我就不想进入下一个页面,但是目前找不到相关方法,麻烦各位指点一下,谢谢!!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货