Получение EnvironmentStrings среды.

← →
Rouse_ © (2009-03-25 17:24) [40]

> а паутина из даже не 500, а 50 модулей - натурально юзабельно.

Ну так там-же фильтруется все при выборе модуля из левого списка :)

Ладно, чего спорить-то, функционала у утилиты сейчас все равно сильно толкового нет, поэтому...

← →
atruhin © (2009-03-25 17:26) [41]

> [37] Rouse_ © (25.03.09 17:13)

Файлик отправил, вообще он из стандарной http://pngdelphi.sourceforge.net

← →
Игорь Шевченко © (2009-03-25 17:33) [42]

atruhin © (25.03.09 17:24) [39]

> 1. там довольно неудобное представление, по крайней мере
> я не нашел как вывести весь список используемых модулей.
>
> (если это возможно подскажите, а то у меня отображает только
> в виде дерева от модулей напрямую включенных в проект)

Во-первых, я этим экспертом не пользуюсь (потому как есть Icarus от Peganza)
Во-вторых, GExperts сейчас у меня не установлен - увы, помочь не могу, а устанавливать не хочу.

Rouse_ © (25.03.09 17:13) [37]

А какой, кстати, функционал планируется ?

Другими словами, зачем вы это делаете ? :)

← →
Rouse_ © (2009-03-25 17:34) [43]

> atruhin © (25.03.09 17:26) [41]

Угу посмотрел, падает на последней строчке:
//862fd5d6aa1a637203d9b08a3c0bcfb0
Он считает ее коментарием (что логично) и ищет конца строки (CRLF) которого нет...
ЗЫ: а вообще раньше на сколько я помню если писать коментарии после END. выводился ворнинг :)

← →
Rouse_ © (2009-03-25 17:39) [44]

> А какой, кстати, функционал планируется ?
>
> Другими словами, зачем вы это делаете ? :)

Пфф... Анализатор проекта который будет отображать взаимосвязи, искать ненужные (лишние) uses, показывать места в коде где именно применяется определенный модуль из юзесов.
Все это только для облегчения рефакторинга в сложных проектах...
Пока написан только каркас, но несмотря на это даже в таком виде этот каркас смог помочь нам более менее понять как надо рефакторить весь наш зоопарк.
Если придумать, как это сделать максимально юзабельно, то может что-то и публичное получиться.

← →
Rouse_ © (2009-03-25 17:42) [45]

Ах, ну да - все это хочется сделать таким образом чтобы перед глазами сразу выстраивалась четкая картинка на одном экране без лишней информации и не нужно было проходить через дебри данных пытаясь понять что к чему.

← →
Игорь Шевченко © (2009-03-25 17:47) [46]

Rouse_ © (25.03.09 17:39) [44]

> Анализатор проекта который будет отображать взаимосвязи,
> искать ненужные (лишние) uses, показывать места в коде
> где именно применяется определенный модуль из юзесов.
> Все это только для облегчения рефакторинга в сложных проектах.
> ..

Удачи. Лет через 5 вернемся к дискуссии

← →
atruhin © (2009-03-25 17:59) [47]

> [43] Rouse_ © (25.03.09 17:34)

Еще на одном файле, из этой же библиотеки спотыкается. Отправил.

> [42] Игорь Шевченко © (25.03.09 17:33)
> потому как есть Icarus от Peganza

Попробовал. Отработал нормально, нашел все модули, но как разбираться в этом файле, почти 600 кб.?
Каждый модуль искать поиском, смотреть и искать опять? Ни перекресных ссылок, ни фильтрации. :(
А так, при нужде, хороший продукт, формировал бы еще html с гиперссылками.

← →
Игорь Шевченко © (2009-03-25 18:02) [48]

atruhin © (25.03.09 17:59) [47]

> формировал бы еще html с гиперссылками.

вроде формирует. Вроде можно в его простыню мышью тыкать и произойдет переход.

← →
Palladin © (2009-03-25 18:04) [49]

> Удачи. Лет через 5 вернемся к дискуссии

Записал себе в календарь на смарте :)

> atruhin © (25.03.09 17:59) [47]
>
> > [43] Rouse_ © (25.03.09 17:34)
>
> Еще на одном файле, из этой же библиотеки спотыкается. Отправил.
>

Угу, спасибо...
Тут сам файл с ошибкой: 329-ая строка...
Одна кавычка.
EPNGCannotAssignChunkText = Koљcki morajo biti med seboj kompatibilni za prireditev vrednosti.";

небольшой оффтоп, раз уже про png заговорили.
кто знает, как с помощью стандартного TPngImage сохранить картинку в формате png-8?

> Riply © (23.03.09 09:32)

> Т.е. нам надо получить как значения данных переменных, так
> и их имена (например BDSUSERDIR).

Одну из загадок разгадать можно: byDelphi help: Search|Find in Files:
To search for files in the product root directory, use $(DELPHI) to specify the
directory. For example, to search all the include files, use $(DELPHI)\include;
to search the examples directories, use $(DELPHI)\demos\*.pas.

Ну, это, ясное дело, речь про BDS :)

--
Regards, LVT.

> [52] Leonid Troyanovsky © (26.03.09 20:36)
> Ну, это, ясное дело, речь про BDS :)

Я тож такой магический кристал хочу :)
$(DELPHI) осталось неизменной во всех версиях (Delphi7, Turbo, 2006, 2007, 2009),
даже в тех, где она(переменная) не используется :)
Соответственно, может служить индикатором.

Если кому интересно:
Задачка решилась следующим образом:
Запускаем среду в суспендед режиме.
Добавляем APC процедурку, в котрой подгружаем библиотекку, перехватывающую RtlSetEnvironmentVariable.
Резьюмим процесс.
Ждем добавления в блок окружения $(DELPHI) и активизируем Event окончания работы.
Во всех версиях, в этот момент блок переменных уже полностью сформирован.
Вытаскиваем его и наслаждаемся жизнью :)

Получение EnvironmentStrings среды. Найти похожие ветки