【结帖】[请求]请问x3有没有ShowMessage之类的东西？**

danielduan123

请问x3有没有ShowMessage之类的东西？如
procedure TMainForm.Button4Click(Sender: TObject);
begin
ShowMessage('hello world');
end;
[错误]Biz:XSGLXTXSDDDDSQ.FUNC.DIRMainForm.Form.pas(53, 2): Undeclared identifier "ShowMessage"
若有类似的调试时就方便些，比如我想打印出显示出目前某个业务参数的值等。

另外一个问题：我有两个窗体,申请主窗体，审批功能下审批主窗体(审批窗体继承申请窗体)，但是审批窗体设计时增加了button4

danielduan123

但是审批窗体运行结果，还是和申请的窗体界面一样，没有我想要的button4!
请问这样需求该如何解决？

zfang

有啊，比如
  Business.Forms.jsDialogs('','');

zfang

对于问题2，功能是继承的吗？
如果是，请检查功能的主窗体设置是否正确！

birdzh

Dialogs.MessageDlg('123456',TMsgDlgType.mtConfirmation,     [TMsgDlgBtn.mbYes,TMsgDlgBtn.mbNo],0)

danielduan123

谢谢！成功了。