本人写了以下这段代码:
function TPSCS170.ConfirmSave(ButtonCount: integer): Boolean;
var
  CanClose: Boolean;
  Answer  : Integer;
begin
  with dmPSCS170 do
  begin
    if Modified then
    begin
      if ButtonCount = 2 then
        Answer:=DoSaveClick
      else
        Answer:=DoCloseClick;      case Answer of
        IDYES:
          begin
            Save;
            CanClose := True;
          end;
        IDNO:
          begin
            CanClose := True;
            if tblBreakingLine.Database.InTransaction then
              tblBreakingLine.Database.Rollback;
            if V_No_Inner_Label = 'N' then
            begin
              if tblBreakingDetail.Database.InTransaction then
                tblBreakingDetail.Database.Rollback;
            end;
            dmPSCS170.ActiveOuterBox;
            dmPSCS170.ActiveInnerBox;
            dmPSCS170.Modified := False;
            sptnSave.Enabled := False;
          end;
        IDCANCEL:
          begin
            CanClose := False;
          end;
      end;      Result := CanClose;
    end;
  end;
end;由于没有写默认的返回值,它会默认返回一个布尔类型。
但是奇怪的是,我的机器上运行返回的是false,另外一台机器返回的是true。
大家知道是为什么么?