В общем обо все по порядку:

Вот моя сборка файлов ints может кому пригодится. Что там есть:
1. 1C Предприятие (какое состояние я не могу сказать, но наполненность вполне нормальная)
2. 1sqlite (версия 1.0.1.8)
3. FormEx (2.0.5.91)
4. icpp (3.0.1.9)
5. TableDoc (0.1.0.23)
и прочее в виде ints по АктивИкс-ам и некоторым другим ВК (см. Прочее и соответствующие АктивИкс-у папки)

Артур (artbear)... есть очень большая просьа прошу обратить внимание...
Не очень удобно что intell не умеет читать файлы ints никоим другим образом кроме как сплошным методом или в папке 1С++ (где КОПы лежат)... а хочется чтобы он прочитывал файлы и по папкам разложенные.
Пусть у нас будет ограничение на вложенность (скажем не более одного уровня) но очень надо.
Надеюсь что на скорости работы интелл-а это не отразится. А складывать их таким образом гораздон удобнее. 

А для vtools есть?

vandalsvq писал(а) 07. Ноября 2012 :: 16:16:

Да я уже сделал. он махонький.
Мне система понравилась, возможно буду ковырять.

vandalsvq писал(а) 15. Июля 2008 :: 06:12:

Не прошло и 10 лет.

'::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
' сначала ищем в папке Intell, а уже затем в папке Intell\1С++
Private Function GetIntsFilePath(FileNameWithoutExtension)
	Dim FileName
	GetIntsFilePath = ""

	FileName = DataDir & "\" & FileNameWithoutExtension & ".ints"
	if not FSO.FileExists(FileName) then FileName = Get1CppIntsFolder & "\" & FileNameWithoutExtension + ".ints"
	if not FSO.FileExists(FileName) then
		FileName = ""
		Set FolderInts = FSO.GetFolder(DataDir)
		for each sFolders In FolderInts.SubFolders
			tPath = sFolders.Path & "\" & FileNameWithoutExtension + ".ints"
			if FSO.FileExists(tPath) then
				FileName = tPath
				exit for
			End if
		Next
	End If
	if not FSO.FileExists(FileName) then Exit Function

  GetIntsFilePath = FileName
End Function