----- Original Message ----- 
From: "Gall" <gall@tu.tusur.ru>
To: <kaev@yandex.ru>
Sent: Thursday, July 04, 2002 6:05 PM
Subject: my project build number

Здравствуйте, Артём!
Вопрос по IDE, никто мне
на него ответить не смог до сих пор :(...
 
 ВОПРОС: какие настройки IDE нужны,
 чтобы при каждом построении программы номер её билда автоматически
 увеличивался?

Таких настроек в IDE я не знаю (но чем черт не шутит, может есть), а пока вопрос решается с пользованием макросов. Один из примеров приведен в шаге "Шаг 239 - Использование макросов IDE". Сначала создадим макрос, который просто все сохраняет и запускает сборку проекта.

Sub Test()
	Documents.SaveAll True
	ExecuteCommand "BuildToggleBuild"
End Sub

Теперь нам нужно добраться до ресурсов, сначала узнать имя rc файла.

Sub Test()
	DIM resourceName 
	Documents.SaveAll True

	resourceName = application.activeproject & ".rc"
	msgbox resourceName

	Documents.SaveAll True
	ExecuteCommand "BuildToggleBuild"
End Sub

А вот результат, вроде все нормально:

Теперь нужно этот файл отрыть, сразу и закром с сохранением.

Sub Test()
	DIM resourceName 
	DIM resourceFile
	Documents.SaveAll True
	
	resourceName = application.activeproject & ".rc"
	set resourceFile = Documents.Open(resourceName, "Text")
	resourceFile.Close dsSaveChangesYes

	Documents.SaveAll True
	ExecuteCommand "BuildToggleBuild"
End Sub

Найдем теперь строку с версией файла. Которая по факту есть в ресурсах (AppWizard создает).

Будем искать по слову FileVersion

Sub Test()

	DIM resourceName 
	DIM resourceFile
	DIM buldNumber
	Documents.SaveAll True

	resourceName = application.activeproject & ".rc"
	set resourceFile = Documents.Open(resourceName, "Text")
	resourceFile.Selection.FindText "FILEVERSION", dsMatchCase

	buldNumber = resourceFile.Selection

	msgbox buldNumber
	resourceFile.Close dsSaveChangesYes

	Documents.SaveAll True
	ExecuteCommand "BuildToggleBuild"
End Sub

Вот находим: