Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как установить RunParams в XE2 из эксперта (ToolsAPI)


ZeroDivide ©   (2011-12-13 14:00:00) 

var
 blalblabla: IOTAProject;

....

 blalblabla := GetActiveProject;
 blalblabla.ProjectOptions.Values['RunParams'] := ''; // - Не работает

// AV в CoreIDE160.bpl


ZeroDivide   (2011-12-13 14:03:00) [1]

Да blalblabla Assigned... ProjectOptions тоже...

перебор массива опций проекта возвращает опцию с именем RunParams, т.е.
blalblabla.ProjectOptions.GetOptionNames[n].Name

//А вот тут опять AV в CoreIDE160.bpl
blalblabla.ProjectOptions.Values[a.ProjectOptions.GetOptionNames[n].Name]


ZeroDivide   (2011-12-13 14:03:00) [2]

Да blalblabla Assigned... ProjectOptions тоже...

перебор массива опций проекта возвращает опцию с именем RunParams, т.е.
blalblabla.ProjectOptions.GetOptionNames[n].Name

//А вот тут опять AV в CoreIDE160.bpl
blalblabla.ProjectOptions.Values[blalblabla.ProjectOptions.GetOptionNames[n].Nam e]


Наверх

Титульная страница Поиск, карта сайта Написать письмо