调用问题

shserver

procedure TDDJDB.TabSheet1Show(Sender: TObject);
begin
  RabRK.Caption :='毛坯入库操作';
  RabCK.Caption := '毛坯出库操作';
  SpeedButton1Click(nil);
  Forms.Application.MessageBox('111','',64);
end;

为什么  Forms.Application.MessageBox('111','',64);执行了，
  SpeedButton1Click(nil);没有执行呢，

amao800613

打个断点跟踪一下不就行了！F5打断点，F7跟踪一下！