【搞定】我这段代码应该用什么样的命名空间**

jacobpro

procedure TMainForm.FileSaveAs(Sender: TObject);
begin
   if SaveDialog.Execute then
   begin
      if FileExists(SaveDialog.FileName) then
        if MessageDlg(Format(sOverWrite, [SaveDialog.FileName]),
          mtConfirmation, mbYesNoCancel, 0) <> idYes then Exit;
      Editor.Lines.SaveToFile(SaveDialog.FileName);
      SetFileName(SaveDialog.FileName);
   end;
end;




uses
  Business.System, Business.Model, Business.Forms, Business.Data,
  Business.Model.org, GGCTK, CommonFunctionLib;
好像不够用。提示不能识别。。。


请指教~ :1eye:

alang

编译上述代码，编译出错的地方，到studioHelp中找所在的名空间就可以了

jacobpro

结帖