Delphi: How to set the default project in a project group?

我是研究僧i 提交于 2019-12-11 03:41:53

问题


i have two projects in a project group:

  • ProjectA
  • ProjectB

Whenever i open the ProjectGroup.bpg in Delphi, it always starts with the 2nd project as the active one:

  • ProjectA
  • ProjectB

And every time i have to flip it to the the "real" project:

  • ProjectA
  • ProjectB

How can i make ProjectA the default project that opens with the project group?


ProjectGroup.bpg

#------------------------------------------------------------------------------
VERSION = BWS.01
#------------------------------------------------------------------------------
!ifndef ROOT
ROOT = $(MAKEDIR)\..
!endif
#------------------------------------------------------------------------------
MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
DCC = $(ROOT)\bin\dcc32.exe $**
BRCC = $(ROOT)\bin\brcc32.exe $**
#------------------------------------------------------------------------------
PROJECTS = ProjectA.exe ProjectB.exe
#------------------------------------------------------------------------------
default: $(PROJECTS)
#------------------------------------------------------------------------------

ProjectA.exe: ProjectA.dpr
  $(DCC)

ProjectB.exe: childfolder\ProjectB.dpr
  $(DCC)

See DUnit: How to run unit tests for the practical reason.


回答1:


Far from ideal but the only way I know is like

  1. in the Delphi IDE, right click your default project in the Project Manager and select Build Later.
  2. or Switch the lines for Project A and Project B in the .bpg file.



回答2:


You might have a stuck desktop settings file. Look for a .DSK file associated with your project group, and delete it.




回答3:


In Delphi 7 (and I presume later also) you can select the 'active' project in the project group tree by double-clicking it. If you then do 'Save Project Group As' by right clicking the top of the project tree, the active project is saved with the group and will open at that when you next open the project group.




回答4:


Place file ProjectGroup.dsk in project folder with text:

[ActiveProject]
ActiveProject=1

or set check to TRUE in Environment Options -> Preferences -> Autosave Options -> Project Desktop, this will create DSK files for projects and groups automatic!



来源:https://stackoverflow.com/questions/2508703/delphi-how-to-set-the-default-project-in-a-project-group

易学教程内所有资源均来自网络或用户发布的内容,如有违反法律规定的内容欢迎反馈
该文章没有解决你所遇到的问题?点击提问,说说你的问题,让更多的人一起探讨吧!