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

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

Application.Title := Const [D7]


Molchanov ©   (2009-11-27 12:18:00) 

Господа Мастера!
Очень хочется иметь заголовок приложения в виде строковой константы в одном из юнитов приложения. Этот заголовок используется во многих местах (Application.Title, Caption одной из форм, Caption'ы MessageBox, About,...). Если я вставляю в dpr в строку присваивания константу, описанную в interface Unit1.pas:

program Project1;
uses
 Forms,
 Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
 Application.Initialize;
 Application.Title := ProgTitle;  // Borland does not like
 Application.CreateForm(TForm1, Form1);
 Application.Run;
end.

то Borland гасит кнопки Run,Pause,Trace,..
Проект при этом компилится, exe работает адекватно.
При попытке закрыть закладку с кодом dpr кричит:
 Error in Project1: Call to Application.CreateForm is missing or incorrect.
Если сохранить - проект больше не открывается.
Я перетащил строки
 Application.Initialize;
 Application.Title := ProgTitle;
из dpr в initialization главной формы, все работает OK, но это решение мне не нравится, а другого не нашел.
Что посоветуете?


Amoeba   (2009-11-27 12:30:00) [1]

Автору вопроса читать как раз по сабжу:
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=765


Anatoly Podgoretsky   (2009-11-27 12:25:00) [2]

А вот и ссылка из справки.

> Caution: Because the project file is maintained internally,
>  you should not modify it manually. You can change the project
> file by using the Project Manager. Doing so ensures that
> all the project's files are synchronized.


Anatoly Podgoretsky   (2009-11-27 12:22:00) [3]

> Molchanov  (27.11.2009 12:18:00)  [0]

dpr он для управления системой, а не руками


Наверх

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