set_alert_property('save_alert',title,'询问');
set_alert_property('save_alert',alert_message_text,'确定要保存配方信息?');
set_alert_button_property('save_alert',alert_button1,label,'是(Y)');
set_alert_button_property('save_alert',alert_button2,label,'否(N)');
I:=show_alert('save_alert');
if I=alert_button1 then